title: filtro maschera non associata

text:
On 20 Ago, 17:58, "Geppo" <c...@tin.it.invalid> wrote:
> Ciao Giuseppe wrote:
> > Salve a tutto l'NG.
> > Dunque ho una tabella tblFatture, una TblAziende, una TblFornitori.
> > Quest'ultima assegna un IDFornitore progressivo ed un CodFornitore
> > progressivo per ogni singola azienda.
> > Quindi un fornitore può essere presente più volte ma con l'IdAzienda
> > diverso.
> > Nella maschera frmFatture effettuo la selezione dei campi IdAzienda e
> > IdFornitore tramite una maschera di ricerca (una per le aziende ed una
> > per i fornitori) non associata che mi restituisce il valore
> > selezionato nel campo da cui ho aperto appunto la maschera di
> > ricerca.
> > Il problema è  che vorrei che la maschera di ricerca Fornitori venisse
> > filtrata in base all'IDAzienda scelta nella maschera frmFatture per
> > evitare che un fornitore comune a più di un'azienda appaia tante volte
> > quante sono le aziende che si forniscono dallo stesso.
> > Attualmente nel campo IDFornitore su evento KeyDown ho:
> > If KeyCode = vbKeyF2 Then
>
> > DoCmd.OpenForm "RicercaFornitori", , , , , , Me.Name
> > End If
>
> > ho provato a fare così:
>
> > If KeyCode = vbKeyF2 Then
> >     Dim stDocName As String
> >     Dim stLinkCriteria As String
>
> >     stDocName = "RicercaFornitori"
>
> >     stLinkCriteria = "[IDAzienda]=" & Me![IdAzienda]
>
> DoCmd.OpenForm "RicercaFornitori", , ,stLinkCriteria, , , Me.Name
>
> > End If
>
> > ma non funziona. Spero di essere stato chiaro.
> > Come posso risolvere questo problema?
>
> --
> Ciao
> Geppo
Ciao Geppo.
Allora nella maschera di inserimento fattura sul campo IDFornitore ho
messo:
If KeyCode = vbKeyF2 Then
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "RicercaFornitori"
    stLinkCriteria = "[IDAzienda]=" & Me![IDAzienda]
DoCmd.OpenForm "RicercaFornitori", , , stLinkCriteria, , , Me.Name
End If
Si apre la maschera RicercaFornitori con origine tblFornitori su cui
c'è un campo IdAzienda che memorizza l'IdAzienda della maschera di
inserimento fattura.
Fin qui tutto ok.
Il problema è che il campo non associato txtRicerca1 su cui
nell'evento modifica c'è il codice che ho inserito nel mio 2° post
genera la casella di riepilogo "elenconominativi" senza tener conto
dell'IdAzienda della maschera di selezione.
L'ho modificato così ma non funziona:
Private Sub txtRicerca_Change()
Dim strR As String
Dim strSQL As String
strR = Me!txtRicerca.Text
If Not IsNull(Me!txtRicerca.Text) Then
    strSQL = "SELECT tblfornitori.IdAzienda, tblfornitori.IdFornitore,
tblfornitori.codfornitore, tblAnagrafica.[ragione sociale1],
tblAnagrafica.via1, tblAnagrafica.cap " & _
    "FROM tblFornitori INNER JOIN tblAnagrafica ON
tblFornitori.IdAnagrafica = tblAnagrafica.ID " & _
    "WHERE  (((tblFornitori.IdAzienda) Like Nz([Forms]!
[RicercaFornitori]![IdAzienda];" * ");"
    "WHERE (((tblAnagrafica.[ragione sociale1]) Like " & Chr$(34) &
"*" & _
    strR & "*" & Chr$(34) & ");"
    Me!Elenconominativi.RowSource = strSQL
    Me!Elenconominativi.Requery
    Me!txtRicerca = strR
    Me!txtRicerca.SetFocus
    Me!txtRicerca.SelStart = 255
End If
End Sub
Come faccio ad impostare la doppia condizione WHERE??
Ciao. Grazie Geppo.
Giuseppe.


title: filtro maschera non associata

author: Geppo

text:
Ciao Giuseppe wrote:
> On 20 Ago, 17:58, "Geppo" <c...@tin.it.invalid> wrote:
>> Ciao Giuseppe wrote:
>>> Salve a tutto l'NG.
>>> Dunque ho una tabella tblFatture, una TblAziende, una TblFornitori.
>>> Quest'ultima assegna un IDFornitore progressivo ed un CodFornitore
>>> progressivo per ogni singola azienda.
>>> Quindi un fornitore puň essere presente piů volte ma con l'IdAzienda
>>> diverso.
>>> Nella maschera frmFatture effettuo la selezione dei campi IdAzienda
>>> e IdFornitore tramite una maschera di ricerca (una per le aziende
>>> ed una per i fornitori) non associata che mi restituisce il valore
>>> selezionato nel campo da cui ho aperto appunto la maschera di
>>> ricerca.
>>> Il problema č  che vorrei che la maschera di ricerca Fornitori
>>> venisse filtrata in base all'IDAzienda scelta nella maschera
>>> frmFatture per evitare che un fornitore comune a piů di un'azienda
>>> appaia tante volte quante sono le aziende che si forniscono dallo
>>> stesso.
>>> Attualmente nel campo IDFornitore su evento KeyDown ho:
>>> If KeyCode = vbKeyF2 Then
>>
>>> DoCmd.OpenForm "RicercaFornitori", , , , , , Me.Name
>>> End If
>>
>>> ho provato a fare cosě:
>>
>>> If KeyCode = vbKeyF2 Then
>>>     Dim stDocName As String
>>>     Dim stLinkCriteria As String
>>
>>>     stDocName = "RicercaFornitori"
>>
>>>     stLinkCriteria = "[IDAzienda]=" & Me![IdAzienda]
>>
>> DoCmd.OpenForm "RicercaFornitori", , ,stLinkCriteria, , , Me.Name
>>
>>> End If
>>
>>> ma non funziona. Spero di essere stato chiaro.
>>> Come posso risolvere questo problema?
>>
>> --
>> Ciao
>> Geppo
>
> Ciao Geppo.
> Allora nella maschera di inserimento fattura sul campo IDFornitore ho
> messo:
> If KeyCode = vbKeyF2 Then
>     Dim stDocName As String
>     Dim stLinkCriteria As String
>
>     stDocName = "RicercaFornitori"
>
>     stLinkCriteria = "[IDAzienda]=" & Me![IDAzienda]
>
>
> DoCmd.OpenForm "RicercaFornitori", , , stLinkCriteria, , , Me.Name
> End If
>
> Si apre la maschera RicercaFornitori con origine tblFornitori su cui
> c'č un campo IdAzienda che memorizza l'IdAzienda della maschera di
> inserimento fattura.
> Fin qui tutto ok.
> Il problema č che il campo non associato txtRicerca1 su cui
> nell'evento modifica c'č il codice che ho inserito nel mio 2° post
> genera la casella di riepilogo "elenconominativi" senza tener conto
> dell'IdAzienda della maschera di selezione.
> L'ho modificato cosě ma non funziona:
Prova in questo modo:
> Private Sub txtRicerca_Change()
> Dim strR As String
> Dim strSQL As String
> strR = Me!txtRicerca.Text
> If Not IsNull(Me!txtRicerca.Text) Then
>
>
 strSQL = "SELECT tblfornitori.IdAzienda, tblfornitori.IdFornitore," & _
" tblfornitori.codfornitore, tblAnagrafica.[ragione sociale1]," & _
" tblAnagrafica.via1, tblAnagrafica.cap " & _
" FROM tblFornitori INNER JOIN tblAnagrafica ON" & _
" tblFornitori.IdAnagrafica = tblAnagrafica.ID" & _
" WHERE  (((tblFornitori.IdAzienda) Like
Nz([Forms]![RicercaFornitori]![IdAzienda]))" & _
" and (((tblAnagrafica.[ragione sociale1]) Like " & Chr$(34) & "*" strR &
"*" & Chr$(34) & "))));"
>     Me!Elenconominativi.RowSource = strSQL
>     Me!Elenconominativi.Requery
>     Me!txtRicerca = strR
>     Me!txtRicerca.SetFocus
>     Me!txtRicerca.SelStart = 255
> End If
> End Sub
>
> Come faccio ad impostare la doppia condizione WHERE??
> Ciao. Grazie Geppo.
> Giuseppe.
--
Ciao
Geppo


title: filtro maschera non associata

author: Giuseppe

text:
On 22 Ago, 00:08, "Geppo" <c...@tin.it.invalid> wrote:
> Ciao Giuseppe wrote:
> > On 20 Ago, 17:58, "Geppo" <c...@tin.it.invalid> wrote:
> >> Ciao Giuseppe wrote:
> >>> Salve a tutto l'NG.
> >>> Dunque ho una tabella tblFatture, una TblAziende, una TblFornitori.
> >>> Quest'ultima assegna un IDFornitore progressivo ed un CodFornitore
> >>> progressivo per ogni singola azienda.
> >>> Quindi un fornitore può essere presente più volte ma con l'IdAzienda
> >>> diverso.
> >>> Nella maschera frmFatture effettuo la selezione dei campi IdAzienda
> >>> e IdFornitore tramite una maschera di ricerca (una per le aziende
> >>> ed una per i fornitori) non associata che mi restituisce il valore
> >>> selezionato nel campo da cui ho aperto appunto la maschera di
> >>> ricerca.
> >>> Il problema è  che vorrei che la maschera di ricerca Fornitori
> >>> venisse filtrata in base all'IDAzienda scelta nella maschera
> >>> frmFatture per evitare che un fornitore comune a più di un'azienda
> >>> appaia tante volte quante sono le aziende che si forniscono dallo
> >>> stesso.
> >>> Attualmente nel campo IDFornitore su evento KeyDown ho:
> >>> If KeyCode = vbKeyF2 Then
>
> >>> DoCmd.OpenForm "RicercaFornitori", , , , , , Me.Name
> >>> End If
>
> >>> ho provato a fare così:
>
> >>> If KeyCode = vbKeyF2 Then
> >>>     Dim stDocName As String
> >>>     Dim stLinkCriteria As String
>
> >>>     stDocName = "RicercaFornitori"
>
> >>>     stLinkCriteria = "[IDAzienda]=" & Me![IdAzienda]
>
> >> DoCmd.OpenForm "RicercaFornitori", , ,stLinkCriteria, , , Me.Name
>
> >>> End If
>
> >>> ma non funziona. Spero di essere stato chiaro.
> >>> Come posso risolvere questo problema?
>
> >> --
> >> Ciao
> >> Geppo
>
> > Ciao Geppo.
> > Allora nella maschera di inserimento fattura sul campo IDFornitore ho
> > messo:
> > If KeyCode = vbKeyF2 Then
> >     Dim stDocName As String
> >     Dim stLinkCriteria As String
>
> >     stDocName = "RicercaFornitori"
>
> >     stLinkCriteria = "[IDAzienda]=" & Me![IDAzienda]
>
> > DoCmd.OpenForm "RicercaFornitori", , , stLinkCriteria, , , Me.Name
> > End If
>
> > Si apre la maschera RicercaFornitori con origine tblFornitori su cui
> > c'è un campo IdAzienda che memorizza l'IdAzienda della maschera di
> > inserimento fattura.
> > Fin qui tutto ok.
> > Il problema è che il campo non associato txtRicerca1 su cui
> > nell'evento modifica c'è il codice che ho inserito nel mio 2° post
> > genera la casella di riepilogo "elenconominativi" senza tener conto
> > dell'IdAzienda della maschera di selezione.
> > L'ho modificato così ma non funziona:

Ciao Geppo, ho messo la tua istruzione e mi diceva errore di
compilazione evidenziandomi      strR   del penultimo rigo della
condizione WHERE.
Ho messo -  credo la giusta punteggiatura - e in Vba sembrava non ci
fossero problemi.
Invece, quando entro nella maschera di selezione fornitori, appena
inserisco nella casella di testo txtricerca un qualsiasi valore
l'elenco nominativi non mostra alcun risultato e se clicco
sull'origine della casella di riepilogo mi dice errore di sintassi
nell'espressione della query (((tblFornitori.IdAzienda) Like
Nz([Forms]![RicercaFornitori]![IdAzienda])) and (((tblanagrafica.
[ragione sociale1]) Like "*d*"));
Cmq il codice intero è:
strSQL = "SELECT tblfornitori.IdAzienda, tblfornitori.IdFornitore,
tblfornitori.codfornitore, tblAnagrafica.[ragione sociale1],
tblAnagrafica.partitaiva, tblAnagrafica.[codice fiscale] " & _
" FROM tblFornitori INNER JOIN tblAnagrafica ON
tblFornitori.IdAnagrafica = tblAnagrafica.ID" & _
" WHERE  (((tblFornitori.IdAzienda) Like Nz([Forms]![RicercaFornitori]!
[IdAzienda]))" & _
" and (((tblAnagrafica.[ragione sociale1]) Like " & Chr$(34) & "*" & _
strR & "*" & Chr$(34) & "));"
Puoi controllare per favore. Io continuo a provare. Grazie Geppo.
Ciao Giuseppe.


title: filtro maschera non associata

text:
Ciao Giuseppe wrote:
---cut----

Devi aggiungere altre due parentesi tonde chiuse alla fine:
> Invece, quando entro nella maschera di selezione fornitori, appena
> inserisco nella casella di testo txtricerca un qualsiasi valore
> l'elenco nominativi non mostra alcun risultato e se clicco
> sull'origine della casella di riepilogo mi dice errore di sintassi
> nell'espressione della query (((tblFornitori.IdAzienda) Like
> Nz([Forms]![RicercaFornitori]![IdAzienda])) and (((tblanagrafica.
 [ragione sociale1]) Like "*d*"))));
> Cmq il codice intero è:
>
> strSQL = "SELECT tblfornitori.IdAzienda, tblfornitori.IdFornitore,
> tblfornitori.codfornitore, tblAnagrafica.[ragione sociale1],
> tblAnagrafica.partitaiva, tblAnagrafica.[codice fiscale] " & _
> " FROM tblFornitori INNER JOIN tblAnagrafica ON
> tblFornitori.IdAnagrafica = tblAnagrafica.ID" & _
> " WHERE  (((tblFornitori.IdAzienda) Like
> Nz([Forms]![RicercaFornitori]! [IdAzienda]))" & _
> " and (((tblAnagrafica.[ragione sociale1]) Like " & Chr$(34) & "*" & _
> strR & "*" & Chr$(34) & "));"
Anche al codice sopra hai tolto due parentesi tonde chiuse alla fine, forse
hai copia/incollato male.
> Puoi controllare per favore. Io continuo a provare. Grazie Geppo.
> Ciao Giuseppe.
--
Ciao
Geppo


title: filtro maschera non associata

text:

Ok Geppo. Tutto a posto. Era diventato solo un problema di virogle.
Grazie tante.
Ciao. Giuseppe.


title: Parole Bold in Textbox

text:
Buongiorno a tutti.
Ho letto da qualche parte (fonte Alex)
che è possibile scrivere qualche parola in grassetto
all'interno di una Textbox NON formattata in grassetto.
Almeno... così mi sembra di aver capito.
Il tutto partendo dalla formattazione del Campo di origine in RTF.
Ok. Però non ho trovato altra documentazione di supporto
(a parte quella relativa ad Html per esempio: \b parola \b0
che ovviamente non funziona...)


title: Parole Bold in Textbox

text:

Quando citi, metti il LINK è più facile capire di cosa si parla.

Usa una TextBox impostando a RTF la proprietà "FORMATO TESTO" da Testo Normale-->RTF

Attenzione che se usi un controllo ASSOCIATO, devi memorizzare il Testo FORMATTATO quindi con i TAG inclusi "<b>TuoTesto</b>", ma lo puoi fare solo se il campo è MEMO.

Se il Controllo non è associato, puoi formattare....!
Di solito si dovrebbe memorizzare sia il Campo MEMO(RTF) che il campo TEXT altrimenti se poi ti serve lavorarci hai i TAG che rompono... ma è un bel problema...

@Alex


title: Parole Bold in Textbox

text:

Ciao Alex, c'è qualcosa che non capisco:
il mio campo è associato,è Memo e il formato selezionato in tabella è RTF!
Che significa che devo "Memorizzare il testo Formattato?"
In ogni caso, il risultato finale è quello di inserire una parola tra i TAG e visualizzare SOLO il grassetto, giusto?...


title: Parole Bold in Textbox

text:

Non so quale sia il tuo obiettivo...!
Se ti basta avere il TESTO FORMATTATO bene, sappi ad esempio, che se ci fosse l'esigenza di ESPORTARLO in formato Testo o allegarlo ad una Mail che non supporta HTML, vedresti sempre il testo con i TAGS... se per te non è un problema sei a posto.

@Alex


title: Parole Bold in Textbox

text:

Il mio obiettivo, come spiegato, non è avere tutto il testo formattato ma solo determinate parole. In altre parole il cliente, provenendo da Word pensa di trovarsi davanti uno strumento altrettanto flessibile, sotto gli aspetti della formattazione e quindi è abituato a mettere grassetti e italici qua e là... Mi chiedevo quindi se quella modica: Normale>RTF potesse fare al caso mio...


title: Parole Bold in Textbox

text:

... finisco il concetto: ho provato a mettere parole tra i TAG indicati, <b>mioTesto</b>,  ma il testo rimane invariato.


title: Parole Bold in Textbox

text:
> ... finisco il concetto: ho provato a mettere parole tra i TAG indicati, mioTesto,  ma il testo rimane invariato.

Se pensi che scrivendo "mioTesto" la visualizzazione corrisponda al BOLD direi che hai sbagliato..., e questo perchè i caratteri <> vengono sostituiti se riconosciuti come TAGS... quindi prova a rivedere cosa viene scritto nel campo in seguito alla digitazione.

Se da VBA su LOAD della Form scrivi:
Me!NomeTextBoxRFT="mioTesto" allora vedi che non viene manipolato e funziona.

@Alex


title: Parole Bold in Textbox

text:

Ok... quindi la cosa è predisposta a monte... Dovrò dire al cliente di abituarsi a non usare grassetti a piacimento.
Grazie !


title: Parole Bold in Textbox

text:
Ma se premi Right click sulla textbox si apre il menu contestuale che consente la formattazione HTML... Non è più comodo...?

@Alex


title: Parole Bold in Textbox

text:
...ma dov'e il menu di cui parli,scusa....?!
Premendo il tasto destro c'e
Taglia copia incolla
Inserisci dividi
Ordine az
Filtro testo
.....
Ma non c'è alcun menu relativo a  Html


title: Parole Bold in Textbox

text:

Io non so cosa stai facendo... ma se imposti la TextBox in RTF, scrivi poi SELEZIONI e premi il RightClick appare il ContextMenù proprio per la Formattazione HTML.

Vedi tu....

@Alex


title: Parole Bold in Textbox

author: BFS

text:

perchè il menu di cui si parla, che permette di formattare il testo non
appare quando fai tasto destro, ma appare in automatico in dissolvenza
appena finisci di selezionare la parte di testo che vuoi formattare,
appena rilasci il pulsante sx del mouse al termine della selezione.
se sposti il mouse sul menu in dissolvenza diventa pienamente attivo.

almeno sulla mia versione di Access

BFS


title: Parole Bold in Textbox

text:

Adesso..... per caso.... quando ho riaperto la form... mi sono accorto che a seconda della posizione del mouse appare in trasparenza... lievissima (che nemmeno si vedeva) la barra HTML per la formattazione...ma non sempre... devo capire com'è che appare,  ma non con il tasto destro sulla TEXBOX.  Ci deve essere qualche impostazione alle spalle...tra il comportamento che visualizzo io e ciò che dici tu.


title: Parole Bold in Textbox

text:

non dipende dalla posizione del mouse, come avevo appena scritto, quando
rilasci il tasto sx del mouse al termine della selezione il menu appare

ciao
BFS


title: Parole Bold in Textbox

text:

Dopo aver DIGITATO... seleziona con il mouse la parte di TESTO da Formattare e premi il tasto destro del MOUSE... esce il ContextMenù di formattazione.

@Alex


title: Parole Bold in Textbox

text: Certamente il comportamento esatto dipende dalle versioni di access. Nella mia versione il tasto Dx sul testo selezionato non funziona.  Quasi sempre appare la barra di formattazione sopra il testo scritto, ma non sempre. Per cui a limite potrei pensare ad una barra personalizzata richiamata dalla maschera. Ad ogni modo il problema è stato risolto. Grazie mille, come sempre!


title: [OT] Compagnie aeree

author: Roberto da casa

text:
COMPAGNIE AEREE
Air-UNIX:
Tutti si portano da casa un pezzo dell'aereo quando arrivano all'aeroporto.
Nei pressi della pista di decollo, mettono insieme l'aereo pezzo per pezzo,
generalmente litigando su che tipo di aereo dovrebbero costruire.
DOS-One:
Tutti spingono l'aereo in modo che prenda il volo. Dopo di che saltano a
bordo tutti, planano a bassa quota fino a quando l'aereo tocca di nuovo
terra. A questo punto scendono e ricominciano a spingere, etc. etc.
Mac Airlines:
Tutto il personale si assomiglia fisicamente in modo sospetto e si comporta
nello stesso, identico modo. Appena chiedete loro una infomazione, vi viene
gentilmente risposto che non avete bisogno di sapere, che in realtà voi non
volete sapere, che tutto vi sarà fatto senza che dobbiate intervenire, e
quindi di chiudere quella maledetta bocca...
Windows Air:
Il terminale è arredato in modo confortevole e divertente, pieno di colori
brillanti. Siete serviti da hostess carine e gentili, il vostro bagaglio
viene etichettato e mandato nel vano cargo dell'aereo in pochi minuti. Il
decollo avviene in orario e in modo piacevole. Dopo 10 minuti di volo,
l'aereo esplode senza alcun avvertimento.
Windows-NT Air:
Lo stesso servizio di Windows Air, solo che il biglietto costa di più, la
flotta è composta da aerei molto più grossi e coinvolge nell'esplosione
tutti gli altri aerei in transito nel raggio di 40 miglia nautiche.
Linux Travel Co.:
Gli impiegati scontenti di tutte le altre compagnie decidono di fondare la
loro società. Si comprano i loro aerei, assemblano i check-in e si
pavimentano le piste d'atterraggio da soli. Richiedono un piccolo prezzo per
il costo del biglietto, che può essere evitato se il cliente se lo
scarica e lo stampa da se. Quando mettete i piedi sull'aereo vi viene dato
un sedile, 4 bulloni, un cacciavite e una copia del Sedile-HOWTO.html. Una
volta seduti, il viaggio è confortevole, il pasto è gustoso e l'aereo
atterra senza alcun problema. Di conseguenza tentate di dire ai vostri
amici del magnifico viaggio, ma tutto quello che riescono a dire è: "Cosa
hai dovuto fare con quel sedile???"
Sun Flights:
Solo posti in Business Class. Il biglietto costa un patrimonio, ma ne vale
la pena. Tutto è gestito dalla casa madre, dalle prenotazioni, agli
aereoporti, agli aerei stessi e alla loro manutenzione, con soluzioni
completamente proprietarie. I motori dei velivoli sono assemblati con
tecnologie sconosciute e segretissime (si vocifera che alcuni componenti
siano di origine aliena) ma affidabili al 100%. Ogni volo è effettuato
contemporaneamente da due aerei, dove il secondo parte pochi attimi dopo il
primo e ne segue una rotta simile. Nel caso in cui ci fosse un
malfunzionamento (anche minimo) durante un volo, il sistema ideato dalla
Sun Flights consente di teletrasportare immediatamente i passeggeri sul
secondo aereo (con tutti i bagagli), mantenendo l'ordine stabilito alla
partenza. Una volta che una coppia di aerei Sun Flights è atterrata, è molto
raro che si fermi in aereoporto per più di mezz'ora.


title: [OT] Compagnie aeree

author: Alessandro Cara

text:
Roberto da casa wrote:
[cut]
> Sun Flights:
>
> Solo posti in Business Class. Il biglietto costa un patrimonio, ma ne vale
> la pena. Tutto è gestito dalla casa madre, dalle prenotazioni, agli
> aereoporti, agli aerei stessi e alla loro manutenzione, con soluzioni
> completamente proprietarie. I motori dei velivoli sono assemblati con
> tecnologie sconosciute e segretissime (si vocifera che alcuni componenti
> siano di origine aliena) ma affidabili al 100%. Ogni volo è effettuato
> contemporaneamente da due aerei, dove il secondo parte pochi attimi dopo il
> primo e ne segue una rotta simile. Nel caso in cui ci fosse un
> malfunzionamento (anche minimo) durante un volo, il sistema ideato dalla
> Sun Flights consente di teletrasportare immediatamente i passeggeri sul
> secondo aereo (con tutti i bagagli), mantenendo l'ordine stabilito alla
> partenza. Una volta che una coppia di aerei Sun Flights è atterrata, è molto
> raro che si fermi in aereoporto per più di mezz'ora.
a patto che non sia la prima serie Ultra che che non e' mai riuscita a
a finire il "rullaggio"
--
a.cara
Togli qualcosa dall'email


title: [OT] Compagnie aeree

text:
"Alessandro Cara" <
alexqu...@blunet.it
> ha scritto nel messaggio
news:3ED634E9...@blunet.it...
> Roberto da casa wrote:
[CUT]
>
> a patto che non sia la prima serie Ultra che che non e' mai riuscita a
> a finire il "rullaggio"
:-)))
>
> --
> a.cara
> Togli qualcosa dall'email
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: [OT] Compagnie aeree

author: Sib

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
cut
> Linux Travel Co.:
>
> Gli impiegati scontenti di tutte le altre compagnie decidono di fondare la
> loro società. Si comprano i loro aerei, assemblano i check-in e si
> pavimentano le piste d'atterraggio da soli. Richiedono un piccolo prezzo
per
> il costo del biglietto, che può essere evitato se il cliente se lo
> scarica e lo stampa da se. Quando mettete i piedi sull'aereo vi viene dato
> un sedile, 4 bulloni, un cacciavite e una copia del Sedile-HOWTO.html. Una
> volta seduti, il viaggio è confortevole, il pasto è gustoso e l'aereo
> atterra senza alcun problema. Di conseguenza tentate di dire ai vostri
> amici del magnifico viaggio, ma tutto quello che riescono a dire è: "Cosa
> hai dovuto fare con quel sedile???"
Fosse solo un problema di sedile potrebbe anche risolversi,
ma non bisogna dimenticare di collegare correttamente tutti i fili
dell'impianto elettrico a mano e senza spine codificate.
fortuna che l'istruzione "man" tira fuori l'enciclopedia larousse da leggere
tutta fino in fondo per capire come collegare il primo filo.
Sib


title: [OT] Compagnie aeree

text:
Sib ha scritto:

sempre meglio della "treccani", con rimandi, che tira fuori l'F1 di a2k
;<)
--
a.cara
togli qualcosa dall'email


title: [OT] Compagnie aeree

text:
"Alessandro Cara" <
alexqu...@blunet.it
> ha scritto nel messaggio

hehe,
dici?
almeno nell'help di A2000 per i rimandi (che su linux non ci sono) basta un
click e poi ci sono gli indici e le funzioni di ricerca, man te lo devi
scorrere praticamente a mano, tutte e diecimila le pagine.
Ciao
Sib


title: [OT] Compagnie aeree

author: Giulio

text:
> Windows-NT Air:
>
> Lo stesso servizio di Windows Air, solo che il biglietto costa di più, la
> flotta è composta da aerei molto più grossi e coinvolge nell'esplosione
> tutti gli altri aerei in transito nel raggio di 40 miglia nautiche.
Fosse solo questo ... ma dopo devi pensare che i rottami di tutti gli aerei
da qualche parte dovranno pur cadere!!
Ciao, Giulio


title: PROBLEMI CONVERSIONE

author: M

text:
Ho convertito un database da access 2000 (a sua volta convertito da access
97) a 2002.
Nella prima conversione 97--->2000 il problema veniva riscontrato
nell'esecuzione del VBA dei moduli ed era dovuto al fatto che il riferimento
alle maschere nel 97 si poteva fare anche in italiano ("Schede") mentre nel
2000 diventavano esclusivamente "Forms".
Tale problema continuava a non sussistere invece nelle query-macro-report e
nelle maschere stesse dove ad es([Schede]![Anagrafica Ditte]![Registro])
funzionava ancora.
Ora con access 2002 la cosa sembre essere stata estesa a tutti gli oggetti e
"Schede" non viene più riconosciuto.
Mentre la modifica del solo codice dei moduli non era stata un problema (con
trova e sostituisci ho risolto in un attimo) ora andare alla ricerca di
"Schede" in centinaia di oggetti e controlli vari (trattasi di un database
per contabilità semplificata e ordinaria multiaziendale) è impresa immane e
cmq senza la certezza di aver completato l'opera.
CHI MI PUO' AIUTARE?
grazie
marco


title: PROBLEMI CONVERSIONE

author: Giorgio Prx

text:
"M" <
m...@m.com
> ha scritto nel messaggio
news:5d38ee7d5735b9db...@news.teranews.com...

Ciao M
io farei in questo modo:
1) salvare in formato testo tutti i forms e i reports.
2) individuare i files che contengono la parola Schede (ad esempio con
strumenti trova di Windows)
3) sostituire Scede con form con un editor di testo (es WordPad)
4) reimportare i forms e i reports modificati dal formato testo.
non dico che è una passeggiata ma in una mezza giornata ne sistemi almeno
200.
Ciao Giorgio


title: PROBLEMI CONVERSIONE

text:
"Giorgio Prx" <
giorgio...@nospamtiscalinet.it
> ha scritto nel messaggio
news:bublmr$j3n$1...@lacerta.tiscalinet.it...
>
> "M" <
m...@m.com
> ha scritto nel messaggio
> news:5d38ee7d5735b9db...@news.teranews.com...
Dimenticavo ......
Forse č inutile chiederlo ma hai gią provato con Strumenti->Converti
Database ?
Ciao Giorgio


title: svuotare tabella tranne l'ultimo record

author: diego

text:
buona sera a tutto il ng, mi chiedevo se fosse possibile svuotare una
tabella dove vi sono salvati dei numerici progressivi e salvare solo
l'ultimo record per continuare con la progressione, diciamo ad ogni
inizio anno, la tabella contiene solo un campo numerico che ho
denominato PRATICA ed ad oggi ci sono circa 22.000 record vorrei che a
fine anno , se la tabella ne contiene, diciamo 23150 , la tabella si
svuotasse lasciandomi solo come unico record proprio il 23150 cosicche'
il prossimo record possa essere il 23151, ho provato con top ecc ecc ma
non so come impostare la sintassi sql.
mi dareste una mano??
Grazie
Saluti
Diego


title: svuotare tabella tranne l'ultimo record

author: Sergio MAZZA

text:
"diego" <
diegoci...@hotmail.com
> ha scritto nel messaggio news:1159659988.4...@b28g2000cwb.googlegroups.com...

Delete * From nomeTabella Where numeroPratica < (Select Max(numeroPratica) as numPraticaMax From nomeTabella)
Ciao.
--
Sergio MAZZA


title: svuotare tabella tranne l'ultimo record

text:
Sergio MAZZA ha scritto:
> Delete * From nomeTabella Where numeroPratica < (Select Max(numeroPratica) as numPraticaMax From nomeTabella)
>
> Ciao.
> --
> Sergio MAZZA
Grazie Sergio
Pensavo fosse più complesso, non capisco perchè mi devo andare ad
incasinare....mancherò un pò di senso logico???


title: svuotare tabella tranne l'ultimo record

text:
"diego" <
diegoci...@hotmail.com
> ha scritto nel messaggio news:1159706147.7...@e3g2000cwe.googlegroups.com...
Grazie Sergio
Pensavo fosse più complesso, non capisco perchè mi devo andare ad
incasinare....mancherò un pò di senso logico???
[risposta]
A volte basta un po' di fantasia...
Ciao.
--
Sergio MAZZA


title: Raggiungere un controllo da sottomaschera a maschera principale

author: Fanciullo

text:
Salve sono Fanciullo,
Access97
come posso raggiungere il controllo di una maschera
principale partendo da una sottomaschera?
In una sottomaschera (frmsottoASSENZE)
 ho un bottone di comando.
Sull'evento click
vorrei svuotare due controlli posti nella maschera principale
(frmINSERIMENTO)
ho provato in queste due maniere
ma non riesco a raggiugerli!!
Private Sub cmdNUOVORec_Click()
    DoCmd.GoToRecord , , acNewRec
'primo tentativo
Forms![frmINSERIMENTO]![cscSCELTADOCENTE] = ""
Forms![frmINSERIMENTO]![csDOCENTE].Visible = False
'secondo tentativo
Me.Parent!cscSCELTADOCENTE = ""
Me.Parent!csDOCENTE.Visible = False
end sub
grazie


author: almorel

text:

Ciao
Prova con:
Parent!cscSCELTADOCENTE = ""
Parent!csDOCENTE.Visible = False
Parent indica già "form mio padre"
Ciao.
Alberto


text:
"almorel" <
alm...@gmail.com
> ha scritto nel messaggio
news:654450a2-bdd1-4e8f...@z24g2000yqb.googlegroups.com...

Ciao
Prova con:

Parent indica gi� "form mio padre"
Ciao.
Alberto
ciao alberto
FUNZIONANO TUTTI E DUE I RIFERIMENTI........
Forms![frmINSERIMENTO]![cscSCELTADOCENTE] = ""
Me.Parent!cscSCELTADOCENTE = ""
sbagliavo semplicemente a piazzera le righe di codice
grazie


title: Inserimento campo calcolato in query a campi incrociati

author: Giuseppe Lucchini

text:
Dopo una query a campi incrociati ho ottenuto un risultato del tipo
Zona    2000    2001    2002
Germania  10      15      11
Francia   15      20      17
Ora, se inserisco un nuovo campo calcolato all'interno della stessa
query Expr: [2002] - [2001] ed eseguo la query non mi compare il campo
calcolato. Questo perchè forse i campi 2002 e 2001 sono "virtuali",
cioè compaiono solo nella query a campi incrociati? Qualcuno puo'
darmi un suggerimento?
Grazie
Giuseppe


author: FABIO

text:
Giuseppe Lucchini wrote:
> Dopo una query a campi incrociati ho ottenuto un risultato del tipo
> Zona    2000    2001    2002
> Germania  10      15      11
> Francia   15      20      17
> Ora, se inserisco un nuovo campo calcolato all'interno della stessa
> query Expr: [2002] - [2001] ed eseguo la query non mi compare il campo
> calcolato. Questo perchč forse i campi 2002 e 2001 sono "virtuali",
> cioč compaiono solo nella query a campi incrociati? Qualcuno puo'
> darmi un suggerimento?
> Grazie
> Giuseppe
Ma [2002] e [2001] sono nomi di campo?
Cosa vuoi ottenere dal campo calcolato?
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
"Giuseppe Lucchini" <
giuseppe...@tiscali.it
> ha scritto nel messaggio
news:4ae894ad.02110...@posting.google.com...

Prova ad esemplificare il risultato che vorresti ottenere.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


author: Roberto P

text:
....esemplificare ...   ? ? ?
per i non addetti  ? ? ?


text:
"Roberto P" <
robe...@libero.it
> ha scritto nel messaggio
news:8Pez9.11499$8E3.3...@twister2.libero.it...
> ....esemplificare ...   ? ? ?
>
> per i non addetti  ? ? ?
>
????????????



text:
Scusate per la mancanza di chiarezza, cerchero' di rimediare. Da una
query a campi incrociati derivante da una tabella con i campi
denominati ANNO, ZONA, QUANTITA' è venuto fuori il seguente risultato
zona/anno  2000    2001    2002
Germania   10      15      27
Francia    15      20      40
Il mio fine è quello di inserire, durante la query a campi incrociati
un nuovo campo, calcolato, che dia  Differenza: [2002]-[2001], quindi
la query a campi incrociati diventerebbe
zona/anno  2000    2001    2002  Differenza:[2002]-[2001]
Germania   10      15      27    12
Francia    15      20      40    20.
Il problema è che anche se cerco di impostare il campo calcolato
all'interno della query a campi incrociati non si crea questo nuovo
campo. Mi domandavo quindi se i nuovi campi 2000, 2001, 2002 che non
derivano dalla tabella iniziale, ma sono "creati" dalla query a campi
incrociati siano manipolabili.
Giuseppe
giuseppe...@tiscali.it
 (Giuseppe Lucchini) wrote in message news:<
4ae894ad.02110...@posting.google.com
>...



text:
"Giuseppe Lucchini" <
giuseppe...@tiscali.it
> ha scritto nel messaggio
news:4ae894ad.0211...@posting.google.com...
> Scusate per la mancanza di chiarezza, cerchero' di rimediare. Da una
> query a campi incrociati derivante da una tabella con i campi
> denominati ANNO, ZONA, QUANTITA' è venuto fuori il seguente risultato
>
> zona/anno  2000    2001    2002
> Germania   10      15      27
> Francia    15      20      40
>
> Il mio fine è quello di inserire, durante la query a campi incrociati
> un nuovo campo, calcolato, che dia  Differenza: [2002]-[2001], quindi
> la query a campi incrociati diventerebbe
>
> zona/anno  2000    2001    2002  Differenza:[2002]-[2001]
> Germania   10      15      27    12
> Francia    15      20      40    20.
>
> Il problema è che anche se cerco di impostare il campo calcolato
> all'interno della query a campi incrociati non si crea questo nuovo
> campo. Mi domandavo quindi se i nuovi campi 2000, 2001, 2002 che non
> derivano dalla tabella iniziale, ma sono "creati" dalla query a campi
> incrociati siano manipolabili.
>
> Giuseppe
In effetti è come dici tu: non credo che riusciresti a farlo all'interno
della stessa query a campi incrociati.
Però puoi creaerti una query di selezione basata sulla query a campi
incrociati e che contenga, oltre a tutti campi della query a campi
incrociati anche il campo calcolato che contiene la differenza tra i valori
relativi all'anno 2002 e quelli relativi all'anno 2001; insomma, se la query
a campi incrociati si chia Query_CampiIncrociati, questa nuova query dovrà
avere un codice SQL simile a questo:
SELECT Query_CampiIncrociati.*, Nz([2002],0)-Nz([2001],0) AS [Differenza
2002 - 2001]
FROM Query_CampiIncrociati;
Sarà sufficiente aprire questa seconda query per avere i risultati
desiderati.



title: formattazione numeri con decimali

author: rick

text:
qualcuno di voi sa se è possibile formattare un valore numerico in modo
tale da usare il punto anzichè la virgola per separare la parte intera da
quella decimale in una cifra?
Grazie a tutti
ciao
rick
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: formattazione numeri con decimali

text:
"rick" <
viv...@libero.it
> ha scritto nel messaggio
news:b8334u$pq1$1...@news.newsland.it...
> qualcuno di voi sa se è possibile formattare un valore numerico in modo
> tale da usare il punto anzichè la virgola per separare la parte intera da
> quella decimale in una cifra?
>
> Grazie a tutti
> ciao
>
> rick
>
Cambia le impostazioni internazionali (pannello di controllo) o utilizza la
funzione format (vedi help)...
Ciao.
--
Sergio MAZZA


title: formattazione numeri con decimali

author: Harry Evans

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:b83qfc$1ls$1...@canarie.caspur.it...

Se ti basta farlo in fase di stampa ad es. fatti una funzioncina che, dato
un numero decimale lo trasforma in stringa (format o str) e poi con instr
trovi la virgola e con mid lo sostituisci col punto.
Cambiare le impostazioni internazionali non lo consiglio, perchè il tuo prg
deve convivere con tutto il resto e magari altri programmi hanno bisogno di
impostazioni corrette (punti migliaia e virgole decimali)


title: WinXP e PaperSize Custom

author: Expo

text:
Prima di XP funzionava tutto a dovere impostanto prtDevMode.PaperSize=256
e poi PageWidth e PageHeigh, poi in XP non posso più utilizzare un formato
pagina personalizzato ma viene usato il formato predefinito della
stampante.
E' cambiato qualcosa nelle API ?


title: WinXP e PaperSize Custom

text:
        selezionata la stampante di interesse nella cartella stampanti, dal
menu a tendina( di WInxp) della voce File seleziona la voce Proprietà
server: qui puoi impostare un formato carta personalizzato delle dimensioni
che vuoi. Almeno io faccio così poi assegno al report interessato la
stampante specifica con la specifica dimensione del foglio (il formato
personalizzato apparirà nell'elenco dei formati disponibili. (A4, Letter ...
MioFormato  etc.) - .... se ho inteso correttamente il tuo problema
!!!!!!!!!!!!!!!!!!!!
"Expo" <
ex...@aczivido.net
> ha scritto nel messaggio
news:pan.2002.11.19....@aczivido.net...



title: WinXP e PaperSize Custom

text:
On Tue, 19 Nov 2002 12:41:01 +0000, . wrote:
>         selezionata la stampante di interesse nella cartella stampanti, dal
> menu a tendina( di WInxp) della voce File seleziona la voce Proprietà
> server: qui puoi impostare un formato carta personalizzato delle dimensioni
> che vuoi. Almeno io faccio così poi assegno al report interessato la
> stampante specifica con la specifica dimensione del foglio (il formato
> personalizzato apparirà nell'elenco dei formati disponibili. (A4, Letter ...
> MioFormato  etc.) - .... se ho inteso correttamente il tuo problema
> !!!!!!!!!!!!!!!!!!!!
Fatto ancora prima del post, ma non appare nell'elenco dei formati
disponibili


title: Stampare solo un record per ogni foglio come si fa?

author: Simone

text:
Ciao,
vorrei stampare da una maschera un record singolo su ogni pagina, stessa
cosa per i report. Per avere delle "schede" distinte.
come si fa?
grazie
Simone


text:
"Simone" <xxxx@.it> ha scritto nel messaggio
news:07uya.210439$K35.5...@news2.tin.it...

Utilizza l'Ordinamento e Raggruppamento; imposti la visualizzazione
dell'intestazione/piè di pagina del gruppo. Poi visualizza le proprietà
della sezione "piè di pagina gruppo" e imposti: Interruzione Pagina a "dopo
sezione"...
Ciao.
--
Sergio MAZZA


text:
>
> Utilizza l'Ordinamento e Raggruppamento>
Come faccio ?
grazie


text:
"Simone" <xxxx@.it> ha scritto nel messaggio
news:eGNya.217202$K35.5...@news2.tin.it...
>
> >
> > Utilizza l'Ordinamento e Raggruppamento>
>
>
> Come faccio ?
>
>
> grazie
>
Per la maschera imposti la proprietą Formato a Maschera singola.
Per il report sarebbe utile sapere i nomi dei campi da rappresentare sul
report...
Ciao.
--
Sergio MAZZA


text:
> Per la maschera imposti la proprietą Formato a Maschera singola.
> Per il report sarebbe utile sapere i nomi dei campi da rappresentare sul
> report...
>
> Ciao.
>
> --
> Sergio MAZZA
>
> Per la maschera  č ok. Ho agito sull'intestazione e il pič di pagina e sul
formato. Per i report si tratta di campi di anagrafica: nome, cognome,
indirizzo, ecc.
Grazie
Simone


text:
"Simone" <xxxx@.it> ha scritto nel messaggio
news:w3sza.232521$K35.5...@news2.tin.it...
>
 > Per la maschera  è ok. Ho agito sull'intestazione e il piè di pagina e
sul
> formato. Per i report si tratta di campi di anagrafica: nome, cognome,
> indirizzo, ecc.
>
>
> Grazie
>
> Simone
Menù: Visualizza - Ordinamento raggruppamento; in "Campo o espressione"
inserisci il Cognome. Imposta Intestazione/piè di pagina (gruppo) a Sì e
nelle propietà del Piè di pagina Cognome, scheda Formato, imposti
Interruzione pagina a Dopo Sezione...
Ciao.
--
Sergio MAZZA


title: gestire lo scanner in access con windows xp?

text:
qualcosa di valido per gestire lo scanner in access esiste con windows xp?
grazie a tutti.


author: Carlo Costarella

text:
"Simba883" <
simb...@libero.it
> ha scritto nel messaggio
news:cgtd3q$f63$1...@lacerta.tiscalinet.it...
> qualcosa di valido per gestire lo scanner in access esiste con windows xp?
> grazie a tutti.
>
>
Argomento proprio di questi giorni con gli ocx della Kodak.
In
www.sitocomune.com
 sezione general troverai il link Come è possibile
scannerizzare, visualizzare, modificare, stampare e salvare files immagine
usando gli ActiveX Kodak?
di Roberto.
L'esempio funziona con Access97 ma può essere convertito in altre versioni.
Per l'uso con WXP leggi un tread del 27 intitolato: [OT]Kodak ocx per WXP,
del sottoscritto.
Ciao, Carlo


text:
> Argomento proprio di questi giorni con gli ocx della Kodak.
> In
www.sitocomune.com
 sezione general troverai il link Come è possibile
> scannerizzare, visualizzare, modificare, stampare e salvare files immagine
> usando gli ActiveX Kodak?
> di Roberto.
> L'esempio funziona con Access97 ma può essere convertito in altre
versioni.
> Per l'uso con WXP leggi un tread del 27 intitolato: [OT]Kodak ocx per WXP,
> del sottoscritto.
>
> Ciao, Carlo
>
ok ma siccome non so se il mio porgramma andrà su xp o 98 o me o 2000 sapete
dirmi se esiste
magari al limite anche a pagamento un ocx che sia slegato dal  sistema
operativo?
Grazie mille


text:
"Simba883" <
simb...@libero.it
> ha scritto nel messaggio
news:cgv2as$kdp$1...@lacerta.tiscalinet.it...

Ciao Simba883.
La tua richiesta è stata molto precisa:
"qualcosa di valido per gestire lo scanner in access esiste con windows xp?
grazie a tutti."
Anche la risposta è stata molto precisa.
Gli ocx Kodak possono essere usati a prescindere dal sistema operativo se,
seguendo i link che ti sono stati dati, avrai l'accortezza di usare tutti i
file indicati nel runtime di distribuzione.
Tieni presente che se vuoi spendere soldi non hai che l'imbarazzo della
scelta.
Uno su tutti: Lead VideoTool ocx.
Nessun ocx è slegato dal sistema operativo; in genere vanno bene in tutti i
sistemi a 32 bit ma non sempre è così specie per WXP.
Ciao, Carlo


title: DefaultValue da codice

text:
Si puo gestire DefaultValue da codice?
Ho una maschera chiamata M-799  con un pulsante che esegue il codice  qui
sotto riportatato
Select Case Utente
      Case 1
           DoCmd.Maximize
      Case 2
            Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "M-800-InserimentoIndirizzi"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
      ' apre la maschera
'[M-800-InserimentoIndirizzi] Me.Utente  Me.DefaultValue = 10?
         End Select
Nel caso 2 , come posso far in modo che tutti i nuovi record del campo
Utente siano uguale a 10?
Saluti Alex


title: DefaultValue da codice

author: Roberto dal portatile

text:
"ale.roma" <
ale....@tiscali.it
> ha scritto nel messaggio
news:ekj2f1$e5n$1...@aioe.org...

A fronte dell'evento "Su apertura" della maschera M-800-InserimentoIndirizzi
imposta il valore predefinito a 10 o al valore che ritieni opportuno.
Per maggiori dettagli leggi l'help circa la proprietą DefaultValue.
>
> Saluti Alex
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: DefaultValue da codice

text:
"Roberto dal portatile" <
r.ma...@libero.it
> ha scritto nel messaggio
news:kicbh.60433$uv5.4...@twister1.libero.it...

Be! non e' cosi semplice.... il valore cambia in base al Case 1 Case 2 Case3
, il valore 10 equivale all'utente, percio deve cambiare ogni volta che
accede un utente diverso.
Saluti Alex


title: DefaultValue da codice

author: Alessandro Baraldi

text:
ale.roma ha scritto:
[CUT]
> Be! non e' cosi semplice.... il valore cambia in base al Case 1 Case 2 Case3
> , il valore 10 equivale all'utente, percio deve cambiare ogni volta che
> accede un utente diverso.
> Saluti Alex
Io direi che è proprio semplice come ti ha suggerito Roberto.., la
difficoltà la inserisci tu perchè non hai le idee chiare di come
globalizzare le varibili ambiente...!!
Solitamente si effettua una gestione utenti a mezzo di login e si
memorizzano i dati in variabili ambiente(globali o Public come
preferisci).
A questo punto su Load passi le variabili ambiente già processate dal
Login alla proprietà DefaultValue del controllo associato al
campo....!
Questo è il modo corretto che ti evita di dover riprocessare mille
volte i dati.
@Alex


title: Se può essere utile (vecchio post); all'attenzione di Karl Donaubauer

text:
Scrivevo nell'altro post:
Siccome non ho la possibilità di farvi visualizzare il database di
esempio, prendo a riferimento la FAQ del sito comune nella Sezione
Form “ 3.77 Sincronizzare in una maschera due o più caselle combinate
ASSOCIATE tra loro in gerarchia “.
Detto ciò, vi spiego come modificare il suddetto database.
Adesso grazie al suggerimento di Giorgio Rancati, ho la possibilità di
farvi visualizzare il db.
Spero Karl che adesso potrai constatare che non ho stravolto il db :-)
http://cid-c6235c2e3d2ce762.skydrive.live.com/self.aspx/Pubblica/db|_Access/SincronizzaComboAssociate.zip
Vladimiro.


text:

Bisogna copiare e incollare sulla barra degli indirizzi tutta la riga
in quanto "Access/SincronizzaComboAssociate.zip " rimane fuori dal
link.
Qualcuno sa perchè succede?
Ciao Vladimiro.


author: Karl Donaubauer

text:

Ho guardato i tuoi mdb ed è tutto come abbiamo discusso:
http://groups.google.com/group/microsoft.public.it.office.access/browse_frm/thread/6f681a66600988f1/2caef888b77eef87
Tu hai fatto bei esempi per il tuo workaround e per me restano
le stesse obiezioni:
Tipo di dati uniformi e relazioni giuste sono più importante
per un database. Per me non sono da modificare per
un problema minore della rappresentazione.
--
cu
Karl
*********
Access FAQ:
www.donkarl.com/it


text:
On 28 Ago, 21:11, "Karl Donaubauer" <
NoS...@donkarl.com
> wrote:
>
vladil...@alice.it
 wrote:
> > Scrivevo nell'altro post:
> > Siccome non ho la possibilità di farvi visualizzare il database di
> > esempio, prendo a riferimento la FAQ del sito comune nella Sezione
> > Form “ 3.77 Sincronizzare in una maschera due o più caselle combinate
> > ASSOCIATE tra loro in gerarchia “.
> > Detto ciò, vi spiego come modificare il suddetto database.
>
> > Adesso grazie al suggerimento di Giorgio Rancati, ho la possibilità di
> > farvi visualizzare il db.
> > Spero Karl che adesso potrai constatare che non ho stravolto il db :-)
>
> >
http://cid-c6235c2e3d2ce762.skydrive.live.com/self.aspx/Pubblica/db|_Access/SincronizzaComboAssociate.zip
>
> Ho guardato i tuoi mdb ed è tutto come abbiamo discusso:
http://groups.google.com/group/microsoft.public.it.office.access/brow.
..
>
> Tu hai fatto bei esempi per il tuo workaround e per me restano
> le stesse obiezioni:
>
> Tipo di dati uniformi e relazioni giuste sono più importante
> per un database. Per me non sono da modificare per
> un problema minore della rappresentazione.
Sono d'accordo con te, ci mancherebbe.
Ma anche l'occhio vuole la sua parte, non credi?
Vladimiro.
ps
se analizzi bene il db (quello con tre combo), ti accorgerai che le
relazioni ci sono; solo che sono nascoste e non credo siano sbagliate
per la costruzione più complessa del db.


Salve, lanciando un Installazione di Office 2010
Su un Windows Server 2016 (Cloud) appare il seguente errore:

"Lingua del pacchetto di installazione non supportata dal sistema"

In realtà il messaggio appariva in inglese, poi ho cambiato le impostazioni della lingua nel Server (pensando di risolvere) e adesso appare in italiano
ma nulla è cambiato . Il problema persiste.
E' un problema di Office 2010?
Quale potrebbe essere il problema?


title: "Lingua del pacchetto di installazione non supportata dal sistema"

text:
Salve,

gabria...@gmail.com
:

> ...

Qui descrivano alcuni varianti per O2007:
https://blogs.technet.microsoft.com/jks/2009/04/23/how-to-fix-the-error-the-language-of-this-installation-package-is-not-supported-by-your-system-during-office-products-installation/

Possano anche essere rimanenze di una vecchia installazione:
https://answers.microsoft.com/en-us/msoffice/forum/msoffice_install-mso_other/the-language-of-this-package-is-not-supported-by/0970db0c-2d80-47a3-83c9-dc1ea9356e16

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

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


text:
Grazie Karl
... nessuno dei 4 possibili motivi elencati nell'articolo corrispondeva alla mia circostanza (avevo copiato la cartella Office senza l'uso di compressori) ... ho dovuto installare un office 2016!


title: Collegamento Ole

author: Marco

text:
Ho scritto una procedura nella quale attivo un componente ole con
CreateObject e memorizzo in excel dei valori e li salvo con SaveAs.
Non riesco pero' a chiudere l'oggetto ole ho provato con Close, Quit nulla
l'oggetto ole mi rimane in memoria.
Uso Access 2.
Qual'č il comando esatto.
Grazie.


title: Perchè non amo compattare i database

author: miconet

text:
Sarà una questione di sfiga ma, tutte le volte che compatto un
database, l'applicazione non funziona più come dovrebbe.
Oggi, per esempio, dovendo azzerare i contatori di numerose tabelle, ho
deciso, per praticità, di usare il metodo della cancellazione dei
record e successivo compattamento del DB.
Non l'avessi mai fatto!
I guai iniziano con l'apertura di una maschera quando appare il
messaggio di memoria insufficiente per il funzionamento di Access.
In un'altra maschera, alla pressione di un pulsante che esegue
un'istruzione SQL, compare un altro messaggio di "errore generico non
gestito".
Addirittura la semplice esecuzione di una query con un banale criterio
di selezione per "testo contenuto" non da il risultato atteso.
Alla fine, dopo aver sbattuto la testa per un'ora a ricercare
l'anomalia che causava i malfunzionamenti, mi sono accorto che una
delle tabelle compattate, all'inserimento del primo record, invece di
assegnargli il n. 1 assegnava il n. 2. Ho così deciso di non perdere
ulteriore tempo e di copiare la struttura delle tabelle dotate di
contatore sostituendole alle vecchie.
Con questo sistema, tutto e ritornato a funzionare come un orologio
svizzero.
In conclusione, per il futuro mi guarderò bene dal compattare un
database se non proprio indispensabile ma mi piacerebbe sapere dal NG
se sono io lo sfigato o se anche altri hanno avuto problemi dopo la
compattazione.
Grazie
Michele


title: Perchè non amo compattare i database

author: Ivan da casa

text:
"miconet" <
michele...@libero.it
> ha scritto nel messaggio
news:1140781808....@u72g2000cwu.googlegroups.com...

No, su compattazione no ... ma in generale, quando le operazioni su una
maschera diventano molte, e magari il codice si allarga... allora SI.
Se vai sul
www.sitocomune.com
 dovresti trovare delle utili indicazioni anche
www.donkarl.com
 ha affrontato l'argomento.
Qualche giorno fa ho usato anche la procedura di /DECOMPILE che dovrebbe
ripulire zone nere (codice e definizioni interne di Access), funziona ma non
mi ha risolto nulla! Unica procedura VALIDA : importare tutto in un bel DB
pulito pulito.
Questa è una mia opinione suffragata dal fatto che per ora è l'unica
soluzione che mi ha dato dei risultati, ma si sà che possiamo modellare
Access in miliardi di modi diversi e quindi i rimedi dovrebbero aggirarsi su
quella cifra.
--
... spero di esserti stato d'aiuto, facci sapere
       \|/\|/\|/
       (@ @)
---o00-(_)-00o----- Ivan


title: Perchè non amo compattare i database

author: MA

text:

credo che quel db fosse corrotto.
Nei miei backup giornalieri non evito mai la compattazione
ed un file di 200MB si riduce in 170MB, mai problemi
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Perchè non amo compattare i database

author: Simone Calligaris

text:
"miconet"
In conclusione, per il futuro mi guarderň bene dal compattare un
database se non proprio indispensabile ma mi piacerebbe sapere dal NG
se sono io lo sfigato o se anche altri hanno avuto problemi dopo la
compattazione.
Sei sfigato, o piů verosimilmente quel DB era danneggiato.
I database di access DEVONO essere compattati regolarmente, pena l'entropia
totale (bloating, prestazioni scadenti).
Se utilizzi JET 4.0, assicurati che sia installato almeno il S.P. 8
Ciao, Simone


title: Perchè non amo compattare i database

text:
Innanzi tutto scusatemi per la poca tempestività delle risposte dovuta
al fatto che (di tanto in tanto) devo anche lavorare. Comunque,
tornando a noi e leggendo le vostre risposte, mi sembra di capire che,
forse, un po' di sfiga ce l'ho a meno che non sia proprio la
compattazione che, in qualche caso, corrompe il database. Circa la
necessità di compattare periodicamente i DB, a parte lo sfogo per il
tempo perso, sono d'accordo con voi anche perchè utilizzo un DB che è
ormai arrivato alla dimensione di 1,2 Gb (quasi 5 milioni di record) e
senza la compattazione, avrei già raggiunto il limite massimo anche se
(tra una compattazione e l'altra) mi si è già danneggiato 3 volte.
Ciao
Michele


title: Perchè non amo compattare i database

author: Sergio MAZZA

text:
"miconet" <
michele...@libero.it
> ha scritto nel messaggio
news:1140791710....@v46g2000cwv.googlegroups.com...

[risposta]
Non hai detto se hai diviso l'mdb in FE e BE e se lo compatti da rete o in
locale...
Ciao.
--
Sergio MAZZA


title: Perchè non amo compattare i database

text:
>Non hai detto se hai diviso l'mdb in FE e BE e se lo compatti da rete o in
>locale...
L'mdb è diviso e il BE viene compattato da rete.
Ciao
Michele


title: Perchè non amo compattare i database

text:
"miconet" <
michele...@libero.it
> ha scritto nel messaggio
news:1140793506.3...@i39g2000cwa.googlegroups.com...
L'mdb è diviso e il BE viene compattato da rete.
Ciao
Michele
[risposta]
Si corrompe anche se lo compatti in locale?
Ciao.
--
Sergio MAZZA


title: Perchè non amo compattare i database

text:
>Si corrompe anche se lo compatti in locale?
Non ho provato.
Non posso farlo subito ma proverò e ti farò sapere.
Grazie
Ciao
Michele


title: evento: su non in elenco

author: Maurizio

text:
Salve a tutti, mi permetto di postare per chiedere un chiarimento riguardo
all'esempio ed all'implementazione dell'esempio scaricato dal sito, in
quanto mi è sorto un dubbio, in quanto se io ho una tabella con id_Cliente
Cognome;Nome;Via;CAP;Città;Prov ecc.. e se nella combo inserisco un nome
questa mi controlla se è già presente o meno ed eventualmente lo inserisce
fin qui tutto ok, però il problema che mi sono posto è questo:
ammettiamo che io abbia già inserito dei Cognomi con GIALLOe i nomi come
CANARINO, ORO,  e se volessi inserire anche GIALLO con Nome OCRA, come
faccio a fargli capire che il nome non esiste??
So che molti sorrideranno, ma io non che pesci pescare ed in attesa di un
chiarimento
Maurizio
--
togli NOSPAM per rispondere


title: evento: su non in elenco

author: smark

text:
nella casella combinata usi una query costruita come Espr1: [COGNOME]& ' '
&[NOME]
e nell'evento
DLookup("[COGNOME]& ' ' &[NOME]", "NOME_TABELLA", "[COGNOME]&' '&[NOME+ =
""" & VAR & """")
nb. VAR è la variabile passata come string alla funzione dlookup
"Maurizio" <cal...@SPAMlibero.it> ha scritto nel messaggio
news:qDPF9.37907$3l.10...@twister1.libero.it...



title: evento: su non in elenco

text:
mi correggo....
DLookup("[COGNOME]& ' ' &[NOME]", "NOME_TABELLA", "[COGNOME]&' '&[NOME] ="""
& VAR & """")
"smark" <
sm...@libero.it
> ha scritto nel messaggio
news:HWPF9.39381$2B1.1...@twister2.libero.it...



title: campi TIME in Access e MySql - sommare le ore

text:
Ho un problema di conversione campi di tipo "ora" tra Access e MySql
(tabelle collegate via MyOdbc). Questo è il problema (relativamente
all'esempio qui sotto): il campo 'ritardo' è un campo di tipo Time
nella tabella MySql, ma Access lo definisce Data/ora. Quando con la
formula seguente tento di ottenere la somma dei ritardi, superiori o no
alle 24 ore, ottengo numeri strani tipo 264000, 76000, e così via. La
stessa formula funziona perfettamente, anche per numeri superiori alle
24 ore, se la tabella non è collegata da MySql ma una tabella di
Access.
Ecco la formula che uso nella query (o nel controllo sulla maschera)
ritTot: Fix(Somma([ritardo])*24) & "." &
Right(Format(Somma([ritardo]);"Ora breve 24h");2)
Qualcuno sa come posso farla funzionare anche con tabelle MySql
collegate da MyOdbc?
Grazie!
Antonello


title: export da report a html possibile un solo file?

author: `偕廾 SPEC }內躬

text:
buongiorno
ho un listino, è un report di 21 pagine, mi servirebbe esportarlo in un solo
file: listino.html   invece mi fà listino1.html listino2.html ecc ... Nel
report ho tolto il piè di pagina ma la situazione non è cambiata. Andrebbe
bene anche in export rtf anche se il logo e le parti grafiche spariascono
peccato, questo si è un solo file ma aprendolo noto che cambia la
formattazione forse invece la spaziatura e anche lui mette 21 interruzioni
di pagina ritrovandomi il terzo inferiore della pagina vuoto potrei
modificarlo a mano ma vorrei fare invece con il file esportato un comando
SendObject in luogo di OutputTo per spedirlo direttamente a chi mi chiede il
listino Grazie per l'eventuale risposta


author: Roberto dalla campagna

text:
`°º¤{ SPEC }¤º°` <
un...@37.com
> wrote in message
bitk89$306$1...@lacerta.tiscalinet.it...

Hai provato ad usare il  metodo SendObject con il formato snapshot?
Oppure crea con il report un file PDF che poi invierai come allegato di un
messaggio e-mail.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
"Roberto dalla campagna" <
r.ma...@libero.it
> ha scritto nel messaggio
news:2YE4b.280911$lK4.8...@twister1.libero.it...

grazie roberto , per il pdf ti cito <Oppure crea con il report un file PDF>
e come fare ?
il mio obiettivo è fare al volo report to pdf   senza lavorarci su e poi
faro' il SendTo mail
saluti
SPec


text:
`°º¤{ SPEC }¤º°` <
un...@37.com
> wrote in message
bj2fdt$2hv$1...@lacerta.tiscalinet.it...

Installa sul tuo computere una stampante virtuale PDF; se imposti come
stampante predefinita tale stampante, quando eseguirai il report esso invece
che un tabulato sulla stampante di sistema ti crerà un file PDF che invierai
per email nel modo che ritieni più opportuno.
Una stampante PDF puoi installarla con Acrobat Writer che però costa
soldini; ci sono però anche soluzioni free: le trovi cercando su Google nei
messaggi precedenti di questo NG ed usando come chiave di ricerca la parola
PDF.
> il mio obiettivo è fare al volo report to pdf   senza lavorarci su e poi
> faro' il SendTo mail
> saluti
>
> SPec
--



text:
"Roberto dalla campagna" <
r.ma...@libero.it
> ha scritto nel messaggio
news:bZ35b.285490$Ny5.8...@twister2.libero.it...

Grazie tante Roberto per le risposte e dato che non sono troppo pratico con
le news
devo averti mandato questo messaggio anche sulla tua posta privata scusa per
lo spamming
Saluti SPec


text:
`偕廾 SPEC }內躬 <
un...@37.com
> wrote in message
bj2sq4$ah5$1...@lacerta.tiscalinet.it...
[CUT]
> >
> Grazie tante Roberto per le risposte e dato che non sono troppo pratico
con
> le news
> devo averti mandato questo messaggio anche sulla tua posta privata scusa
per
> lo spamming
No problem. :)
> Saluti SPec



title: datepart fa quel che vuole?

author: Ammammata

text:
rif.
https://www.techonthenet.com/access/functions/date/datepart.php

ho creato una tabella con qualche data
poi la query che calcola la settimana

Week: DatePart("ww";[DateCasuali]![Field1];2;2)

il primo 2 dice che la settimana inizia al lunedě
il secondo 2 specifica "Use the first week in the year that has at least 4
days"

premesso questo mi aspetto che LUNEDĚ 30 DICEMBRE 2019 faccia parte della
settimana UNO del 2021

ID	Field1	Week
1	28/12/2019	52
2	30/12/2019	53
3	31/12/2019	1
4	02/01/2020	1
5	05/01/2020	1
6	30/12/2020	53
7	31/12/2020	53
8	01/01/2021	53
9	30/12/2021	52
10	31/12/2021	52
11	02/01/2022	52
12	30/12/2024	1
13	31/12/2024	1
14	01/01/2025	1
15	03/01/2025	1

perché mi calcola 53? che non esiste quest'anno...

lo dice anche qui:
https://www.epochconverter.com/it/settimane/2019

Questa pagina elenca tutte le settimane nel 2019.
Ci sono 52 settimane nel 2019.
Tutte le settimane sono a partire da Lunedi e
termina la Domenica (ISO-8601).

--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
-=- -=- -=- -=- -=- -=- -=- -=- - -=-
>>>>>
http://www.bb2002.it
 :)  <<<<<
........... [ al lavoro ] ...........


title: datepart fa quel che vuole?

author: RobertoA

text:
Il 31/10/2019 10:39, Ammammata ha scritto:
> rif.
https://www.techonthenet.com/access/functions/date/datepart.php

>
> ho creato una tabella con qualche data
> poi la query che calcola la settimana
>
> Week: DatePart("ww";[DateCasuali]![Field1];2;2)
>
> il primo 2 dice che la settimana inizia al lunedì
> il secondo 2 specifica "Use the first week in the year that has at least 4
> days"
>
> premesso questo mi aspetto che LUNEDÌ 30 DICEMBRE 2019 faccia parte della
> settimana UNO del 2021
>
> ID	Field1	Week
> 1	28/12/2019	52
> 2	30/12/2019	53
> 3	31/12/2019	1
> 4	02/01/2020	1
> 5	05/01/2020	1
> 6	30/12/2020	53
> 7	31/12/2020	53
> 8	01/01/2021	53
> 9	30/12/2021	52
> 10	31/12/2021	52
> 11	02/01/2022	52
> 12	30/12/2024	1
> 13	31/12/2024	1
> 14	01/01/2025	1
> 15	03/01/2025	1
>
> perché mi calcola 53? che non esiste quest'anno...
>
> lo dice anche qui:
>
https://www.epochconverter.com/it/settimane/2019

>
> Questa pagina elenca tutte le settimane nel 2019.
> Ci sono 52 settimane nel 2019.
> Tutte le settimane sono a partire da Lunedi e
> termina la Domenica (ISO-8601).
>

La 'settimana' di DatePart e la 'settimana' Iso8601 sono cose diverse


title: datepart fa quel che vuole?

text:
Il 31/10/2019 10:39, Ammammata ha scritto:
> rif.
https://www.techonthenet.com/access/functions/date/datepart.php

>
> ho creato una tabella con qualche data
> poi la query che calcola la settimana
>
> Week: DatePart("ww";[DateCasuali]![Field1];2;2)
>
> il primo 2 dice che la settimana inizia al lunedì
> il secondo 2 specifica "Use the first week in the year that has at least 4
> days"
>
> premesso questo mi aspetto che LUNEDÌ 30 DICEMBRE 2019 faccia parte della
> settimana UNO del 2021
>
> ID	Field1	Week
> 1	28/12/2019	52
> 2	30/12/2019	53
> 3	31/12/2019	1
> 4	02/01/2020	1
> 5	05/01/2020	1
> 6	30/12/2020	53
> 7	31/12/2020	53
> 8	01/01/2021	53
> 9	30/12/2021	52
> 10	31/12/2021	52
> 11	02/01/2022	52
> 12	30/12/2024	1
> 13	31/12/2024	1
> 14	01/01/2025	1
> 15	03/01/2025	1
>
> perché mi calcola 53? che non esiste quest'anno...
>
> lo dice anche qui:
>
https://www.epochconverter.com/it/settimane/2019

>
> Questa pagina elenca tutte le settimane nel 2019.
> Ci sono 52 settimane nel 2019.
> Tutte le settimane sono a partire da Lunedi e
> termina la Domenica (ISO-8601).
>
>
>
Ciapa ki

http://www.cpearson.com/excel/DateTimeVBA.htm


title: datepart fa quel che vuole?

text:
Se vuoi, io mi ero fatto questa funzione, in quanto il calcolo della Settimana è affetto da Bug.

Public Function Date2Week(Optional ByVal dtmDate As Variant) As Byte
    ' ------------------------------------------------------
    ' Calcolo formato ISO 8601:1988 standard
    ' Verificati i casi da KB [OK]
    '
https://support.microsoft.com/it-it/kb/200299

    ' ------------------------------------------------------
    Dim ret              As Byte

    ret = Format(dtmDate, "ww", vbMonday, vbFirstFourDays)
    If ret > 52 Then
      If Format(dtmDate + 7, "ww", vbMonday, vbFirstFourDays) = 2 Then ret = 1
    End If
    Date2Week = ret
End Function

@Alex


title: datepart fa quel che vuole?

text:
Il giorno Thu 31 Oct 2019 12:01:22p, *@Alex* ha inviato su
it.comp.appl.access il messaggio news:85784221-0845-44a8-be33-
ed5f68...@googlegroups.com
. Vediamo cosa ha scritto:

> il calcolo della Settimana è affetto da Bug

ok, questo basta e avanza... anche se, dico io che uso la 2010, ora della
2019 lo potrebbero aver corretto no? sono solo 9 anni di sviluppo (nei
quali hanno aggiunto tanti colori, tante icone belle a vedersi, tanti
effetti speciali come la selezione che si sposta fluidamente con moto
continuo dalla cella di partenza a quella su cui ho cliccato...)



title: datepart fa quel che vuole?

text:
Il giorno Thu 31 Oct 2019 11:59:48a, *RobertoA* ha inviato su
it.comp.appl.access il messaggio news:qpedtq$1bl7$
1...@gioia.aioe.org
. Vediamo
cosa ha scritto:

>
> La 'settimana' di DatePart e la 'settimana' Iso8601 sono cose diverse
>

non lo metto in dubbio: la settimana ISO č uno standard con precise
indicazioni su come calcolarla, la settimana di datepart ha due parametri
per ottenere quello che uno preferisce

ma se in datepart imposto i parametri validi per la settimana ISO mi
aspetto di ottenere lo stesso risultato

poi vai a scoprire che č una funzione bacata... e pazienza



title: datepart fa quel che vuole?

text:
Il giorno Thu 31 Oct 2019 10:39:46a, *Ammammata* ha inviato su
it.comp.appl.access il messaggio
news:XnsAAF96C7A7EC7Eam...@148.251.67.112
. Vediamo cosa ha
scritto:

>
> Week: DatePart("ww";[DateCasuali]![Field1];2;2)
>
>

e poi vado a scoprire che anche Microsoft SQL Server Management Studio fa
quello che gli pare sebbene abbia impostato correttamente i parametri di
sistema

select DocDueDate, datepart(wk,DocDueDate) from OPOR

2019-12-09   	50
2019-10-31   	44
2019-12-30   	53 <<<
2019-12-02   	49



title: datepart fa quel che vuole?

text:
Il 31/10/2019 14:02, Ammammata ha scritto:
> Il giorno Thu 31 Oct 2019 11:59:48a, *RobertoA* ha inviato su
> it.comp.appl.access il messaggio news:qpedtq$1bl7$
1...@gioia.aioe.org
. Vediamo
> cosa ha scritto:
>
>>
>> La 'settimana' di DatePart e la 'settimana' Iso8601 sono cose diverse
>>
>
> non lo metto in dubbio: la settimana ISO è uno standard con precise
> indicazioni su come calcolarla, la settimana di datepart ha due parametri
> per ottenere quello che uno preferisce
>
> ma se in datepart imposto i parametri validi per la settimana ISO mi
> aspetto di ottenere lo stesso risultato
>
> poi vai a scoprire che è una funzione bacata... e pazienza
>

E quali sarebbero "..i parametri validi per la settimana ISO.." ?


title: datepart fa quel che vuole?

text:
Il giorno Thu 31 Oct 2019 04:03:20p, *RobertoA* ha inviato su
it.comp.appl.access il messaggio news:qpes6e$1em2$
1...@gioia.aioe.org
. Vediamo
cosa ha scritto:

>
> E quali sarebbero "..i parametri validi per la settimana ISO.." ?
>
>

At ISO 8601 - Wikipedia
https://it.wikipedia.org/wiki/ISO_8601

La settimana 01 dell'anno č definita come (sono tutte equivalenti):

    la settimana che contiene il primo giovedě dell'anno,
    la settimana che contiene il 4 gennaio,
    la prima settimana che contiene quattro, o piů, giorni del nuovo anno,
    la settimana che inizia con il lunedě fra il 29 dicembre e il 4
gennaio,
    se il 1ş gennaio č un lunedě, martedě, mercoledě o giovedě allora č
nella settimana 01. Se capita di venerdě, sabato o domenica allora č
nell'ultima settimana (la 52 o 53) dell'anno precedente.

Il numero della settimana puň essere calcolato contando i giovedě: la
settimana 12 contiene il dodicesimo giovedě dell'anno.



title: datepart fa quel che vuole?

text:
Il 31/10/2019 16:11, Ammammata ha scritto:
> Il giorno Thu 31 Oct 2019 04:03:20p, *RobertoA* ha inviato su
> it.comp.appl.access il messaggio news:qpes6e$1em2$
1...@gioia.aioe.org
. Vediamo
> cosa ha scritto:
>
>>
>> E quali sarebbero "..i parametri validi per la settimana ISO.." ?
>>
>>
>
> At ISO 8601 - Wikipedia
>
https://it.wikipedia.org/wiki/ISO_8601

>
> La settimana 01 dell'anno è definita come (sono tutte equivalenti):
>
>      la settimana che contiene il primo giovedì dell'anno,
>      la settimana che contiene il 4 gennaio,
>      la prima settimana che contiene quattro, o più, giorni del nuovo anno,
>      la settimana che inizia con il lunedì fra il 29 dicembre e il 4
> gennaio,
>      se il 1º gennaio è un lunedì, martedì, mercoledì o giovedì allora è
> nella settimana 01. Se capita di venerdì, sabato o domenica allora è
> nell'ultima settimana (la 52 o 53) dell'anno precedente.
>
> Il numero della settimana può essere calcolato contando i giovedì: la
> settimana 12 contiene il dodicesimo giovedì dell'anno.
>

Si la conosco bene la definizione di 'numero della settimana' secondo lo
standard Iso8601, tutti gli agricoltori/vivaisti lavorano seguendo un
calendario fatto in quel modo
Ma non mi hai risposto sulla tua affermazione

"...se in datepart imposto i parametri validi per la settimana ISO.."

e quali sarebbero i parametri per la settimana Iso in DatePart?
Non ci sono
Quello che voglio dire e' che se nella descrizione della funzione
DatePart la Microsoft non accenna all'Iso8601, allora ti restituisce
diciamo la 'settimana' Microsoft
Non e' la funzione che sbaglia ma sbagli tu a pensare che ti restituisca
la 'settimana' iso8601


title: datepart fa quel che vuole?

author: Bruno Campanini

text:
After serious thinking Ammammata wrote :
> rif.
https://www.techonthenet.com/access/functions/date/datepart.php

>
> ho creato una tabella con qualche data
> poi la query che calcola la settimana
>
> Week: DatePart("ww";[DateCasuali]![Field1];2;2)
>
> il primo 2 dice che la settimana inizia al lunedì
> il secondo 2 specifica "Use the first week in the year that has at least 4
> days"
>
> premesso questo mi aspetto che LUNEDÌ 30 DICEMBRE 2019 faccia parte della
> settimana UNO del 2021
>
> ID	Field1	Week
> 1	28/12/2019	52
> 2	30/12/2019	53
Già ma allora dei LUN nel 2019 ce ne sarebbero solo 51.

> [...]
Considerando LUN l'inizio settimana il 2019 di settimane
intere ne contiene 51, dal 7/1 al 29/12, più 6 giorni
iniziali e 2 finali.
Di lunedì pertanto ce ne stanno 51 + 1 al 30/12.

Ora si può definire quale delle due parti componenti
gli 8 giorni costituisca, per convenzione,
la 52-esima settimana.
La prima di 6 giorni o la seconda di due giorni?
Diciamo la prima, scegliere la seconda di 2 giorni fa ridere.
Beh allora LUN 30/12/19 appartiene solo a 51 settimane.
Perché appartenga a 52 settimane occorre considerare
la 52-esima settimana quella dal 30/12 a 31/12:
il che non fa ridere, fa piangere.

Quanto sopra per dire che chiedersi a quale settimana
appartiene un giorno può a volte generare
ambiguità in rapporto alla logica dei fatti.
Se poi si voglia, senza ambiguità, definire le date
e gli ordinali di un giorno...
=====================================
Private Sub Command18_Click()
Dim StartDate As Date, EndDate As Date
Dim i As Date, Anno As Integer, k As Byte

Anno = 2019
StartDate = "1/1/" & Anno
EndDate = "31/12/" & Anno

' DOM=1, LUN=2, etc
For i = StartDate To EndDate
    If Weekday(i) = 2 Then
        k = k + 1
        MsgBox k & "  -  " & i
    End If
Next

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

Bruno


title: datepart fa quel che vuole?

text:
Il giorno Thu 31 Oct 2019 04:57:05p, *RobertoA* ha inviato su
it.comp.appl.access il messaggio news:qpevb6$1tvu$
1...@gioia.aioe.org
. Vediamo
cosa ha scritto:

> Ma non mi hai risposto sulla tua affermazione
>
> "...se in datepart imposto i parametri validi per la settimana ISO.."
>
>

ohibò...

nel mio post di apertura ho scritto:

Week: DatePart("ww";[DateCasuali]![Field1];2;2)

il primo 2 dice che la settimana inizia al lunedì
il secondo 2 specifica "Use the first week in the year that has at least 4
days"

che sono i parametri ISO:
la settimana che inizia con il lunedì fra il 29 dicembre e il 4
gennaio,

a te la parola



title: datepart fa quel che vuole?

text:
Il giorno Thu 31 Oct 2019 11:49:18p, *Bruno Campanini* ha inviato su
it.comp.appl.access il messaggio news:qpfodb$1iq5$
1...@gioia.aioe.org
. Vediamo
cosa ha scritto:

> Già ma allora dei LUN nel 2019 ce ne sarebbero solo 51.
>

infatti il lunedì della prima settimana ISO dell'anno 2020 è ancora nel
2019

apprezzo molto i vostri suggerimenti per ottenere il risultato corretto con
artifici vari e codice vba, la "polemica" era nata in ambiente SAP SQL dove
in MSSMS il comando datepart sbaglia la settimana

motivo (del supporto SAP): l'esercizio 2019 è stato configurato già
all'inizio con la settimana sbagliata per cui per il 2019 ne abbiamo 53

ribatto che della configurazione di SAP a SQL non dovrebbe fregare meno di
niente e che il calcolo della settimana dovrebbe essere di default quello
ISO

etc etc

per adesso nelle stampe con consegna 30 e 31 dicembre esce settimana 53 e
me la devo tenere (a meno di strusare sul report e infilarci un bel if year
=2019 and week=53 then week=1 end if)



title: datepart fa quel che vuole?

text:
Salve,

Ammammata ha scritto:
>  *@Alex* ha inviato...
>
>> il calcolo della Settimana è affetto da Bug
>
> ok, questo basta e avanza... anche se, dico io che uso la 2010, ora della
> 2019 lo potrebbero aver corretto no? sono solo 9 anni di sviluppo
> ...

9 anni? Ma no, è sul mio sito da ca. 20 anni
(
http://www.donkarl.com/it?FAQ2.25
). ;-) Il bug è così vecchio che nel
frattempo persino hanno tolto tutta la KB con l'articolo corrispondente:

https://web.archive.org/web/20060510232309/http:/support.microsoft.com/?kbid=200299

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

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


title: datepart fa quel che vuole?

text:
Il 04/11/2019 12:00, Ammammata ha scritto:
> Il giorno Thu 31 Oct 2019 04:57:05p, *RobertoA* ha inviato su
> it.comp.appl.access il messaggio news:qpevb6$1tvu$
1...@gioia.aioe.org
. Vediamo
> cosa ha scritto:
>
>> Ma non mi hai risposto sulla tua affermazione
>>
>> "...se in datepart imposto i parametri validi per la settimana ISO.."
>>
>>
>
> ohibò...
>
> nel mio post di apertura ho scritto:
>
> Week: DatePart("ww";[DateCasuali]![Field1];2;2)
>
> il primo 2 dice che la settimana inizia al lunedì
> il secondo 2 specifica "Use the first week in the year that has at least 4
> days"
>
> che sono i parametri ISO:
> la settimana che inizia con il lunedì fra il 29 dicembre e il 4
> gennaio,
>
> a te la parola
>

Ah, non conoscevo l'esistenza di quel vbFirstFourDays
Eh gia' in questo caso la 'settimana' Microsoft dovrebbe coincidere con
la definizione dell'Iso8601
Eallora la funzione e' fallata


title: datepart fa quel che vuole?

text:

Da cui la Funzione che suggerivo all'inizio.

@Alex


title: datepart fa quel che vuole?

text:
Karl Donaubauer ha scritto:
> ...
> Ammammata ha scritto:
>>  *@Alex* ha inviato...
>>
>>> il calcolo della Settimana è affetto da Bug
>>
>> ok, questo basta e avanza... anche se, dico io che uso la 2010, ora della
>> 2019 lo potrebbero aver corretto no? sono solo 9 anni di sviluppo
>> ...
>
> 9 anni? Ma no, è sul mio sito da ca. 20 anni
> (
http://www.donkarl.com/it?FAQ2.25
). ;-) Il bug è così vecchio che nel
> frattempo persino hanno tolto tutta la KB con l'articolo corrispondente:
>
>
https://web.archive.org/web/20060510232309/http:/support.microsoft.com/?kbid=200299

L'ho discusso con la gente adeguata e finalmente richiesto un fix o
perlomeno la restituzione/attualizzazione dell'articolo sul bug.

Vedremo... forse già nei prossimi 9 anni qualcosa succederà a causa di
questo reclamo in icaa. ;-)



title: datepart fa quel che vuole?

text:
Il 05/11/2019 16:42, Karl Donaubauer ha scritto:
> Karl Donaubauer ha scritto:
>> ...
>> Ammammata ha scritto:
>>>  *@Alex* ha inviato...
>>>
>>>> il calcolo della Settimana è affetto da Bug
>>>
>>> ok, questo basta e avanza... anche se, dico io che uso la 2010, ora
>>> della
>>> 2019 lo potrebbero aver corretto no? sono solo 9 anni di sviluppo
>>> ...
>>
>> 9 anni? Ma no, è sul mio sito da ca. 20 anni
>> (
http://www.donkarl.com/it?FAQ2.25
). ;-) Il bug è così vecchio che nel
>> frattempo persino hanno tolto tutta la KB con l'articolo corrispondente:
>>
>>
https://web.archive.org/web/20060510232309/http:/support.microsoft.com/?kbid=200299

>
>
> L'ho discusso con la gente adeguata e finalmente richiesto un fix o
> perlomeno la restituzione/attualizzazione dell'articolo sul bug.
>
> Vedremo... forse già nei prossimi 9 anni qualcosa succederà a causa di
> questo reclamo in icaa. ;-)
>

".. gente adeguata.."
Visto che ci sei, mettici una buona parola per lo zoom su form e report,
per le web form, e last but not least per il compilatore in codice
nativo, cosi' i delphiniani la smettono di rompere


title: datepart fa quel che vuole?

text:
Salve,

Robertoa ha scritto:
> ... per lo zoom su form e report,

Se intendi

https://access.uservoice.com/forums/319956-access-desktop-application/suggestions/10129548-zoom-design-view-for-forms-reports-and-form-vi

è già "reviewed for future consideration"... pero solo da 2015, puo
ancora durare.

> per le web form

Mai più.
https://www.linkedin.com/pulse/its-right-deprecate-awa-karl-donaubauer/

>, e last but not least per il compilatore in codice nativo

Un progetto solo per il 1 Aprile.

 > cosi' i delphiniani la smettono di rompere

Non smetteranno mai, ma non importano.



title: datepart fa quel che vuole?

text:
Il giorno Tue 05 Nov 2019 04:59:38p, *RobertoA* ha inviato su
it.comp.appl.access il messaggio news:qps699$13nn$
1...@gioia.aioe.org
. Vediamo
cosa ha scritto:

> Visto che ci sei, mettici una buona parola per lo zoom su form e report,
>

+1000000000



title: datepart fa quel che vuole?

text:
Il 06/11/2019 08:40, Ammammata ha scritto:
> Il giorno Tue 05 Nov 2019 04:59:38p, *RobertoA* ha inviato su
> it.comp.appl.access il messaggio news:qps699$13nn$
1...@gioia.aioe.org
. Vediamo
> cosa ha scritto:
>
>> Visto che ci sei, mettici una buona parola per lo zoom su form e report,
>>
>
> +1000000000
>

Dai desideri di una persona, si potrebbe dedurne l'eta'
Quelli che vogliono zoomare, sono sopra gli 80   8-)
(oppure sono stati accecati dai raggi B alle porte di Tanhauser)


title: datepart fa quel che vuole?

text:
Karl Donaubauer ha scritto:
> ...
> L'ho discusso con la gente adeguata e finalmente richiesto un fix o
> perlomeno la restituzione/attualizzazione dell'articolo sul bug.

Almeno la documentazione è già stata attualizzata:
https://docs.microsoft.com/en-us/office/troubleshoot/access/functions-return-wrong-week-number




title: datepart fa quel che vuole?

text:
Il giorno Wed 06 Nov 2019 10:05:04a, *RobertoA* ha inviato su
it.comp.appl.access il messaggio news:qpu1g3$18ih$
1...@gioia.aioe.org
. Vediamo
cosa ha scritto:

> Quelli che vogliono zoomare, sono sopra gli 80   8-)
>

è sufficiente essere sopra i 40 ;) ma quando pensi che lo zoom lo hanno
fatto per tutti gli altri programmi (excel, word, powerpoint, etc) allora
basta essere un essere senziente e domandarsi perché pnmmb non lo fanno
anche per access... e non mi dire che c'è quella zreqn di programma di
Magnifier incorporato in windows... chi ne parla bene è perché non lo ha
mai usato seriamente: è passabile per fare uno zoom su qualcosa di piccolo
da LEGGERE, ma non ha niente a che fare con chi deve posizionare oggetti o
ridimensionarli in un form o un report



title: datepart fa quel che vuole?

text:
Karl Donaubauer submitted this idea :
> Karl Donaubauer ha scritto:
>> ...
>> L'ho discusso con la gente adeguata e finalmente richiesto un fix o
>> perlomeno la restituzione/attualizzazione dell'articolo sul bug.
>
> Almeno la documentazione è già stata attualizzata:
>
https://docs.microsoft.com/en-us/office/troubleshoot/access/functions-return-wrong-week-number

A me sembra una gran complicazione, ovvero non ho capito niente.

Anno 2018: 1/1 = LUN,   31/12 = LUN,  LUN appare 53 volte,
in ogni anno non bisestile il giorno 1/1 è lo stesso del
giorno 31/12.
Quindi la regola dei 4 giorni si applica sia sui primi 4 di
gennaio che sugli ultimi 4 di dicembre?

Allora se il giorno 53 si trova nei primi quattro dell'anno,
l'ultimo sarà negli ultimi 3 di fine anno e perciò questo
si considerà il primo dell'anno futuro.
Se si trova negli ultimi 4 dell'anno in corso allora si troverà
anche nei primi 3 di gennaio e perciò quest'ultimo sarà attribuito
all'anno passato.
Non credo ci vogliano pagine di codice per definire ciò.

Dico bene o sbaglio?

Bruno


title: datepart fa quel che vuole?

text:
Il giorno Sun 10 Nov 2019 04:53:09a, *Bruno Campanini* ha inviato su
it.comp.appl.access il messaggio news:qq81j3$19tr$
1...@gioia.aioe.org
. Vediamo
cosa ha scritto:

> Quindi la regola dei 4 giorni si applica sia sui primi 4 di
> gennaio che sugli ultimi 4 di dicembre?
>

definita la settimana in modo che il lunedě sia il *primo* giorno, essa
appartiene all'anno dove ci sono piů giorni: per questo motivo si guarda
dov'č il giovedě

se č 28-29-30-31 appartiene all'anno prima
se č 1-2-3-4 appartiene all'anno dopo



title: datepart fa quel che vuole?

text:
on 11-11-19, Ammammata supposed :
> Il giorno Sun 10 Nov 2019 04:53:09a, *Bruno Campanini* ha inviato su
> it.comp.appl.access il messaggio news:qq81j3$19tr$
1...@gioia.aioe.org
. Vediamo
> cosa ha scritto:
>
>> Quindi la regola dei 4 giorni si applica sia sui primi 4 di
>> gennaio che sugli ultimi 4 di dicembre?
>>
>
> definita la settimana in modo che il lunedì sia il *primo* giorno, essa
> appartiene all'anno dove ci sono più giorni: per questo motivo si guarda
> dov'è il giovedì
>
> se è 28-29-30-31 appartiene all'anno prima
> se è 1-2-3-4 appartiene all'anno dopo

Il ragionamento è corretto, io sto pensando, ancora non vi ho messo
mano, di utilizzarlo partendo dall'inizio anno.

Definita la settimana LUN-DOM, se il primo LUN è nei primo 4 giorni
di gennaio, supponiamo il 3/1, il MIO ANNO di rifferimento sarà
dal 3/1 al 3/1+364 (o 365 se bisestile).

Analogamente, se il primo LUN appartiene all'anno precedente,
supponiamo al 28/12, il MIO ANNO di riferimento sarà
dal 28/12 al 28/12+364 (o 365 se bisestile).

Fatto ciò, alla faccia di DatePart, eseguo una scansione
sul MIO ANNO e trovo tutto quello che voglio.

Bruno


title: datepart fa quel che vuole?

text:
Bruno Campanini explained :

> Il ragionamento è corretto, io sto pensando, ancora non vi ho messo
> mano, di utilizzarlo partendo dall'inizio anno.
>
> Definita la settimana LUN-DOM, se il primo LUN è nei primo 4 giorni
> di gennaio, supponiamo il 3/1, il MIO ANNO di rifferimento sarà
> dal 3/1 al 3/1+364 (o 365 se bisestile).
>
> Analogamente, se il primo LUN appartiene all'anno precedente,
> supponiamo al 28/12, il MIO ANNO di riferimento sarà
> dal 28/12 al 28/12+364 (o 365 se bisestile).
>
> Fatto ciò, alla faccia di DatePart, eseguo una scansione
> sul MIO ANNO e trovo tutto quello che voglio.

Errara corrige:

MIO ANNO sarà unicamnte composto di 52 settimane pari a
52 * 7 = 364 giorni, quindi in ogni caso dall'inizio anno
come sopra determinato fino a inizio + 363.
Salvo ulteriori ripensamenti in fase di realizzazione.

Bruno


title: datepart fa quel che vuole?

text:
Il giorno Mon 11 Nov 2019 01:00:21p, *Bruno Campanini* ha inviato su
it.comp.appl.access il messaggio news:qqbigk$1ap5$
1...@gioia.aioe.org
. Vediamo
cosa ha scritto:

> Il ragionamento è corretto, io sto pensando

anche io ho dovuto pensare e ho partorito questo :)

textBox162.Value = ""

' replacement with variables
Dim DT_Year As String = ld.QueryData("select datepart(year,'" +
ld.Date(Document("DocDueDate"),"yyyyMMdd") + "')")
Dim DT_Week As String = ld.QueryData("select datepart(wk,'" +
ld.Date(Document("DocDueDate"),"yyyyMMdd") + "')")

If DT_Year = "2019" And DT_Week = "53" Then DT_Week = "01"

textBox162.Value = GetData("LD.Txt.T0003615") + " " + DT_Week

con la segreta speranza che alla prossima occasione nel 2024 mammasoft
abbia fatto le dovute correzioni al codice per avere la settimana giusta



title: datepart fa quel che vuole?

text:
Ammammata formulated on Monday :

Ti va di provare questo?
È appaena uscito dal forno... ancora caldo... sperimentazione minima.

=======================================================
Private Sub Command0_Click()
Dim DateIni As Date, WKD(1 To 7) As String
Dim WeekNum As Byte, i, h

WKD(1) = "LUN": WKD(2) = "MAR": WKD(3) = "MER"
WKD(4) = "GIO": WKD(5) = "VEN": WKD(6) = "SAB": WKD(7) = "DOM"
For i = 1 To 4
    If Weekday(CDate(i & "/1/" & Year(Data)), vbMonday) = Weekday(Data,
vbMonday) Then
        DateIni = CDate(i & "/1/" & Year(Data))
        MsgBox DateIni
        Exit For
    End If
Next
If Not DateIni Then
    For i = 0 To 2
        If Weekday(CDate(31 - i & "/12/" & Year(Data) - 1), vbMonday) =
Weekday(Data, vbMonday) Then
            DateIni = CDate(31 - i & "/12/" & Year(Data) - 1)
            Exit For
        End If
    Next
End If
h = 1
For i = 0 To 363
    If i Mod 7 = 0 Then h = h + 1
    If DateAdd("d", i, DateIni) = [Data] Then
        MsgBox "52 integer Weeks" & vbCrLf & _
        DateIni & "   " & WKD(Weekday([Data], vbMonday)) & vbTab & _
        DateAdd("d", 363, DateIni) & vbTab & WKD(Weekday(DateAdd("d",
363, DateIni), vbMonday)) & _
        vbCrLf & vbLf & _
        "Day" & vbTab & i & vbCrLf & _
        "Week" & vbTab & h & vbCrLf & _
        "WeekDay  " & WKD(Weekday([Data], vbMonday))
    End If
Next
End Sub
==================================================

Access 2019, Form con un campo [Data], di nome e di fatto.

Bruno


title: datepart fa quel che vuole?

text:
Il giorno Mon 11 Nov 2019 08:22:01p, *Bruno Campanini* ha inviato su
it.comp.appl.access il messaggio news:qqccco$17un$
1...@gioia.aioe.org
. Vediamo
cosa ha scritto:

> Ti va di provare questo?
> È appaena uscito dal forno... ancora caldo... sperimentazione minima.
>

al momento non mi bisogna in nessuna applicazione access (1), diciamo che
il thread è partito su questo gruppo in quanto avevo sottomano anche questo
programma (access) per fare delle prove
in realtà mi serve in ambiente SAP Business One & SQL

(1) or ora mi sovviene che in access ho una stampa che divide gli ordini
per settimana, vado a cercare la function che lo sviluppatore si è
inventato una ventina di anni fa...

Public Function We(X As Variant) As Long
We = Val(Format(X, "ww", vbMonday, vbFirstFourDays))
End Function

temo sia fallata... farò qualche esperimento in ambiente di test...



title: Richiesta PWD all'avviamento su tabelle ODBC collegate via codice

author: marcopio

text:
Salve,
ho un'applicazione dove collego le tabelle ODBC via codice ad un Ms
SQLServer usando una stringa di connessione del tipo:
strConn = "ODBC;DSN=MyDNS;UID=MyUID;PWD=MyPWDe;APP=Microsoft®
Access;DATABASE=MyDB"
dopo la connessione tutto procede bene.
Il problemino mi sorge quando esco e rientro nell'applicazione: se non
scollego e ricollego tutto devo digitare la password al primo accesso
ad una tabelle, questo non lo voglio fare perchè il collegamento
completo richiede più di 40sec ad ogni avviamento.
Il comportamento è come quello che si ottiene non spuntando il salva
password nella connessione manuale.
Si può dare il salva password via codice?
Oppure: esistono altre soluzioni?
Saluti, mpio.


text:

Ho trovato una soluzione.
Non sono molto sicuro di quello che ho fatto ma funziona.
la posto se può servire a qualcuno.
ho fatto una sub  dove strConn è la stringa di connessione di cui
sopra, le altre due stringhe sono il nome della tabella di origine e
quello della tabella di destinazione.
dunque, la sub è questa.
Sub CollegaTabella(strConn As String, strTbOrig As String, strTBDest
As String)
On Error GoTo Err_CollegaTabella
Dim tdfTabella As TableDef
Set tdfTabella = CurrentDb.CreateTableDef(strTBDest)
tdfTabella.Attributes = dbAttachSavePWD
tdfTabella.Connect = strConn
tdfTabella.SourceTableName = strTbOrig
CurrentDb.TableDefs.Append tdfTabella
Exit_CollegaTabella:
    Exit Sub
Err_CollegaTabella:
    MsgBox Err.Number & " " & Err.Description
    Resume Exit_CollegaTabella
End Sub
Il tutto funzia, se ci sono soluzioni altenative sono ben accette.
saluti, mpio.


title: Evidenziare un campo in maschera

author: Principiante

text:
Salve a tutti,
per evidenziare un campo uso quanto segue ma presenta l'inconveniente che lo devo specificare su ogni campo.
-----------------------------
Private Sub MioCampo_GotFocus()
    Me.MioCampo.BackColor = 65535
End Sub

Private Sub MioCampo_LostFocus()
    Me.MioCampo.BackColor = 16777215
End Sub
------------------------------
Cè modo di renderla valida per tutti i campi evitando di ripeterla manualmente?

Grazie


title: Evidenziare un campo in maschera

text:
Salve,

Principiante ha scritto:

Ci sono vari metodi. I dettagli dipendono anche dalla versione di Access
che dovresti sempre rivelare nelle domande.

p.e. puoi usare la formattazione condizionale (FC):

- in vis. struttura della maschera con il mouse evidenzi tutti controlli
che voui colorare
- nel ribbon scegli Formato - Formattazione condizionale
- (da qui in avanti suppongo che usi una versione moderna di Access)
sulla testa del dialogo della FC dev'essere scritto
"Visualizza regole di formattazione per:  Più elementi"
- fai clic sul pulsante "Nuova regola"
- nel dialogo scegli "Il campo è attivo"
- in basso del dialogo con il simbolo per il colore sfondo (il secchio)
scegli Giallo
- fai clic su Ok, Ok,
- gioco fatto

--
Ciao
Karl
*********
Access FAQ:
http://www.donkarl.com/it

Access Lobby:
http://www.AccessDevelopers.org


title: Evidenziare un campo in maschera

text:

Grazie Karl,
molto più semplice di quello che avevo applicato io.
Dal tuo sito: CISA1
http://www.donkarl.com/it/CISA/Download.htm

"WithEvents e RaiseEvent".
Vedo che le nuove versioni di access permettono di raggiungere molti più risultati scrivendo meno codice.


title: Evidenziare un campo in maschera

text:
Ciao,

Principiante ha scritto:
> ...
> molto più semplice di quello che avevo applicato io.
> Dal tuo sito: CISA1
http://www.donkarl.com/it/CISA/Download.htm

> "WithEvents e RaiseEvent".

Ah, la relazione di Marco da quasi 10 anni fa. Sempre peccato che non
siamo riusciti di stabilire una conferenza per Accessisti alla lunga in
Italia.

> Vedo che le nuove versioni di access permettono di raggiungere molti più risultati scrivendo meno codice.

Quello che ho descritto puoi fare già dalla versione 2000 di Access,
cioè da quando esiste la formattazione condizionale. L'unico vero
miglioramento della FC in questi 15 anni è che hanno aumentato le
condizioni possibili da 3 a 50. Però non bastano mai: Un collegha ha
raccontato che un suo cliente subito ha detto: ...ma l'anno ha 52
settimane...

--
:-)



title: Evidenziare un campo in maschera

text:
Il giorno lunedì 5 gennaio 2015 16:56:22 UTC+1, Karl Donaubauer ha scritto:

> Ah, la relazione di Marco da quasi 10 anni fa. Sempre peccato che non
> siamo riusciti di stabilire una conferenza per Accessisti alla lunga in
> Italia.

A me molti dicono  che Access e' un "giocattolo" se comparato con il
SQL server.

A me pare un po' eccessivo dire cosi'. Tu che sei molto piu' esperto
di me che ne pensi ?


title: Evidenziare un campo in maschera

text:
Radicale.002 ha scritto:
> ...
> A me molti dicono  che Access e' un "giocattolo" se comparato con il
> SQL server.

motorino  <> camion
coltellino svizzero <> sega
ecc.

--
Ciao



title: Evidenziare un campo in maschera

text:
Il giorno giovedì 8 gennaio 2015 22:19:48 UTC+1, Karl Donaubauer ha scritto:
> Radicale.002 ha scritto:
> > ...
> > A me molti dicono  che Access e' un "giocattolo" se comparato con il
> > SQL server.
>
> motorino  <> camion
> coltellino svizzero <> sega
> ecc.

E fino a qua c'ero arrivato pure io :D


title: Evidenziare un campo in maschera

text:
Radicale.002 ha scritto:
> Karl Donaubauer ha scritto:
>>> ...
>>> A me molti dicono  che Access e' un "giocattolo" se comparato con il
>>> SQL server.
>>
>> motorino  <> camion
>> coltellino svizzero <> sega
>> ecc.
>
> E fino a qua c'ero arrivato pure io :D

Su questo vecchissimo argomento esistono mille di discussioni e p.e.
alcuni script tedesci da relazioni sulle mie conferenze. Ripetizioni e
traduzioni sono troppo tediosi.



title: Evidenziare un campo in maschera

text:
Il giorno venerdì 9 gennaio 2015 14:43:27 UTC+1, Karl Donaubauer ha scritto:
> Radicale.002 ha scritto:
> > Karl Donaubauer ha scritto:
> >>> ...
> >>> A me molti dicono  che Access e' un "giocattolo" se comparato con il
> >>> SQL server.
> >>
> >> motorino  <> camion
> >> coltellino svizzero <> sega
> >> ecc.
> >
> > E fino a qua c'ero arrivato pure io :D
>
> Su questo vecchissimo argomento esistono mille di discussioni e p.e.
> alcuni script tedesci da relazioni sulle mie conferenze. Ripetizioni e
> traduzioni sono troppo tediosi.

Quindi possiamo dire che : asserire che l' Access sia "peggio" (diciamo)
del SQL e' tutt' ora una questione aperta, non certa, non oggettivamente
definita e conclusa ?

Se si : lo immaginavo.


title: x Roberto da casa

author: Er Pirata

text:
Sinceramente è la prima volta che vedo questa funzione e quindi sono ancora
un pò alle prime armi purtroppo non riesco a farlo :((((((((


title: x Roberto da casa

author: Roberto dal portatile

text:
"Er Pirata" <
franc...@supereva.com
> ha scritto nel messaggio
news:91kst7$usn$1...@lacerta.tiscalinet.it...
> Sinceramente è la prima volta che vedo questa funzione e quindi sono
ancora
> un pò alle prime armi purtroppo non riesco a farlo :((((((((
>
>
Quale delle tre funzione vedi per la prima volta?
Come ti avevo suggerito, hai letto l'help e se si cosa non ti è chiaro
dell'help?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------


title: richiamare una qualsiasi voce di menù access da vba

author: mario rossi

text:
come posso sapere il comando VBA corrispondente alle voci presenti nel menu di access?

esempio se voglio richiamare
file\apri
oppure
crea\struttura tabella

grazie.


title: come si imposta una Query SNAPSHOT in Access95?

author: Luigi

text:
Ciao a tutti,
ho una domanda fuori dal tempo: un amico ha un PC con Windows95 ed anche
Access è, di conseguenza, datato (non sono sicuro se 95 o 97).
In un database gli ho impostato una banalissima query di selezione però
vorrei impedirgli di poter modificare i dati.
Su Access 2003 è semplicissimo, basta impostare SNAPSHOT sulle proprietà
della query, però sul 95 questa funzione sembra non esserci.
Sto continuamente cercando in Internet, ma senza fortuna. Qualcuno si
ricorda come si potrebbe fare?
Ciao e grazie a chiunque vorrà rispondermi.
Luigi


author: Marco Papo

text:
5
"Luigi" <
ldp...@alice.it
> ha scritto nel messaggio
news:46842407$0$36440$4faf...@reader5.news.tin.it...

Ciao,
potresti utilizzare la sicurezza di access. Mi sembra che ci fosse in 97? il
95 non so nenahce se esiste. al tempo avevo il commodore 64....ehehehhe


text:
"Luigi" <
ldp...@alice.it
> ha scritto nel messaggio news:46842407$0$36440$4faf...@reader5.news.tin.it...

Su MSDN c'è indicanto come crearlo con la QueryDefs ma non so se per te è la stessa cosa...
Ciao.
--
Sergio MAZZA


text:
Ciao,
grazie per la risposta.
Il problema è che non sono io ad utilizzare il PC, ma un utente poco pratico
che è in grado di lanciare solo la query,per cui, speravo ci fosse qualche
proprietà da impostare (e che io non riuscivo a trovare)
Comunque, grazie lo stesso!
Luigi
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:f6543f$5fj$1...@tdi.cu.mi.it...



text:
"Luigi" <
ldp...@alice.it
> ha scritto nel messaggio news:46888809$0$17954$4faf...@reader1.news.tin.it...
> Ciao,
>
> grazie per la risposta.
>
> Il problema è che non sono io ad utilizzare il PC, ma un utente poco pratico che è in grado di lanciare solo la query,per cui,
> speravo ci fosse qualche proprietà da impostare (e che io non riuscivo a trovare)
>
> Comunque, grazie lo stesso!
>
> Luigi
Per favore scrivi in coda al testo del messaggio precedente, trovi info qui:
www.sitocomune.com
 - Sezione ICAA - Come comportarsi in
questo NG.
Ma le query create con querydefs le puoi salvare come una qualsiasi query creata con le procedure guidate...
Ciao.
--
Sergio MAZZA


title: Problema con combo non associate

author: Lelio

text:
In Access ho il seguente problema:
ho dei prodotti, i quali appartengono a delle categorie. In una tabella
Ordini c'è il campo IDProdotto.
Creo una maschera in forma tabulare per gli ordini, e metto una combo non
associata che mi permette di scegliere la categoria. Una volta scelta, nella
combo prodotti mi deve essere possibile selezionare solo i prodotti della
categoria scelta.
Il problema è questo: essendo la combo delle categorie non associate, quando
la cambio x un record mi cambia x tutti; inoltre, se al variare della
categoria scelta cambio la proprietà RowSource della combo prodotti, anche
stavolta mi cambia per tutti i record.
Spero di aver esposto il problema abbastanza chiaramente.
Come posso realizzare ua cosa simile senza incorrere nei problemi citati?
Ringrazio tutti coloro sapranno darmi una mano.
Ciao
Lelio


title: Problema con combo non associate

text:
"Lelio" <Lel...@Dagep.it> ha scritto nel messaggio
news:9764eo$7l2$1...@fe2.cs.interbusiness.it...

Il tuo problema non dipende al fatto che la combo delle categorie non è
associata, ma dal fatto che la tua maschera ha una visualizzazione a
Maschere continue; ritengo che se cambi la visualizzazione della maschera in
Maschera singola il problema si risolve.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Problema con combo non associate

author: sib

text:
Lelio <Lel...@Dagep.it> wrote in message
9764eo$7l2$1...@fe2.cs.interbusiness.it...
> In Access ho il seguente problema:
> ho dei prodotti, i quali appartengono a delle categorie. In una tabella
> Ordini c'è il campo IDProdotto.
> Creo una maschera in forma tabulare per gli ordini, e metto una combo non
> associata che mi permette di scegliere la categoria. Una volta scelta,
nella
> combo prodotti mi deve essere possibile selezionare solo i prodotti della
> categoria scelta.
> Il problema è questo: essendo la combo delle categorie non associate,
quando
> la cambio x un record mi cambia x tutti; inoltre, se al variare della
> categoria scelta cambio la proprietà RowSource della combo prodotti, anche
> stavolta mi cambia per tutti i record.
Il tuo errore sta nel fatto di non avere associato la combo.
Una combo non associata non ha un valore diverso per ogni record, ma e'
uguale per tutto, quindi e' ovvio che in maschere continue la modifica si
riperquota su tutte le righe.
D'altro  canto perche' non e' associato? se esiste una categoria dei
prodotti puoi associare la combo a quel campo.
Sib
--
il sito comune di it.comp.database.access:
http://www.sitocomune.com
------------------------------------------------------
La mia home
http://digilander.iol.it/syb
------------------------------------------------------
"Non sempre cio' che viene dopo e' progresso"
Alessandro Manzoni
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente


title: Problema con combo non associate

text:
"sib" <
sibN...@iol.it
> ha scritto nel messaggio
news:5LPl6.44747$k55.9...@news.infostrada.it...
> Il tuo errore sta nel fatto di non avere associato la combo.
> Una combo non associata non ha un valore diverso per ogni record, ma e'
> uguale per tutto, quindi e' ovvio che in maschere continue la modifica si
> riperquota su tutte le righe.
> D'altro  canto perche' non e' associato? se esiste una categoria dei
> prodotti puoi associare la combo a quel campo.
Il fatto è che esistendo nella tabella ordini il campo prodotto, un campo
categoria sarebbe assolutamente ridondante, in quanto ricavabile dal
prodotto stesso.
Nella maschera, la combo categoria mi servirebbe solo per limitare il campo
di scelta dei prodotti, che altrimenti sarebbero troppi.
>
> Sib
Ciao, Lelio


title: Problema con combo non associate

text:
"Roberto dal portatile" <
r.ma...@libero.it
> ha scritto nel messaggio
news:VGzl6.34603$k55.7...@news.infostrada.it...
> Il tuo problema non dipende al fatto che la combo delle categorie non è
> associata, ma dal fatto che la tua maschera ha una visualizzazione a
> Maschere continue; ritengo che se cambi la visualizzazione della maschera
in
> Maschera singola il problema si risolve.
Lo so, ma una maschera singola non soddisferebbe le mie necessità. Sto
cercando qualche idea per avere comunque una visualizzazione a maschere
continue.
> --
>
> Roberto
Ciao, Lelio