title: UN BEL CASINO

text:
"ciroteo" <
matteo...@gmail.com
> ha scritto nel messaggio
news:59f404b1-8706-4d61...@e67g2000hsa.googlegroups.com...
cut
senti senti ... per un gelato Carlo violeresti le sante regole del
newsgroup???
...me ne avanzi un cucchiaino???
---------------------------------
Lo sai che non ci avevo proprio fatto caso?
Ora che me lo hai fatto notare non mancherò di chiedere all'amico di
inviarcene una buona dose alla prossima CISA.
Per te non solo un cucchiaino!
Ciao, Carlo


title: invio email con router o connessione ad internet con CDO

text:
utilizzando cdo mi succede che se un utente ha una connessione ad internet
con router oppure condivisa utilizzando un altro pc che è realmente connesso
a internet non invia i messaggi di posta.
mentre se è direttamente connesso con normale modem o adsl le email partono
correttamente.
mi sapete dire cosa sbaglio?


author: NON emmedi PROVARCI @nemmenotin.itintesi? OneEDP

text:
"Simba883" <
simb...@libero.it
> ha scritto nel messaggio
news:ciq717$4g9$1...@lacerta.tiscalinet.it...

Se SMTP lo imposti come se fosse direttamente connesso ad internet (tipo
mail .
libero.it
) difficilmente riuscirai a inviare la posta  perché
probabilmente il router fa da proxy semplicemente o perché il PC non ha
attiva la configurazione DNS. Di solito il router PC dovrebbe avere un mail
server per maggior flessibilità. Prova a mettere nell'account SMTP
l'indirizzo del PC che fa da router (ovviamente il PC deve aver un mail
server).


title: Grandezza caratteri

author: barbi

text:
C'e' un modo per ingrandire i caratteri dei menu' e delle varie schede
(tabelle, maschere ecc.)? l'unica opzione che ho trovato e' per i fogli
dati, ma per il resto?
grazie da barbi


title: Grandezza caratteri

author: Lbo da casa

text:
>C'e' un modo per ingrandire i caratteri dei menu' e delle varie schede
>(tabelle, maschere ecc.)? l'unica opzione che ho trovato e' per i fogli
>dati, ma per il resto?
quelle sono impostazioni di sistema di windows, access non c'entra.
--------------------------------------------------
ATTENZIONE!
it.comp.database.access diventera' it.comp.appl.access!
cercalo tra i nuovi ng e linkalo!
-----------------------------------
rimuovere NOSPAM. per mandare email
-----------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access


title: Quale delle Form è aperta?

author: PAOLO

text:
Come faccio a sapere in un dato momento quale delle Form
è aperta? Devo inserirlo nell'Origine Controllo di un Report:
[Forms]![Me].[Name] non funziona!
Graz.
--
_____________________________________________
""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
ARMONITE
c/o Paolo Fosso
via Bologna, 3
27100 PAVIA
(ITALY)
Tel:
+39 333 2183075
 or
+39 382 467820
e-mail:
pa...@armonite.it
web-site:
www.armonite.it
mp3s:
http://stage.vitaminic.it/armonite
newsgroup: free.it.armonite


title: Quale delle Form è aperta?

author: Stefano Bettini

text:
"PAOLO" <
pa...@armonite.it
> wrote in message
news:Q3l%5.129336$hk4.4...@news.infostrada.it...
> Come faccio a sapere in un dato momento quale delle Form
> è aperta? Devo inserirlo nell'Origine Controllo di un Report:
>
> [Forms]![Me].[Name] non funziona!
>
Anche perchè non significa nulla, in quel modo al massimo otterresti il nome
della form che contiene il codice in esecuzione in quel momento...
Per conoscere le form aperte  devi fare un ciclo da VB sull'insieme forms,
oppure
(sempre da VB) tentare di referenziare il form che ti interessa gestendo
l'eventuale errore.
Bye, Ste


title: Quale delle Form è aperta?

author: Sergio MAZZA

text:
"PAOLO" <
pa...@armonite.it
> ha scritto nel messaggio
news:Q3l%5.129336$hk4.4...@news.infostrada.it...

Tratto dall'help di ActiveForm:
'-----------------
Dim frmMascheraCorrente As Form
Set frmMascheraCorrente = Screen.ActiveForm
MsgBox "La maschera corrente è " & frmMascheraCorrente.Nome
'-----------------
Ciao.


title: Quale delle Form è aperta?

author: sib

text:
PAOLO <
pa...@armonite.it
> wrote in message
Q3l%5.129336$hk4.4...@news.infostrada.it...
> Come faccio a sapere in un dato momento quale delle Form
> è aperta? Devo inserirlo nell'Origine Controllo di un Report:
>
> [Forms]![Me].[Name] non funziona!
Puoi anche guardare i db di esempio che corredano Access dove trovi una
funzione che verifica se una determinata form e' aperta.
Sib
--
------------------------------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access
------------------------------------------------------
La mia home (ancora non completa)
http://digilander.iol.it/syb
------------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente


title: apertura lista casella combinata

author: Alby

text:
Ciao a tutti! Devo chiedere un aiuto: in alcune form utilizzo delle caselle
combinate per efettuare delle richerche..Digitando da tastiera in queste
caselle combinate faccio la ricerca immediata e restringo la ricerca in base
a ciň che sto digitando, e fin qui..Ciň che vorrei č che il funzionamento
fosse lo stesso, ma mentre digito i caratteri mi si aprisse la finestra con
l'elenco che man mano si avvicina a ciň che sto scrivendo, mentre adesso
l'elenco lo apro soltanto andando a cliccare con il mouse sulla freccia..mi
sapete dare una mano?Grazie 1000 anticipatamente!


title: apertura lista casella combinata

author: Karl Donaubauer

text:
Alby wrote:
> Ciao a tutti! Devo chiedere un aiuto: in alcune form utilizzo delle
> caselle combinate per efettuare delle richerche..Digitando da tastiera in
> queste caselle combinate faccio la ricerca immediata e restringo la
> ricerca in base a ciò che sto digitando, e fin qui..Ciò che vorrei è che
> il funzionamento fosse lo stesso, ma mentre digito i caratteri mi si
> aprisse la finestra con l'elenco che man mano si avvicina a ciò che sto
> scrivendo, mentre adesso l'elenco lo apro soltanto andando a cliccare con
> il mouse sulla freccia..mi sapete dare una mano?Grazie 1000
> anticipatamente!
www.donkarl.com/it
 FAQ 4.14 Aprire una casella combinata via codice
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it
 + iscriviti alla prima Conferenza
Italiana per Sviluppatori di Access (CISA 1), Arezzo, 4+5/6/2005


title: apertura lista casella combinata

text: E per chiudere la lista dopo aggiornamento?


title: apertura lista casella combinata

author: MA

text:
Alby wrote:
> E per chiudere la lista dopo aggiornamento?
 Lo fa da sč dopo aver spostato il focus
Il dropdown funziona solo con il focus
--
MAssimiliano Amendola
Cisa1 - I° Conferenza Italiana per Sviluppatori Access Arezzo 4+5
Giugno 2005 Sono aperte le iscrizioni  Info:
www.donkarl.com/it


title: DCount

author: MarkRed

text:
Salve a tutti.
Posso sapere l'esatta sintassi (se è possibile farlo) della funzione DCount
con più di 2 And quindi più di 2 criteri?
Mi spiego.
DCount("campo";"tabella";"condizione")
Ipotizziamo:
DCount("vestito";"vestiti";"vestito=classico and taglia=media")
..e per inserire un altro And??? mi dà sempre errore!
E' evidente che la sintassi andrebbe cambiata forse con qualche apice in più
nella condizione, ma non so dove inserirlo.
Grazie anticipatamente a questo magnifico NG!
Marco.


title: DCount

author: Carlo Costarella

text:
"MarkRed" <
con...@libero.it
> ha scritto nel messaggio
news:%Scd9.49991$ub2.8...@news1.tin.it...

Un esempio:
DCount("ID", "TuaTabella", "[Campo2] = 'TuaStringa' And [Campo3] =
'AltraStringa' and [Campo1] = 'NuovaStringa'")
in questo caso TUTTA la Condizione è racchiusa tra virgolette e i singoli
valori stringa racchiusi fra apici.
All'interno della condizione e usando lo stesso criterio, puoi aggiungere
degli altri AND.
Insomma alla tua istruzione mancano gli apici che delimitano la stringa di
criterio.
Ciao, Carlo


title: DCount

author: VT @ work

text:
On Wed, 04 Sep 2002 05:59:19 GMT, "Carlo Costarella"
<
carloantoni...@virgilio.it
> wrote:
>
>Un esempio:
>DCount("ID", "TuaTabella", "[Campo2] = 'TuaStringa' And [Campo3] =
>'AltraStringa' and [Campo1] = 'NuovaStringa'")
>in questo caso TUTTA la Condizione è racchiusa tra virgolette e i singoli
>valori stringa racchiusi fra apici.
>All'interno della condizione e usando lo stesso criterio, puoi aggiungere
>degli altri AND.
>Insomma alla tua istruzione mancano gli apici che delimitano la stringa di
>criterio.
>
>
>Ciao, Carlo
>
Se poi i valori da utilizzare provengono da controlli di una form,
l'esempio di Carlo diventa:
DCount("ID", "TuaTabella", "[Campo2] = '" & TuoControllo & "' And
[Campo3] ='" & AltroControllo & "' and [Campo1] = '" & NuovoControllo
& "'")
Vincenzo Turturro
---------------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com/
---------------------------------------------
E quello di it.comp.as400:
http://www.faq400.com/
---------------------------------------------


title: DCount

text:
Grazie a tutti (come sempre piů professionali che mai).
Un saluto particolare a Carlo ( non te l'ho chiesto "direttamente" per non
disturbarti)
Proverň e, in caso negativo, riferirirň.
Grazie ancora a tutti Voi!
Marco.


title: DCount

text:
"MarkRed" <
con...@libero.it
> ha scritto nel messaggio
news:cumd9.60639$pX1.1...@news2.tin.it...
> Grazie a tutti (come sempre più professionali che mai).
> Un saluto particolare a Carlo ( non te l'ho chiesto "direttamente" per non
> disturbarti)
> Proverò e, in caso negativo, riferirirò.
> Grazie ancora a tutti Voi!
> Marco.
>
>
>
Allora, ho provato in tutti i modi con gli "Autorevoli" consigli di Carlo e
Vincenzo:
=DCount("tipo_presenza";"Contabilita";"[tipo_presenza]='1' And [rischio]='1'
and [iddipendente]=' & [Reports]![contabilita]![iddipendente]'")
mi dà sempre errore, ovunque racchiudo con i semplice apici.
Dove sbaglio?
Grazie!
Marco.


title: DCount

author: Alessandro Cara

text:
MarkRed wrote:
> Allora, ho provato in tutti i modi con gli "Autorevoli" consigli di Carlo e
> Vincenzo:
>
> =DCount("tipo_presenza";"Contabilita";"[tipo_presenza]='1' And [rischio]='1'
> and [iddipendente]=' & [Reports]![contabilita]![iddipendente]'")
>
> mi dà sempre errore, ovunque racchiudo con i semplice apici.
> Dove sbaglio?
> Grazie!
> Marco.
i valori di tipo testo sono delimitati da apici
i valori numerici non sono delimitati
le date sono delimitate da diesis (#)
--
a.cara


title: DCount

author: Antonio Biso

text:
"MarkRed" <
con...@libero.it
> ha scritto nel messaggio
news:D1nd9.60794$pX1.1...@news2.tin.it...

Per i numeri togli gli apici
Antonio


title: DCount

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:8dnd9.150132$n04.3...@twister2.libero.it...

Vi ringrazio tantissimo ma, purtroppo, anche togliendo gli apici non ne
vuole sapere...mannaggia!
Grazie.
Marco.


title: DCount

text:
MarkRed wrote:
> > > =DCount("tipo_presenza";"Contabilita";"[tipo_presenza]='1' And
> > [rischio]='1'
> > > and [iddipendente]=' & [Reports]![contabilita]![iddipendente]'")
> > >
> > > mi dà sempre errore, ovunque racchiudo con i semplice apici.
> > > Dove sbaglio?
> >
> > Per i numeri togli gli apici
> >
> > Antonio
> >
> >
> Vi ringrazio tantissimo ma, purtroppo, anche togliendo gli apici non ne
> vuole sapere...mannaggia!
> Grazie.
> Marco.
vabbe' ma che fa'? fermo restando che c'e' dentro una puttanata (sorry
;<))
=DCount("tipo_presenza";"Contabilita";"[tipo_presenza]='1' And
[rischio]='1'
and [iddipendente]=" & [Reports]![contabilita]![iddipendente])
occhio alla penna !!!
sono partito dal presuppost che l'iddipendente e' numerico
--
a.cara


title: DCount

text:
"Alessandro Cara" <
al...@blunet.it
> ha scritto nel messaggio
news:3D7603DE...@blunet.it...

Allora per togliere ogni dubbio:
campo "tipo_presenza" è numerico;
campo "rischio" è numerico;
campo "IDdipendente" è numerico.
Ecco quanto riportato con i vari suggerimenti:
=DCount("tipo_presenza";"Contabilita";"[tipo_presenza]='1' And [rischio]='1'
and [iddipendente]=" & [Reports]![contabilita]![iddipendente])
dà sempre errore
?????
Marco.


title: DCount

text:
"MarkRed" <
con...@libero.it
> ha scritto nel messaggio
news:D1nd9.60794$pX1.1...@news2.tin.it...
>
> "MarkRed" <
con...@libero.it
> ha scritto nel messaggio
> news:cumd9.60639$pX1.1...@news2.tin.it...
CUT
> Allora, ho provato in tutti i modi con gli "Autorevoli" consigli di Carlo
e
> Vincenzo:
>
> =DCount("tipo_presenza";"Contabilita";"[tipo_presenza]='1' And
[rischio]='1'
> and [iddipendente]=' & [Reports]![contabilita]![iddipendente]'")
>
> mi dà sempre errore, ovunque racchiudo con i semplice apici.
> Dove sbaglio?
> Grazie!
> Marco.
>
>
Comincia la prova con un criterio.
Poi ne aggiungi un altro e così via.
Prova a cambiare l'istruzione in:
DCount("tipo_presenza";"Contabilita";"[tipo_presenza]= '1' And [rischio]=
'1'
and [iddipendente]= " & [Reports]![contabilita]![iddipendente])
infatti credo che iddipendente sia un numerico e non richiede gli apici.
Se poi anche Rischio e TipoPresenza son numerici allora il tutto diventa:
DCount("tipo_presenza";"Contabilita";"[tipo_presenza]= 1 And [rischio]= 1
and [iddipendente]= " & [Reports]![contabilita]![iddipendente])
Ciao, Carlo


title: DCount

text:
"MarkRed" <
con...@libero.it
> ha scritto nel messaggio
news:fJnd9.61034$pX1.1...@news2.tin.it...

Ti ho risposto in contemporanea al tuo ultimo messaggio. Leggi.
Se ancora non funziona, e non è possibile, mi sono posto un'ultimo quesito:
usi l'istruzione in una query o nel codice?
Nel codice i punto e virgola diventano virgola.
Ciao, Carlo


title: DCount

text:
"Carlo Costarella" <
carloantoni...@virgilio.it
> ha scritto nel
messaggio news:s%nd9.61128$pX1.1...@news2.tin.it...

Ok  tutto a posto!
Ho commesso UN ERRORE MADORNALE e, cioè, avevo due campi rischio ma uno
doveva essere riferito alla tabella [servizio].[rischio]=1 e non
[rischio]=1.
Finalmente, è facile distrarsi!
Grazie ancora!
Marco.


title: query che nel caso di doppio record prende quello con data maggiore

author: mario rossi

text:
ho una tabella che può contenere

nome       codice     data
mario      10         12/06/2018
luigi      14         13/06/2018
antonio    17         14/06/2018
luigi      14         15/06/2018

(in pratica luigi appare doppio nella tabella allora nella query devo far apparire quello con la data maggiore
quindi dalla query dovrei ottenere solo i seguenti record

nome       codice     data
mario      10         12/06/2018
antonio    17         14/06/2018
luigi      14         15/06/2018

fattibile?

grazie a tutti


text:

la query attuale è questa (ma non considera la data "SCADENZA" maggiore nel caso di "BADGE" doppio

**** CODE ****

INSERT INTO tabellaTemp ( Tessera, NOME, COGNOME, INDIRIZZO, Comune, SCADENZA, BADGE )
SELECT tabellaExcel.TES, tabellaExcel.NOME, tabellaExcel.COGNOME, tabellaExcel.INDIRIZZO, tabellaExcel.[COMUNE ], tabellaExcel.SCADENZA, tabellaExcel.BADGE
FROM tabellaExcel;


text:
Il giorno venerdì 26 ottobre 2018 00:47:26 UTC+2, mario rossi ha scritto:

nessuno a qualche idea? io non ho ancora risolto, se a qualcuno viene l'illuminazione lo ringrazio anticipatamente.


author: GiorgioDaPrato

text:
> nessuno a qualche idea? io non ho ancora risolto, se a qualcuno viene l'illuminazione lo ringrazio anticipatamente.

se la query serve solo a scopo "di risultato visivo"
e i dati significativi sono solo quelli
secondo me basta raggruppare per nome E codice e imporre MAX su data
(e così, se ci sono altri dati "a corredo" possono essere tirati su
con le varia opzioni di aggregazione: primo, min ...)


title: Modifica campo tabella BE dal FE

author: Roberto Spinella Esteban

text:
Vorrei modificare la dimensione di un campo testo presente in una tabella
del BackEnd direttamente dal Front End.
E' possibile ?
Ho visto sul sito comune una nuova routine che lo fà ma solo sulle tabelle
del MDB stesso.
E se queste sono allegate ?
Grazie
Roberto Spinella


title: Modifica campo tabella BE dal FE

text:

www.donkarl.com/it
 FAQ 3.5
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it
+ Conferenza Italiana per Sviluppatori di Access (CISA)


title: Modifica campo tabella BE dal FE

text:
Roberto Spinella Esteban wrote:
> Vorrei modificare la dimensione di un campo testo presente in una
> tabella del BackEnd direttamente dal Front End.
> E' possibile ?
> Ho visto sul sito comune una nuova routine che lo fą ma solo sulle
> tabelle del MDB stesso.
> E se queste sono allegate ?
> Grazie
> Roberto Spinella
Rileggendo la routine trovo
Function REL_ApriBE(nomeBE As String)
    Set MiaAreaLavoro = DBEngine.Workspaces(0)
    Set DbsP = DBEngine.Workspaces(0).Databases(0)
    Set dbs = MiaAreaLavoro.OpenDatabase(nomeBE)
End Function
E non mi sembra che sia solo quello corrente. Basta che specifichi quale
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: espandi e riduci foglio dati secondario

author: Alessio

text:
Salve a tutti sto utilizzando access 2000 e win98
è possibile da codice riuscire a far espandere una sottomaschera quando ha
dei record e ridurla quando non c'è niente ? Precisamente in visualizazione
foglio dati quando ho una sottomaschera collegata mi compare un "+ "per
espandere e un "-" per ridurre. Al momento riesco ad espandere e ridurre in
automatico tutti i record del foglio dati primario oppure manualmente i
singoli record. Quello di cui avrei bisogno è di riuscire a espandere solo i
record che hanno nel foglio dati secondario altri record. Scusate se sono
stato un po' contorto ma spero che qualcuno mi abbia capito. Grazie
dell'attenzione Alessio.


title: inibire il salvataggio di un record che non soddisfa ad alcuni requisiti

author: Giuseppe

text:
ho una maschera legata in cui immetto dati che se soddisfano ad alcuni
requisiti dovrebbero finire memorizzati in tabella.
premetto che la cosa si potrebbe risolvere con una maschera non legata con
un pulsante di salvataggio cui è agganciata una istruzione sql di insert.
non vorrei usare tale metodo.
come fare?
--
----------------
saluti
Giuseppe


author: namor

text:
Giuseppe ha scritto:
> ho una maschera legata in cui immetto dati che se soddisfano ad alcuni
> requisiti dovrebbero finire memorizzati in tabella.
> premetto che la cosa si potrebbe risolvere con una maschera non legata con
> un pulsante di salvataggio cui è agganciata una istruzione sql di insert.
> non vorrei usare tale metodo.
> come fare?
Sull'evento After_insert della maschera fai tutti i controlli, e se non
sono soddisfatti stampi un messaggio d'avviso per l'utente e imposti
Cancel=True.
Questo impedisce il salvataggio del record, quindi non sarà possibile
salvarlo finchè i dati non passeranno tutti i controlli.
Namor
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
"namor" <
do...@spam.me
> ha scritto nel messaggio
news:c7ftd0$vf6$1...@news.newsland.it...
> Giuseppe ha scritto:
>
> > ho una maschera legata in cui immetto dati che se soddisfano ad alcuni
> > requisiti dovrebbero finire memorizzati in tabella.
> > premetto che la cosa si potrebbe risolvere con una maschera non legata
con
> > un pulsante di salvataggio cui è agganciata una istruzione sql di
insert.
> > non vorrei usare tale metodo.
> > come fare?
>
>
> Sull'evento After_insert della maschera fai tutti i controlli, e se non
> sono soddisfatti stampi un messaggio d'avviso per l'utente e imposti
> Cancel=True.
> Questo impedisce il salvataggio del record, quindi non sarà possibile
> salvarlo finchè i dati non passeranno tutti i controlli.
> Namor
>
Grazie Namor
ma fammi capire, io credevo che l'evento: "Dopo inserimento" fosse già
troppo tardi e che il record ormai era scritto in tabella. Sembra di capire
che non è come pensavo allora...
puoi darmi qualche chiarimento?


text:
Giuseppe ha scritto:




Scusa, ho sbagliato io, devi usare l'evento Before_insert, "Prima di
inserire", perchè su "dopo inserimento" giustamente il record è già stato
scritto in tabella, e non c'è il parametro "Cancel".



title: Cambiare caratteristiche di un controllo, ovvero la Q242218 funziona??

author: Satured

text:
Uso Access2000
Dovendo modificare un report creato in autocomposizione e aggiungere
parecchie textbox vorrei modificare le caratteristiche automatiche che ora
seguono quelle del report mentre io voglio colori/caratteri diversi
Usando Formattazione Automatica ottengo l'effetto opposto
Leggendo la
http://support.microsoft.com/default.aspx?scid=kb;en-us;Q242218
non cambia nulla
Qualcuno e' riuscito a ripristinare quanto dichiarato nella Q242218?
PS: comunque acwzmain.mde, acwztool.mde io li ho nella dir 1040 e non
1033....
grazie


title: CALCOLI NELLE RUTIN

author: Simone

text:
Ciao a tutti,
dovrei effettuare un calcolo durante l'esecuzione di un codice vba e salvare
il risultato in una variabile. Come faccio ad arrotondare il mio risultato
alla seconda cifra decimale?
grazie e ciao


title: CALCOLI NELLE RUTIN

author: Roberto da casa

text:
"Simone" <
sip...@tin.it
> ha scritto nel messaggio
news:fCoz6.1093$k53....@news1.tin.it...

Se l'arrotondamento è per difetto:
Me!ControlloArrotondato = Int(Me!ControlloDaArrotondare*100)/100
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: CALCOLI NELLE RUTIN

author: Luciano (DOC)

text:
Simone ha scritto nel messaggio ...
>dovrei effettuare un calcolo durante l'esecuzione di un codice vba e
salvare
>il risultato in una variabile. Come faccio ad arrotondare il mio risultato
>alla seconda cifra decimale?
Moltiplichi per cento, prendi l'intero, poi dividi per cento.
Ovvero: int(tuavar*100) /100
Solo che....
ho avuto lo stesso problema la settimana scorsa e credevo di averlo risolto
come sempre nella maniera che ti sto dicendo. Poi mi e' capitato un numero
fatto piu' o meno cosi':
3,235443543542354324E6
che dato in pasto alla funzioncina di ciu sopra mi restituiva un bel 0,00.
Ora, avendo io fatto il liceo classico, di numeri non e' che me ne intenda
molto...:-)
Poi mi hanno spiegato cos'e' quella roba li' ed ho capito che quella
funzioncina non puo' andare bene se hai numeri, diciamo cosi', un po'
complicati, ma se  non prevedi di avere numeri cosi' piccoli prendila per
buona!:-)
Saluti.
Luciano
(DOC)


title: CALCOLI NELLE RUTIN

text:
Simone ha scritto nel messaggio ...
>dovrei effettuare un calcolo durante l'esecuzione di un codice vba e
salvare
>il risultato in una variabile. Come faccio ad arrotondare il mio risultato
>alla seconda cifra decimale?
Moltiplichi per cento, prendi l'intero, poi dividi per cento.
Ovvero: int(tuavar*100) /100
Solo che....
ho avuto lo stesso problema la settimana scorsa e credevo di averlo risolto
come sempre nella maniera che ti sto dicendo. Poi mi e' capitato un numero
fatto piu' o meno cosi':
3,235443543542354324E-06



title: CALCOLI NELLE RUTIN

author: Raffaele

text:
Arrotondare un numero alla cifra decimale specificata (uso commerciale)
 by Karl Donaubauer
Function fctRound(varNr, Optional varPl = 2) As Double
' by Konrad Marfurt + ? + Karl Donaubauer
'varNr: numero da arrotondare
'varPI: numero di decimali (due predefinito)
   fctRound = Fix("" & varNr * (10 ^ varPl) + Sgn(varNr) * 0.5) / (10 ^
varPl)
End Function
Esempi:
Se si omette varPI, il numero viene arrotondato alla seconda cifra decimale
?fctRound(1.024) --> 1.02
?fctRound(1.025) --> 1.03
?fctRound(1.24, 1) --> 1.2
?fctRound(1.25, 1) --> 1.3
?fctRound(1240, -2) --> 1200
?fctRound(1250, -2) --> 1300
Nota:
La stringa vuota ("") non č un errore, ma un trucco per essere piů precisi
nell'arrotondamento.
from
http://www.sitocomune.com/


title: CALCOLI NELLE RUTIN

author: Sib dal portatile

text:
Si scrive ROUTINE.
Sib
--
----------------------------------------------------
la mia home:
http://digilander.iol.it/syb
----------------------------------------------------
il sito comune di it.comp.database.access:
http://www.sitocomune.com
----------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente


title: CALCOLI NELLE RUTIN

text:
"Sib dal portatile" <
sibN...@iol.it
> wrote in message
news:TFDz6.16266$wG3.1...@news.infostrada.it...
> Si scrive ROUTINE.
Dai, secondo me scherzava...:-)
Saluti.
Luciano
(DOC)


title: CALCOLI NELLE RUTIN

text:
"Luciano (DOC)" <
lucia...@sitocomune.com
> ha scritto nel messaggio
news:7WeA6.137832$lj4.4...@news6.giganews.com...
>
> "Sib dal portatile" <
sibN...@iol.it
> wrote in message
> news:TFDz6.16266$wG3.1...@news.infostrada.it...
>
> > Si scrive ROUTINE.
>
> Dai, secondo me scherzava...:-)
Dici?
Beh, in tal caso... usero' la frusta senza le borchie :-)



title: CALCOLI NELLE RUTIN

text:
"Sib dal portatile" <
sibN...@iol.it
> wrote in message
news:lLMA6.5148$xC3.1...@news.infostrada.it...
> Beh, in tal caso... usero' la frusta senza le borchie :-)
Quella che hai usato con Tatiana l'altra sera al Prive' sulla statale 37?:-)
Saluti.
Luciano
(DOC)


title: CALCOLI NELLE RUTIN

author: Sib dall'ufficio

text:
"Luciano (DOC)" <
lucia...@sitocomune.com
> ha scritto nel messaggio
news:YYUA6.142095$lj4.4...@news6.giganews.com...
> "Sib dal portatile" <
sibN...@iol.it
> wrote in message
> > Beh, in tal caso... usero' la frusta senza le borchie :-)
>
> Quella che hai usato con Tatiana l'altra sera al Prive' sulla statale
37?:-)
> Saluti.
Sssshhhhhh....
Mia moglie potrebbe sentirti!
Sib


title: Aggiornare dati da sottomaschera complessa

author: Luca

text:
Salve a tutti, essendo un principiante (ed è gia forse esagerato) nel
utilizzo di Access mi rivolgo a voi con un problema per me abbastanza
complesso.
Con una form voglio dare la possibilità di inserire dati per un
progetto legato ad un prodotto, questo prodotto ha però delle
variabili, mi sono rifatto ad un esempio di taglie/colori per
semplificare.
Per il momento sono riuscito a realizzare la form con la subform e
filtrare per cosi dire i dati relativi alle tipologie basandomi su di
una query di semplice selezione.
Il quesito è come aggiorno la tabella4 dalla subform?
La query è basata su una select della tabella2+tabella3.
La tabella 2 e 3 provengono da un server sql.
Sulla colonna variante della subform mettero una combo per selezionare
i valori.
Inoltre la colonna 'tipo' nella subform deve essere ordinata per
'postip' di tabella2 e la colonna 'variante' per 'posvar' di tabella3.
Di seguito ho inserito la struttura delle tabelle.
tabella1:
progetto (kp)
cliente
articolo
tabella2:
articolo
tipo
postip
tabella3:
tipo
variante
descrizionevariante
posvar
tabella4:
progetto
tipo
postip
variante
tabella5 (non importante ma per completezza)
tipo
descrizionetipo
devo salvare i dati nella tabella1 (teste progetti) e nella tabella 4
(righe dei progetti)
form per inserimento con progetto/cliente/articolo
subform per inserimento dati con tipo/variante/descrizionevariante
nella subform devono essere presenti solo 'tipo' legati ad 'articolo'
indicato in form
nella subform devono essere presenti solo 'varianti' legate a 'tipo'
indicato in subform
esempio di input dati
form
progetto: 1
cliente: rossi
articolo: maglione
subform
tipo   |variante | descrizione variente
modello| AA      |    modello Avana
taglia | XL      |    taglia XL
colore | 01      |    colore grigio chiaro
.
.
Ogni articolo può avere un numero diverso di 'tipo' ed ogni 'tipo' un
numero diverso di 'varianti'
Oddio forse ho esagerato, beh mi ammazzerete con i vs commenti!
Ciao Luca


title: Quantita scalare

author: mavic

text:
Salve vorrei sottoporre alla vostra attenzione un mio dubbio...
Dovendo calcolare le quantità di un articolo in un ipotetico magazzino in un
determinato momento (tenendo conto quindi dei movimenti effettuati nel tempo
di carico e scarico) e sufficiente eseguire una query di raggruppamento o
bisogna seguire le movimentazioni passo passo es:
01/01/04     quantita articolo +2    =  2
02/01/04     quantita articolo +3    =  5
03/01/04     quantita articolo -1    =   4
04/01/04     quantita articolo -2    =   2
ecc.
per essere più precisi in una query di raggruppamento inserendo e ordinando
per data viene effettuata la somma algebrica rispettando la sequenza
temporale?
Non sò se sono riuscito a essere abbastanza chiaro
Potete altrimenti suggerirmi un modo per effettuare questa operazione?
Grazie e ciao a tutti.


title: Quantita scalare

author: Alberto S.

text:
On Sat, 05 Jun 2004 16:13:46 GMT, "mavic" <
ma...@interfree.it
> wrote:
>
>Dovendo calcolare le quantità di un articolo in un ipotetico magazzino in un
>determinato momento (tenendo conto quindi dei movimenti effettuati nel tempo
>di carico e scarico) e sufficiente eseguire una query di raggruppamento o
>bisogna seguire le movimentazioni passo passo es:
>
>01/01/04     quantita articolo +2    =  2
>02/01/04     quantita articolo +3    =  5
>03/01/04     quantita articolo -1    =   4
>04/01/04     quantita articolo -2    =   2
SELECT TuaTabella.Articolo, Sum(TuaTabella.QuantitàMovimento) AS
Giacenza
FROM TuaTabella
WHERE (((TuaTabella.DataMovimento)<=#1/1/2004#))
GROUP BY TuaTabella.Articolo;
Ciao
--
Alberto
No alle guerre


title: Legame tra utenze

author: Sauro Roscini

text:
Salve a tutto il NG
Premesso che con un DB sto gestendo i consumi elettrici, il problema
consiste nel fatto che l'Enel sta modificando alcuni codici utente,
chiaramente creo un nuovo utente con la stessa anagrafica ma con il nuovo
codice (univoco) il tutto per mantenere una traccia storica , però in fase
di ricerca se devo calcolare i consumi di un'utenza (intesa come anagrafica)
dovrei prendere i dati da due utenze, (vecchia e nuova) credo di dover
creare un legame tra le due utenze ma ora non riesco assolutamente a capire
come fare..
Ammesso che sia riuscito a spiegarmi qualcuno sa come fare?
Grazie Sauro


title: Legame tra utenze

author: Alessandro Baraldi

text:
Sauro Roscini ha scritto:

Credo tu debba gestirlo con una Tabella aggiuntiva, in cui ogni utente
può avere 2 Codici
e ridefinire la PrimaryKey in questo modo ti svincoli da ogni
possibilità di errore...!
Di fatto poi nei consumi avrai come legame i 2 codici che sarai in
grado di recuperare.
@Alex


title: casella combinata

author: access il top

text:
ciao a tutti e grazie per il vostro aiuto.
ho un problema di questo genere,
in un campo di una tabella ho i seguenti dati
esempio
marco
paolo
lucia
marco
marco
ecc
nella casella combinata vorrei far comparire tutti i nomi ma solo 1
volta evitando i doppioni
esempio
marco
paolo
lucia
č possibile?
grazie


title: casella combinata

author: Pablitomf

text:
access il top ha scritto:



> è possibile?
> grazie
Ciao ACCESSILTOP... non è la prima volta che scrivi su questo NG, e + o -
conosci (o almeno dovresti conoscerre) le regole che devono rispettare i
partecipanti. Subject significativo su tutti. Fai un pò tu.
--
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
----------------------------------
Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media.
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: casella combinata

author: Fux

text:
"access il top" <
negrinelliw...@yahoo.it
> ha scritto nel messaggio
news:425bd70f$0$31969$5fc...@news.tiscali.it...

si basta che scrivi SELECT DISTINCT  nell origine riga poi il campo da
filtrare


title: casella combinata

text:
Fux ha scritto:

Non si risponde a un "Subject" cosě.
--
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
----------------------------------
Non mi fido molto delle statistiche, perchč un uomo con la testa nel forno



title: casella combinata

text:
"Pablitomf" <
maurizio...@accessgroup.it
> ha scritto nel messaggio
news:d3gm91$ab8$1...@news.newsland.it...

scusate e comunque grazie mille


title: query campi incrociati

author: Fausto

text:
io devo creare una query a campi incrociati ma non riesco a mettere come
criteri una data...
spiego meglio se faccio una query semplice e devo filtrarla per una data
metto nella  casella criteri queto
Forms![grafici report]![data1]
ma se la stessa query la faccio a campi incrociati con i stessi criteri non
mi funziona dice :
Il modulo di gestione di database Microsoft Jet non riconosce.....


title: query campi incrociati

author: Roberto dalla campagna

text:
"Fausto" <
fux.es...@virgilio.it
> ha scritto nel messaggio
news:ddets0$3ph$1...@domitilla.aioe.org...

Vai sul Sito Comune (link qui sotto) e nella sezione Queries leggi la mia
FAQ intitolata "2.12 Query a campi incrociati parametrica".
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: query campi incrociati

author: Cinzia

text:
"Fausto" <
fux.es...@virgilio.it
> ha scritto nel messaggio
news:ddets0$3ph$1...@domitilla.aioe.org...

Ciao Fausto,
devi definire il tipo di parametro, Menu Query, Parameters
inserisci Forms![grafici report]![data1]  tipo Data
e dovrebbe funzionare
Cinzia


title: query campi incrociati

text: grazie 1000  avevo cercato nel sito comune ma non avevo visto grazie


title: query campi incrociati

text:
adesso pero se associo questa query a un sottomaschera o a un sottoreport mi
da di parametrizzare column headings come si fa???


title: query campi incrociati

text:
"Fausto" <
fux.es...@virgilio.it
> ha scritto nel messaggio
news:ddf1ij$8pe$1...@domitilla.aioe.org...
> adesso pero se associo questa query a un sottomaschera o a un sottoreport
mi
> da di parametrizzare column headings come si fa???
Penso che tu non abbia scritto correttamente la dichiarzione PARAMETERS.
Comunque quello che chiedi si realizza impostando la proprietą Intestazioni
colonne (vedi help) nella struttura della query a campi incrociati, che poi
č uno dei modi per selezionare i dati di una query a campi incrociati.



title: Come trasformare una procedura Access in un eseguibile autonomo

author: RobertoA

text:
Ho visto che esistono diverse applicazioni progettate per 'impacchettare' in
un solo file e rendere immediatamente eseguibile dei programmi che
solitamente necessitano di installazione
Ad esempio questi:
http://alternativeto.net/software/altiris-svs/

Avete mai usato questi sistemi con delle procedure Access per renderle
'autonome' ed immediatamente eseguibili senza installazione?
Consigli, pro/contro ?
Ciao e grazie
RobertoA


text:

Argomento dibattutissimo.....non puoi!!! Puoi fare un exe dell'mdb, ma per quello basta anche 7zip...preparare un installer vuol dire cmq installare almeno la runtime, se no access mica funziona...dal 2007 in poi lo puoi fare da Access direttamente, prima dovevi avere il pacchetto per lo sviluppatore


text:
"Fair87" <
roby...@gmail.com
> ha scritto nel messaggio
news:3c252f39-56a3-479b...@googlegroups.com...

---------------------------

Ma hai dato un'occhiata a quei programi?
Ti tracciano la procedura di installazione comprese modifiche al registry e
poi, almeno cosi' mi sembra di aver capito, fanno funzionare tutto dentro
una specie di virtualizzazione del sistema operativo
Una specie di vmware invisibile
Pesantezza della cosa a parte, come idea dovrebbe poter andare
Personalmente ho provato sia con Cameyo che con Thinapp, la tracciatura
iniziale funziona, la 'compilazione' funziona, ma quando e' ora di avviare
l'eseguibile prodotto poi non parte niente
Devo dire che la prova che ho fatto era anche mediamente complessa, uno
script Innosetup che installa un db server, copia diversi file nelle
directory scelte, installa il runtime di Access, poi modifica delle chiavi
nel registro di configurazione Windows, poi installa un programma di backup
database e lo avvia come servizo
Forse con qualcosa di meno complesso sarebbe andato, ma mi sarebbe servito
per quel programa e quello ho provato
Ciao
RobertoA


text:
Il giorno lunedì 28 gennaio 2013 21:27:34 UTC+1, RobertoA ha scritto:
> "Fair87" <
roby...@gmail.com
> ha scritto nel messaggio
>
> news:3c252f39-56a3-479b...@googlegroups.com...
>

Non so nulla di avviare un db come servizio....specialemte Access (cosa che non credo si possa fare ne se abbia un senso, visto la pesantezza di Access). Ho solo precisato che "l'eseguibile" di Access non è possibile, essendo un applicativo interpretato (=necessita di runtime) e non compilato (standalone). Quando si parla di eeguibili si intendono un sacco di cose. Se vuoi fare un pacchetto di insatallazione, con la licenza 2007 (e superiori immagino) lo puoi fare. Io ho sviluppato con il 2007 e l'installer, con i suoi limiti, fa quello che chiedi: scrive il registry, installa il runtime, pone il tuo db nelle cartelle chge vuoi, installa i programmi che servono. Non hai bisogno di applicazioni di terzi. Far 'girare' Access stand alone non si può e stop. Se tu vuoi avere un exe, ripeto, basta uno zip qualunque che faccia un archivio autoestraente, ma non centra nulla con l' eseguibile (nel senso che clicchi e va). Avere virtual machine o altre robe esotiche, se non ci sono particolari necessità, non credo sia la soluzione corretta (chiearamente per me....). Access non si può compilare, quindi inutile perderci tempo, non è mica C++!!!
Mi dici cosa ti servirebbe fare in pratica?


text: nella versione access 2000 mi pare c'era un'opzione che permetteva di creare un db indipendente autonomo che funzionava come un eseguibile senza necessità che ci fosse access installato sul pc di utilizzo, continuo quindi a cercare


text:
Il giorno venerdì 31 marzo 2017 08:16:00 UTC+2,
inform...@gmail.com
 ha scritto:
> nella versione access 2000 mi pare c'era un'opzione che permetteva di creare un db indipendente autonomo che funzionava come un eseguibile senza necessità che ci fosse access installato sul pc di utilizzo, continuo quindi a cercare

provo questo:
https://www.microsoft.com/it-it/download/details.aspx?id=39358


text:

dopo l'installazione, quando salvi il database, trovi l'opzione ACCDE, e crea l'eseguibile.


text:
Mmmm Access ha un livello di compilazione del codice equivalente a quello di VB6... che invece creava EXE.
La compilazione in PCode sostanzialmente è identica ma dire Eseguibile e dire Stand-Alone sono 2 mondi diversissimi.
Anche VB6 se ci pensi in realtà necessitava del RUNTIME.
Pochi linguaggi consentono di creare un EXECUTE veramente esente da dipendenze.
Se poi pensiamo che oggi il NetFramework ingloba tutto il Layer di interpretazione... mi pare che alla fine sia come parlare del sesso degli Angeli se non si sviluppano sw ad altissime prestazioni... cosa che esclude tutto il mondo Net e figliastri vari.

Vabbe... divulgazione a parte... mi chiedo di cosa stiamo parlando ancora nel 2017.
Che fascino avrà mai un EXE che necessita di NetFramework e Dll come se piovesse rispetto ad un ACCDE che richiede il Runtime..?

Poi il 1° di Aprile possiamo nuovamente provare a dire che Access fa gli eseguibili...


author: Simone Calligaris

text:
"@Alex" <

In realtà, basta rinominare il .MDE in .EXE: funziona su PC formattati senza
alcun Runtime installato.
Provare per credere.

Saluti


text:
Eheheh ma non svelare tutti i segreti del mestiere ;-)

Ciao
@ALEX


text:

Scusate la mia immensa ignoranza in materia ma ho bisogno di aiuto perché ho fatto un piccolo programma di contabilità per una associazione sportiva e mi sono accordo ora che non hanno access.
Riepilogo: programma generato con access 365 estensione ACCDB.
Mi potete dire se c'è la possibilità di convertire il file in eseguibile.
Vi ringrazio infinitamente per l'aiuto.
Luigi


text:

Luigi, la questione Eseguibile non è il problema, il tuo problema è eseguire il tuo applicativo anche se nel PC non è installato MsAccess.

La soluzione è installare il pacchetto di RUNTIME che è gratuito e puoi scaricarlo quì:
https://www.microsoft.com/it-it/download/details.aspx?id=50040

Tuttavia, devo dirti che non è tutto semplice...
Prima di tutto devi convertire il tuo prodotto in un ACCDE, che è la versione compilata da ACCDB.
Con la distribuzione del RUNTIME infatti non viene distribuito l'IDE, quindi il codice viene compilato.

Ora se non hai una grande esperienza di questo processo, potresti avere un sacco di problemi nel tentativo di far funzionare tutto.
Di solito si installa una VM con le condizioni del Cliente e si procede finchè funziona.
Il probelma è che se hai scritto CODICE, con ACCDE non è debuggabile, quindi andare  capire cosa e dove sia il problema è veramente complicato.
Di solito infatti si predispone un sistema di LOG Avanzato nell'applicativo che sopperisce al DEBUG...
Altri problemi che potresti trovare:
Riferimenti a Librerie esterne non EQUIVERSIONE
Utilizzo di Immagini NON in formato BMP(il Runtime non distribuisce i Filtri di conversione, quindi non si caricheranno immagini esterne che non siano BMP)
FileDialog potrebbe non andare
Ecc...

Questo per farti capire che 9 su 10 non funzionerà nulla.

In ogni caso questa è la strada.

@Alex


text:
Il giorno domenica 12 agosto 2018 19:38:47 UTC+2, @Alex ha scritto:

Grazie infinite per la risposta
Viste le mie competenze sicuramente ci rinuncio.
Comunque grazie dell'aiuto, sei stato molto gentile
Luigi


title: Parere su query

author: Donato

text:
Salve, ho un piccolo problemino....almeno spero che sia piccolo!:-)
Devo fare una stampa degli articoli della mia azienda con alcune
caratteristiche tipo: Peso, Classificazione, Scorta.
Il problema è che il tracciato record del database è di questo tipo:
ID    Prodotto    Sez.    Voce    Valore    Lungh. Dec.
1     New5201      01     001     10,5         2        0
2     New5201      01     002     NT5         3
3     New5201      02     001     350,0       3        0
4     New5005      01     001     12,5         2        0
5     New5005      01     002     WS0        3
6     New5005      02     001     150,0       3        0
7     New6002      01     001     20,2         2        0
8     New6002      01     002     TT3         3
9     New6002      02     001     400.0       3        0
Come faccio a fare una query che abbia invece questo formato?
Prodotto       Peso   Classe      Scorta
New5201    10.5      NT5       350,0
New5005    12.5      WS0      150,0
New6002    20.2      TT3       400,0
Che cosa ne pensate del tracciato record? Stiamo cambiando software
gestionale e il nuovo db ha i file con questo tipo di tracciato record. Noi
siamo abituati con un tracciato record classico e sinceramente siamo rimasti
un po' spiazzati.
Se qualcuno ha qualche commento da fare ben venga. Grazie.
Donato
ark...@tin.it


title: Parere su query

author: Carlo Costarella

text:
"Donato" <
ark...@tin.it
> ha scritto nel messaggio
news:CoCk9.145329$ub2.3...@news1.tin.it...
> Salve, ho un piccolo problemino....almeno spero che sia piccolo!:-)
>
> Devo fare una stampa degli articoli della mia azienda con alcune
> caratteristiche tipo: Peso, Classificazione, Scorta.
>
> Il problema č che il tracciato record del database č di questo tipo:
>
> ID    Prodotto    Sez.    Voce    Valore    Lungh. Dec.
> 1     New5201      01     001     10,5         2        0
> 2     New5201      01     002     NT5         3
> 3     New5201      02     001     350,0       3        0
> 4     New5005      01     001     12,5         2        0
> 5     New5005      01     002     WS0        3
> 6     New5005      02     001     150,0       3        0
> 7     New6002      01     001     20,2         2        0
> 8     New6002      01     002     TT3         3
> 9     New6002      02     001     400.0       3        0
>
> Come faccio a fare una query che abbia invece questo formato?
>
> Prodotto       Peso   Classe      Scorta
> New5201    10.5      NT5       350,0
> New5005    12.5      WS0      150,0
> New6002    20.2      TT3       400,0
>
>
> Che cosa ne pensate del tracciato record? Stiamo cambiando software
> gestionale e il nuovo db ha i file con questo tipo di tracciato record.
Noi
> siamo abituati con un tracciato record classico e sinceramente siamo
rimasti
> un po' spiazzati.
>
> Se qualcuno ha qualche commento da fare ben venga. Grazie.
>
> Donato
>
ark...@tin.it
>
>
>
Ciao, Donato.
Il tuo problema non č chiaro, almeno per me.
Se si tratta solo di cambiare il nome ai campi nella query č molto semplice:
metti il nome che vuoi nella colonna, i due punti e il nome vero del campo.
Cosě "Valore" diventa Peso:Valore.
Se invece vuoi proprio cambiare la struttura della tabella e importare i
dati secondo il nuovo schema la cosa cambia e anche di parecchio. Ho notato
infatti che i campi Peso, Classe e Scorta del nuovo formato, hanno i valori
che sono contenuti nel campo Valore del primo formato.
Quanto poi a decidere se sia meglio l'uno o l'altro bisogna che fornisci
delle altre indicazioni.
Ciao, Carlo


title: Parere su query

author: Antonio Biso

text:
"Donato" <
ark...@tin.it
> ha scritto nel messaggio
news:CoCk9.145329$ub2.3...@news1.tin.it...
> Salve, ho un piccolo problemino....almeno spero che sia piccolo!:-)
>
> Devo fare una stampa degli articoli della mia azienda con alcune
> caratteristiche tipo: Peso, Classificazione, Scorta.
>
> Il problema è che il tracciato record del database è di questo tipo:
>
> ID    Prodotto    Sez.    Voce    Valore    Lungh. Dec.
> 1     New5201      01     001     10,5         2        0
> 2     New5201      01     002     NT5         3
> 3     New5201      02     001     350,0       3        0
> 4     New5005      01     001     12,5         2        0
> 5     New5005      01     002     WS0        3
> 6     New5005      02     001     150,0       3        0
> 7     New6002      01     001     20,2         2        0
> 8     New6002      01     002     TT3         3
> 9     New6002      02     001     400.0       3        0
>
> Come faccio a fare una query che abbia invece questo formato?
>
> Prodotto       Peso   Classe      Scorta
> New5201    10.5      NT5       350,0
> New5005    12.5      WS0      150,0
> New6002    20.2      TT3       400,0
> Se qualcuno ha qualche commento da fare ben venga. Grazie.
Se tu garantisci che i record sono sempre ordinati in quel modo e quindi
ogni terna di record contiene nel primo il peso, nel secondo la classe e nel
terzo la scorta sotto il campo valore, allora questa cosa si fa facilmente
con un po' di codice. Si aprono due recordset, uno sulla tabella iniziale e
uno su quella finale.
Ti scorri tutta la tabella iniziale, con un contatore per vedere se stai al
primo secondo e terzo record, e scrivi quello che leggi in un nuovo record
della tabella finale.
Parole chiave MOD, Addnew, movenext.
Se ti serve, due righe di codice te le posso scrivere, quando ho un momento.
> Che cosa ne pensate del tracciato record? Stiamo cambiando software
> gestionale e il nuovo db ha i file con questo tipo di tracciato record.
Noi
> siamo abituati con un tracciato record classico e sinceramente siamo
rimasti
> un po' spiazzati.
Mi sembra molto più razionale e soprattutto in formato relazionale di quello
vostro.
Non ha senso registrare informazioni realtive allo stesso oggetto in 3
record distinti!!!!
Antonio


title: Parere su query

author: Maurizio Borrelli

text:
> "Donato" news:CoCk9.145329$ub2.3...@news1.tin.it...:
> Devo fare una stampa degli articoli della mia azienda con alcune
> caratteristiche tipo: Peso, Classificazione, Scorta.
> Il problema è che il tracciato record del database è di questo tipo:
> ID    Prodotto    Sez.    Voce    Valore    Lungh. Dec.
> 1     New5201      01     001     10,5        2        0
> 2     New5201      01     002     NT5         3
> 3     New5201      02     001     350,0       3        0
> 4     New5005      01     001     12,5        2        0
> 5     New5005      01     002     WS0         3
> 6     New5005      02     001     150,0       3        0
> 7     New6002      01     001     20,2        2        0
> 8     New6002      01     002     TT3         3
> 9     New6002      02     001     400.0       3        0
> Come faccio a fare una query che abbia invece questo formato?
> Prodotto       Peso   Classe      Scorta
> New5201    10.5      NT5       350,0
> New5005    12.5      WS0       150,0
> New6002    20.2      TT3       400,0
[...]
    TRANSFORM
        First(x_Donato.Valore) AS PrimoDiValore
    SELECT
        x_Donato.Prodotto
    FROM
        x_Donato
    GROUP BY
        x_Donato.Prodotto
    ORDER BY
        x_Donato.Prodotto
    PIVOT
        IIf([x_Donato].[Sez] & [x_Donato].[Voce]="01001","Peso","")
      & IIf([x_Donato].[Sez] & [x_Donato].[Voce]="01002","Classe","")
      & IIf([x_Donato].[Sez] & [x_Donato].[Voce]="02001","Scorta","")
      In ("Peso","Classe","Scorta")
    ;
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


title: Parere su query

author: SimonenomiS

text:
"Donato" <
ark...@tin.it
> wrote in
news:CoCk9.145329$
ub2.3...@news1.tin.it
:

Supponendo che la tabella si chiami Tabella1, io scriverei così:
TRANSFORM First(Tabella1.Valore) AS PrimoDiValore
SELECT Tabella1.Prodotto
FROM Tabella1
GROUP BY Tabella1.Prodotto
PIVOT Choose(([Voce]+2*[Sez])-2,"Peso","Classe","Scorta");
Ciao.


title: Parere su query

author: Fabrizio

text:
On Thu, 26 Sep 2002 12:58:00 GMT, SimonenomiS <Si...@nomiS.it> wrote:
>TRANSFORM First(Tabella1.Valore) AS PrimoDiValore
>SELECT Tabella1.Prodotto
>FROM Tabella1
>GROUP BY Tabella1.Prodotto
>PIVOT Choose(([Voce]+2*[Sez])-2,"Peso","Classe","Scorta");
Si funzia , adesso me la studio.
Choose per me è una cosa nuova, così com'è non lo trovo, sai dirmi
dove  trovo la sintassi, grazie.
Ciao. Fabrizio


title: Parere su query

text:
On Thu, 26 Sep 2002 14:24:53 +0200, "Maurizio Borrelli"
<
maurizio...@freepass.it
> wrote:
>    TRANSFORM
>        First(x_Donato.Valore) AS PrimoDiValore
>    SELECT
>        x_Donato.Prodotto
>    FROM
>        x_Donato
>    GROUP BY
>        x_Donato.Prodotto
>    ORDER BY
>        x_Donato.Prodotto
>    PIVOT
>        IIf([x_Donato].[Sez] & [x_Donato].[Voce]="01001","Peso","")
>      & IIf([x_Donato].[Sez] & [x_Donato].[Voce]="01002","Classe","")
>      & IIf([x_Donato].[Sez] & [x_Donato].[Voce]="02001","Scorta","")
>      In ("Peso","Classe","Scorta")
>    ;
Manca qlc , adesso cerco di capire dove.
Ciao. Fabrizio


title: Parere su query

text:
Fabrizio <fabrizio...@SPAMtiscalinet.it> wrote in
news:hg16puk7u5qvqinbl...@4ax.com
:

  Nella guida in linea di Access (o di VB).
  Eccone un breve stralcio:
Seleziona e restituisce un valore da un elenco di argomenti.
Sintassi:
Choose(indice, scelta-1[, scelta-2, ... [, scelta-n]])
La sintassi della funzione Choose è composta dalle seguenti parti:
*indice: Obbligatoria. Espressione numerica o campo che restituisce un
valore compreso tra 1 e il numero delle scelte disponibili.
*scelta: Obbligatoria. Espressione Variant contenente una delle scelte
possibili.
  Ciao.
--------------------------------------
http://digilander.libero.it/winses


title: Parere su query

text:
On Thu, 26 Sep 2002 13:12:27 GMT, SimonenomiS <Si...@nomiS.it> wrote:
>>
>  Nella guida in linea di Access (o di VB).
Devo avere il solito problema con la guida : se cerco "Choose" mi
restituisce di tutto :
-Proprietą Vertical (Verticale)
-Proprietą MultiSelect (Selezione multipla)
-Criteri di testo provenienti da un controllo in una maschera
-....
e altro ancora , ma niente su "Choose": comincia ad essere un grosso
problema
>  Eccone un breve stralcio:
>
>Seleziona e restituisce un valore da un elenco di argomenti.
>
>Sintassi:
>Choose(indice, scelta-1[, scelta-2, ... [, scelta-n]])
>
>La sintassi della funzione Choose č composta dalle seguenti parti:
>*indice: Obbligatoria. Espressione numerica o campo che restituisce un
>valore compreso tra 1 e il numero delle scelte disponibili.
>*scelta: Obbligatoria. Espressione Variant contenente una delle scelte
>possibili.
>
>  Ciao.
Ti ringrazio per lo stralcio .
Ciao. Fabrizio


title: Parere su query

author: Alessandro Cara

text:
Donato wrote:
>
[cut]
> Che cosa ne pensate del tracciato record? Stiamo cambiando software
> gestionale e il nuovo db ha i file con questo tipo di tracciato record. Noi
> siamo abituati con un tracciato record classico e sinceramente siamo rimasti
> un po' spiazzati.
1) Che software e'? (mi interessa)
2) Dovrebbe avere "radici" piuttosto vecchie poiche' e' il classico
   tracciato a tipo record
3) Cosa intendi tu per "record classico"?
--
a.cara


title: Parere su query

text:
Ciao,
In realtà l'esempio che ho proposto era molto semplificato.
Ci sono, per ogni prodotto un numero di 50/60 attributi e tante altri
incasinamenti che non sto quì a dirvi...
Vorrei solamente un parere su questo tipo di struttura, dato che il
programma che stiamo accingedoci ad acquistare ha i file di archivio
dell'anagrafico strutturati in questo modo.
Attualmente in azienda usiamo le ACG sotto AS/400 e siamo abituati con un
formato record classico.
Utilizziamo molte applicazioni (Access, Excel) che tramite ODBC si collegano
(tabelle collegate) oppure importano i dati dagli archivi ACG.
La mia preoccupazione è che col nuovo programma sia possibile fare la stessa
cosa. Sinceramente questo prg proprietario che stiamo acquistando mi sembra
molto chiuso, non vorrei che la mia azienda faccia qualche caxxata e allora
volevo qualche opinione aggiuntiva.
Quindi sotto con le impressioni.
Per essere più chiari vi dò qualche altra info:
il tracciato record è questo, vorrei che notaste in particolare:
- come gestiscono il fatto che un articolo abbia più fornitori
- Il fatto che considerano un campo classico come l'insieme della Sez e
della Voce e che lo stesso è definito
  sempre sulla riga dal campo lunghezza e decimale.
- se cambio un attributo al prodotto principale (quello con fornitore 000)
questo non varia sul
  corrispondente prodotto/fornitore...
- come faccio ogni volta che devo fare delle query (noi le utilizziamo in
maniera massiccia!) dato
  che non vorremmo scrivere una riga di codice (stiamo su piattaforma
AS400)?
 ID Fornitore  Prodotto Sez.  Voce                               Valore
Lungh. Dec.
 1   0000       New5201 01    001 (Peso)                        10,5
2      0
 2   0000       New5201 01    002 (Classe)                      NT5       3
 3   0000       New5201 02    001 (Scorta)                      350,0     3
0
 4   1918       New5201 01    001                                   10,5
2      0
 5   1918       New5201 01    002                                   NT5
3
 6   1918       New5201 02    001                                   350,0
3      0
 7   1918       New5201 03    001 (Cod.x Fornitore1)     C70305  6
 8   0000       New5005 01    001                                   12,5
2      0
 9   0000       New5005 01    002                                   WS0
3
10  0000       New5005 02    001                                   150,0
3      0
11  1918       New5005 01    001                                   12,5
2      0
12  1918       New5005 01    002                                   WS0
3
13  1918       New5005 02    001                                   150,0
3      0
14  1918       New5005 03    001 (Cod.x Fornitore1)     C80209  6
15  1354       New5005 01    001                                   12,5
2      0
16  1354       New5005 01    002                                   WS0
3
17  1354       New5005 02    001                                   150,0
3      0
18  1354       New5005 03    001 (Cod.x Fornitore2)     E44404   6
Inoltre, nel nuovo prg viene utilizzato molto il metodo di scrivere su un
unico campo più valori, sulla stessa stringa che poi viene letta dal
programma che riconosce le porzioni della stringa che gli interessano.
A me sinceramente sembra un metodo un pò vecchiotto e poco funzionale....
Comunque...aspetto vostri commenti.
Grazie,
Donato
ark...@tin.it


title: modelli access

author: mav

text:
c'è nessuno che sa dove trovare dei modelli di data base da riadattare alle
proprie esigenze
grazie


title: modelli access

author: Ferrari Rino

text:
"mav" <
nos...@msn.com
> ha scritto nel messaggio
news:kf_V9.44359$0v.13...@news1.tin.it...

Ce ne quacuno come il Db di Northwind  (Cartella Samples nella dir di
Office)ed altri che potrai realizzare con l'autocomposizione, ma comunque
ti consiglio di incominciare diversamente , magari creando qualcosina dal
niente il NG ti dara sicuramente una mano in questo.
Ferrari Rino
>


title: esportare in TXT riempiendo il campo con zeri

author: giancarlo

text:
Ciao a tutti.
In A97 ho una tabella "documenti" che contiene tra gli altri il campo
[codice] con i codici documento inseriti.
Estraggo i dati con una query "q_documenti", poi ho la necessità di
esportarli in formato TXT, perchè la stringa di testo dovrà essere
utilizzata in altre applicazioni.
Il campo codice per essere importato, deve essere riempito di zeri non
significativi a sinistra del numero di codice del documento, fino ad otto
caratteri.
es. codice documento = 53
esportazione nel file TXT = 00000053
Ho provato ad inserire nel formato del campo 00000000 ed effettivamente vedo
il dato riempito di zeri, ma quando esporto, nel TXT trovo sempre 53.
Qualche suggerimento?
Grazie a tutti in anticipo.
--
Giancarlo


author: namor

text:
giancarlo ha scritto:

Crea un campo calcolato con la formula Right("00000000" & str(numero); 8)
Namor
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: impossibile creare il Database MBE

author: luigi onofrio

text:
ho un applicativo con 4 maschere, una decina di query, una quindicina di
report e 9 tabelle, ma non riesco a creare un MDE.
Mi date una mano a risolverlo?
ho visto anche il link di donKarl ? ma non riesco a risolvere.
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: impossibile creare il Database MBE

text:
Hai provato ha compilarlo ti da errore ?,
 hai provato a compattarlo ?


title: impossibile creare il Database MBE

text:
carlo....@gmail.com
 ha scritto:
> Hai provato ha compilarlo ti da errore ?,
>  hai provato a compattarlo ?
si



title: impossibile creare il Database MBE

author: Pablitomf (Maurizio Facciuti)

text:
luigi onofrio ha scritto:
> ho un applicativo con 4 maschere, una decina di query, una quindicina di
> report e 9 tabelle, ma non riesco a creare un MDE.
> Mi date una mano a risolverlo?
> ho visto anche il link di donKarl ? ma non riesco a risolvere.
Avrai di sicuro qualche errore di codice...
compilalo, risolvi eventuali problemi di codice e riprovaci...
Che vers. access hai?
Spesso il 97 pur compilandolo bene, nn crea gli MDE perchè vi sono dei
riferimenti di codice ad oggetti cancellati ai quali in precedenza avevi
attribuito del codice.. (tipo pulsanti, etichette etc...) gli oggetti sono
andati via e il codice è rimasto... e quello ti crea problemi... controlla.
--
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
----------------------------------
Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media.



title: impossibile creare il Database MBE

text:
Pablitomf (Maurizio Facciuti ha scritto:
> luigi onofrio ha scritto:
> > ho un applicativo con 4 maschere, una decina di query, una quindicina di
> > report e 9 tabelle, ma non riesco a creare un MDE.
> > Mi date una mano a risolverlo?
> > ho visto anche il link di donKarl ? ma non riesco a risolvere.
> Avrai di sicuro qualche errore di codice...
> compilalo, risolvi eventuali problemi di codice e riprovaci...
> Che vers. access hai?
ho la versione XP
> Spesso il 97 pur compilandolo bene, nn crea gli MDE perchè vi sono dei
> riferimenti di codice ad oggetti cancellati ai quali in precedenza avevi
> attribuito del codice.. (tipo pulsanti, etichette etc...) gli oggetti sono
> andati via e il codice è rimasto... e quello ti crea problemi... controlla.
ci provo, ma non so se riesco a risolvere.
--



title: impossibile creare il Database MBE

author: VedoTondo

text:
"luigi onofrio"
> ci provo, ma non so se riesco a risolvere.
Anche a me tempo fà una maschera mi creava lo stesso problema, io ho risolto
facendo un duplicato dell' MDB, e con il duplicato ho iniziato a cancellare
una maschera per volta e a ogni eliminazione provavo a creare l'MDE, ad un
certo punto ho visto che se cancellavo una maschera in particolare il
progetto si sbloccava, ho riscritto quella maschera e tutto è tornato a
posto.
Saluti Andrea


title: impossibile creare il Database MBE

author: MA

text:
luigi onofrio wrote:
> Pablitomf (Maurizio Facciuti ha scritto:
>
>> luigi onofrio ha scritto:
>
>>> ho un applicativo con 4 maschere, una decina di query, una
>>> quindicina di report e 9 tabelle, ma non riesco a creare un MDE.
>>> Mi date una mano a risolverlo?
>>> ho visto anche il link di donKarl ? ma non riesco a risolvere.
>
>
>> Avrai di sicuro qualche errore di codice...
>> compilalo, risolvi eventuali problemi di codice e riprovaci...
>> Che vers. access hai?
> ho la versione XP
>> Spesso il 97 pur compilandolo bene, nn crea gli MDE perchè vi sono
>> dei riferimenti di codice ad oggetti cancellati ai quali in
>> precedenza avevi attribuito del codice.. (tipo pulsanti, etichette
>> etc...) gli oggetti sono andati via e il codice è rimasto... e
>> quello ti crea problemi... controlla.
> ci provo, ma non so se riesco a risolvere.
Il problema non è la versione in quanto tale, ma se il formato del db
coincide cona la versione
Mi spiego, se tu sviluppi con Axp ache il formato del db deve essere xp e
non 97 o 2k
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: impossibile creare il Database MBE

text:
VedoTondo ha scritto:
> "luigi onofrio"


compilando il codice, mi dava errore su un modulo per la stampa zebrata di
un report (preso sul sito comune) che con l'mdB funziona. Ho tolto questo
modulo e l'MDE è stato creato.
il codice in questione è:
Option Compare Database
Private Sub Corpo_Print(Cancel As Integer, PrintCount As Integer)
    ' Crea un effetto ZEBRATO nella stampa Righe
    ' Alterna Trasparente(Bianco) con il colore impostato
Static fZebrato As Boolean
If fZebrato Then
Me.Corpo_Print.BackColor = 15395562 'cinza.
Else
 Me.Corpo_Print.BackColor = 16777215 'bianco.
 End If
 fZebrato = Not fZebrato
End Sub
l'errore me lo dava su me.corpo_print.backcolor
mah!



title: impossibile creare il Database MBE

text:

me.corpo.backcolor



title: Due piccoli suggerimenti

author: Giuseppe

text:
salve
due piccoli suggerimenti:
1- in sostituzione di Ctrl+C     e   Ctrl+V          provate a utilizzare:
                              Ctrl+Ins   e   Shift+Ins
2- Se occorre copiare un oggetto in Access , selezionatelo , tasto destro
del mouse ,
      Salva con nome.
giuseppe


title: Due piccoli suggerimenti

text:
"Giuseppe" <
ebq...@tin.it
> ha scritto nel messaggio
news:8mf87r$ej5$1...@nslave1.tin.it...

per il piccolo suggerimento 2 dico: tabella,query,ecc
giuseppe


title: Due piccoli suggerimenti

author: Rupen

text:
"Giuseppe" <
ebq...@tin.it
> ha scritto nel messaggio
news:8mf87r$ej5$1...@nslave1.tin.it...
> salve
> due piccoli suggerimenti:
>
> 1- in sostituzione di Ctrl+C     e   Ctrl+V          provate a utilizzare:
>                               Ctrl+Ins   e   Shift+Ins
Che differenza c'è ?


title: Due piccoli suggerimenti

text:
"Rupen" <
s42...@spes.uniud.it
> ha scritto nel messaggio
news:newscache$srltyf$s8m$1...@news.silink.com...

I due comandi (Ctrl+Ins   e   Shift+Ins) erano presenti nelle istruzioni
inviatomi by e-mail da una società software per
sloccare (unlock) un programma protetto. Mi suggeriva di sostituire la
digitazione del Name e del Serial Number (composto da molti caratteri) con i
comandi segnalati.
Attualmente non ho avuto necessità di utilizzarli in sostituzione di Ctrl+C
e   Ctrl+V  e non ho
constatato funzionalità diverse
giuseppe
giuseppe


title: Due piccoli suggerimenti

author: Daniele Fasoli

text:
"Giuseppe" <
ebq...@tin.it
> ha scritto nel messaggio
news:8mh6hu$7lq$1...@nslave2.tin.it...

> La differenza è che la seconda sequenza di scorciatoie da tastiera essendo
presente fin dal tempo di windows 3.0 funziona su TUTTE le applicazioni
windows mentre quella nuova introdotta con office (mi pare 95) non funziona
sempre nel caso si debba copiare in maschere di input (un esempio può essere
il gestionale Esatto di Esa software)
Daniele "Antares" Fasoli
fas...@easy1.easynet.it


title: Due piccoli suggerimenti

author: AleC

text:
Giuseppe <
ebq...@tin.it
> wrote in message 8mf87r$ej5$1...@nslave1.tin.it...
> salve
> due piccoli suggerimenti:
>
> 1- in sostituzione di Ctrl+C     e   Ctrl+V          provate a utilizzare:
>                               Ctrl+Ins   e   Shift+Ins
I tasti Ctrl+Ins  Shift+Ins e Shift+Del (taglia) erano i tasti di Taglia
COpia e INcolla nel Windows 3.x
che per una semplice maggiore facilità d'uso sono stati trasformati in
ctrl+x,c,v poiché sono utilizzabili usando una mano sola da Windows 95 in
poi.
>
> 2- Se occorre copiare un oggetto in Access , selezionatelo , tasto destro
> del mouse ,
>       Salva con nome.
>
> giuseppe
>
Un suggerimento:
Fruga di più così non rimani sorpreso quando qualcuno ti fa scoprire cose
nuove che tu pensi che siano nuove anche per gli altri.
AleC


title: [OT] BUON ANNO agli SFOLLATI...

author: Pablitomf (dalle ferie)

text:
Un MILIARDO di auguri agli sfollati... Che l'epocale tragedia accaduta nel
lontano Oceano, sia solo l'ulteriore prova della dignità di quei popoli
ahimè senza pari al mondo, capaci di soffrire in silenzio e di non
chiedere nulla; pace a chi nella stessa tragedia ha perso la vita, che sia
bianco, che sia nero, che sia buono o cattivo, serenità eterna a tutti
quanti loro... pace a chi questo fardello dovrà ricordarlo per tutta la
vita avendolo vissuto in prima persona e essendosi sentito inerme e
inpotente di fronte a tanta devastazione e morte...
Auguro a tutti quanti un sereno Anno, all'insegna di nuove
soddisfazioni... tanti tanti tanti auguri.
--
Ciao
Pablitomf (Maurizio Facciuti)
------------------------------
http://www.sitocomune.com/
http://www.accessgroup.it/
------------------------------
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: [OT] BUON ANNO agli SFOLLATI...

author: Gianni

text:
Un MILIARDO di auguri agli sfollati... Che l'epocale tragedia accaduta nel
> lontano Oceano, sia solo l'ulteriore prova della dignità di quei popoli
> ahimè senza pari al mondo, capaci di soffrire in silenzio e di non
> chiedere nulla; pace a chi nella stessa tragedia ha perso la vita, che sia
> bianco, che sia nero, che sia buono o cattivo, serenità eterna a tutti
> quanti loro... pace a chi questo fardello dovrà ricordarlo per tutta la
> vita avendolo vissuto in prima persona e essendosi sentito inerme e
> inpotente di fronte a tanta devastazione e morte...
>
> Auguro a tutti quanti un sereno Anno, all'insegna di nuove
> soddisfazioni... tanti tanti tanti auguri.
>
> --
> Ciao
> Pablitomf (Maurizio Facciuti)
.............Auguri di serenità.............
Gianni


title: [OT] BUON ANNO agli SFOLLATI...

author: Gaetano Di Zanni

text:
"Pablitomf (dalle ferie)" <
maurizio...@accessgroup.it
> ha scritto nel
messaggio news:cr12qk$l9r$1...@news.newsland.it...
> Un MILIARDO di auguri agli sfollati... Che l'epocale tragedia accaduta nel
> lontano Oceano, sia solo l'ulteriore prova della dignità di quei popoli
> ahimè senza pari al mondo, capaci di soffrire in silenzio e di non
> chiedere nulla; pace a chi nella stessa tragedia ha perso la vita, che sia
> bianco, che sia nero, che sia buono o cattivo, serenità eterna a tutti
> quanti loro... pace a chi questo fardello dovrà ricordarlo per tutta la
> vita avendolo vissuto in prima persona e essendosi sentito inerme e
> inpotente di fronte a tanta devastazione e morte...
>
> Auguro a tutti quanti un sereno Anno, all'insegna di nuove
> soddisfazioni... tanti tanti tanti auguri.
>
> --
> Ciao
> Pablitomf (Maurizio Facciuti)
mi associo.
Ciao e buon Anno.
p.s.: Maurizio mi dai un'occhiata al post del msgox?
Ciao.



title: [OT] BUON ANNO agli SFOLLATI...

author: ciroteo

text:
"Pablitomf (dalle ferie)" <
maurizio...@accessgroup.it
> ha scritto nel
messaggio news:cr12qk$l9r$1...@news.newsland.it...
> Un MILIARDO di auguri agli sfollati... Che l'epocale tragedia accaduta nel
> lontano Oceano, sia solo l'ulteriore prova della dignità di quei popoli
> ahimè senza pari al mondo, capaci di soffrire in silenzio e di non
> chiedere nulla; pace a chi nella stessa tragedia ha perso la vita, che sia
> bianco, che sia nero, che sia buono o cattivo, serenità eterna a tutti
> quanti loro... pace a chi questo fardello dovrà ricordarlo per tutta la
> vita avendolo vissuto in prima persona e essendosi sentito inerme e
> inpotente di fronte a tanta devastazione e morte...
>
> Auguro a tutti quanti un sereno Anno, all'insegna di nuove
> soddisfazioni... tanti tanti tanti auguri.
>
> --
> Ciao
> Pablitomf (Maurizio Facciuti)
Auguri di cuore!
Arrivederci al prossimo anno, che sia per tutti migliore.


title: [OT] BUON ANNO agli SFOLLATI...

author: Roberto da casa

text:
"Pablitomf (dalle ferie)" <
maurizio...@accessgroup.it
> ha scritto nel
messaggio news:cr12qk$l9r$1...@news.newsland.it...
> Un MILIARDO di auguri agli sfollati... Che l'epocale tragedia accaduta nel
> lontano Oceano, sia solo l'ulteriore prova della dignità di quei popoli
> ahimè senza pari al mondo, capaci di soffrire in silenzio e di non
> chiedere nulla; pace a chi nella stessa tragedia ha perso la vita, che sia
> bianco, che sia nero, che sia buono o cattivo, serenità eterna a tutti
> quanti loro... pace a chi questo fardello dovrà ricordarlo per tutta la
> vita avendolo vissuto in prima persona e essendosi sentito inerme e
> inpotente di fronte a tanta devastazione e morte...
>
> Auguro a tutti quanti un sereno Anno, all'insegna di nuove
> soddisfazioni... tanti tanti tanti auguri.
>
> --
> Ciao
> Pablitomf (Maurizio Facciuti)
>
Un augurio di un felice anno nuovo.
--
Roberto
------------------------------------------------
il Sito Comune di it.comp.appl.access
www.sitocomune.com
-----------------------------------------------


title: [OT] BUON ANNO agli SFOLLATI...

author: Rita

text:
"Pablitomf (dalle ferie)" <
maurizio...@accessgroup.it
> ha scritto nel
messaggio news:cr12qk$l9r$1...@news.newsland.it...

L'augurio più sincero è quello di trovare presto la luce nel buio totale che
si è creato......ci vorrà tempo e tanto coraggio.
Ciao
Rita


title: [OT] BUON ANNO agli SFOLLATI...

author: cidi

text:
"Pablitomf (dalle ferie)" <
maurizio...@accessgroup.it
> ha scritto nel
messaggio news:cr12qk$l9r$1...@news.newsland.it...
> Un MILIARDO di auguri agli sfollati... Che l'epocale tragedia accaduta nel
> lontano Oceano, sia solo l'ulteriore prova della dignità di quei popoli
> ahimè senza pari al mondo, capaci di soffrire in silenzio e di non
> chiedere nulla; pace a chi nella stessa tragedia ha perso la vita, che sia
> bianco, che sia nero, che sia buono o cattivo, serenità eterna a tutti
> quanti loro... pace a chi questo fardello dovrà ricordarlo per tutta la
> vita avendolo vissuto in prima persona e essendosi sentito inerme e
> inpotente di fronte a tanta devastazione e morte...
>
> Auguro a tutti quanti un sereno Anno, all'insegna di nuove
> soddisfazioni... tanti tanti tanti auguri.
>
> --
> Ciao
> Pablitomf (Maurizio Facciuti)
>
Buon Anno anche a te
Daniele


title: conversione da testo a numero

author: tipo

text:
che funzione si usa in una query per convertire dei numeri in formato testo
in numeri formato numerico?
grazie


title: conversione da testo a numero

author: ALESSANDRO Baraldi

text:
"tipo" <
va...@virgilio.it
> ha scritto nel messaggio
news:c2a5oe$1qrbl3$1...@ID-168410.news.uni-berlin.de...

Val(stringa)
Ciao.
@Alex.


title: conversione da testo a numero

text:
"tipo" <
va...@virgilio.it
> ha scritto nel messaggio
news:c2a5oe$1qrbl3$1...@ID-168410.news.uni-berlin.de...

Se i numeri dovessero contenere decimali prova con la funzione CDbl (vedi
help).
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: conversione da testo a numero

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:Gu12c.50202$Kc3.1...@twister2.libero.it...

grazie a tutti e due!!!


title: Errore out of memory su aggiornamento tabella

author: Pisciotta Fabio

text:
Ciao a tutti,
Ho un progetto adp (Access xp) per l'estrazione di N record in base a dei
criteri variabili. La tabella in questione contiene circa 17 milioni di
record.
La funzione apre in lettura la tabella ed ad ogni nStep marca il record come
selezionato. Quando il numero dei record marcati è uguale al numero dei
record da estrarre (Me!nNominativi) il ciclo si interrompe. Il problema si
verifica quando devo selezionare i record analizzando tutta la tabella,
arrivato ad un certo punto mi visualizza il messaggio: Out of memory. Dove
sbaglio?
Grazie comunque.
Questo è il codice
    Dim rst As New ADODB.Recordset
    Dim strSQL, strSQLWHERE As String
    Dim SQLWHEREArea, SQLWHERERegione, SQLWHEREProvincia, SQLWHEREComune, x
As String
    Dim zArea, zRegione, zProvincia, zComune, i As Integer
    Dim nNomiDaEstrarre, nStep, nRecord As Double
    ...............
    nStep = Me!NMaxArchivioFiltrati \ Me!nNominativi        'operatore \
divide restituendo solo intero
    If nStep < 1 Then nStep = 1
    i = 1
    nNomiDaEstrarre = 0
    If SQLWHEREArea = "" And SQLWHERERegione = "" And SQLWHEREProvincia = ""
And SQLWHEREComune = "" Then
        strSQL = "SELECT * FROM TPrivati WHERE (Selezionato IS NULL)"
'Analizza tutta la tabella
    Else
        strSQL = "SELECT * FROM TPrivati WHERE (Selezionato IS NULL) AND " &
strSQLWHERE        'con il filtro funziona
    End If
    rst.Open strSQL, CurrentProject.Connection, adOpenForwardOnly,
adLockReadOnly
    If RecordsetisEmpty(rst) = 0 Then
        rst.MoveFirst
        Do While Not rst.EOF
            If i = nStep Then
                DoCmd.RunSQL "EXEC StP_CampoSelezione_Aggiorna " & rst!Id &
", " & Me!chrSelezione
                i = 1
                nNomiDaEstrarre = nNomiDaEstrarre + 1
                If nNomiDaEstrarre = Me!nNominativi Then Exit Do
            End If
            rst.MoveNext                                 'qua si blocca e
visualizza il messaggio di out of memory
            i = i + 1
        Loop
    End If
    Set rst = Nothing


author: giorgio rancati

text:
"Pisciotta Fabio" <
pisciot...@email.it
> ha scritto nel messaggio
news:37r8ufF...@individual.net...
> Ciao a tutti,
>
> Ho un progetto adp (Access xp) per l'estrazione di N record in base a dei
> criteri variabili. La tabella in questione contiene circa 17 milioni di
> record.
> La funzione apre in lettura la tabella ed ad ogni nStep marca il record
come
> selezionato. Quando il numero dei record marcati è uguale al numero dei
> record da estrarre (Me!nNominativi) il ciclo si interrompe. Il problema si
> verifica quando devo selezionare i record analizzando tutta la tabella,
> arrivato ad un certo punto mi visualizza il messaggio: Out of memory. Dove
> sbaglio?
> Grazie comunque.
> Questo è il codice
[CUT]
Ciao Fabio,
Una soluzione lato server sarebbe la cosa ottimale, se ho capito bene il
problema (per ogni x clienti sottoposti a un filtro assegnare ad un cliente
il valore Me!chrSelezione) non dovrebbe essere un grosso problema.
Ma veniamo al tuo Out of memory
Access xp accede a Sql server per mezzo del provider
*Microsoft.Access.OLEDB.10.0* e del Data provider  *SQLOLEDB.1*
Il Provider in uso ignora le impostazioni che hai assegnato all'apertura del
recordset assegnandogli in ogni caso il cursore adOpenStatic.
prova ad aprire una connessione al tuo db in questo modo
--------------
Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
cn.Open "Provider=SQLOLEDB.1" & _
        ";Data Source=TuoServer" & _
        ";Initial Catalog=TuoDatabase" & _
        ";Integrated Security=SSPI"
--------------
poi apri il tuo recordset con la connessione appena creata
---------------
rst.Open strSQL, Cn, adOpenForwardOnly,adLockReadOnly
---------------
dovresti riscontrare anche un notevole aumento di prestazioni date
dall'effettivo tipo di cursore adOpenForwardOnly.
Ricordati poi di chiudere e distruggere la connessione prima di uscire dalla
sub
------------------
Rst.Close
Set Rst=Nothing
Cn.Close
Set Cn=Nothing
-----------------
Ciao Giorgio


text:
"giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
messaggio news:42188a7e$0$32343$5fc...@news.tiscali.it...

Ciao Giorgio
Lato server sarebbe ottimale , ma non riesco a creare un SP dove ad ogni N
record marco il record stesso.
Con questa soluzione 4.863.000 record sono stati analizzati in 40 minuti.
Questa routine forse può essere migliorata con CacheSize e Move, spostando
il puntatore ogni nRecord.
Grazie
Fabio


text:
"Pisciotta Fabio" <
pisciot...@email.it
> ha scritto nel messaggio
news:37rmk1F...@individual.net...
>
> "giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
> messaggio news:42188a7e$0$32343$5fc...@news.tiscali.it...
> >
> > "Pisciotta Fabio" <
pisciot...@email.it
> ha scritto nel messaggio
> > news:37r8ufF...@individual.net...
> > > Ciao a tutti,
[CUT]
> Ciao Giorgio
> Lato server sarebbe ottimale , ma non riesco a creare un SP dove ad ogni N
> record marco il record stesso.
se vuoi prendere spunto da questo esempio che seleziona 200 clienti su una
tabella di 8 milioni prendendo in esame 4 milioni di clienti.
Tempo impiegato per la selezione 9 minuti.
E' la prima volta che suggerisco l'uso dei cursori in T-SQL, di solito li
evito ma in questo caso provando con altre strade non sono riuscito a stare
sotto i 40 minuti :(
una curiositą, hai 17 milioni di nominativi ?? lavori per l'anagrafe
tributaria ? :-)
Ciao Giorgio
-----------------------------
USE TEMPDB
GO
--Creo la tabella Clienti
CREATE TABLE Clienti
(Id int Identity(1,1) Primary Key,
 Nome varchar(50),
 Selezionato Bit default (0))
INSERT Clienti (Nome) VALUES('Cliente')
Declare @i int
SET @i=1
SET NOCOUNT ON
--Inserisco 8 milioni di record
WHILE @i<24 BEGIN
   INSERT Clienti (Nome)
   SELECT Nome
   FROM   Clienti
   SET @i=@i+1
END
--Inizio selezione
Declare @DaSelezionare int,
        @Ogni int,
        @Id Int,
        @Nrec int
SELECT  @DaSelezionare =200,
        @Ogni = 20000,
        @Nrec=0
DECLARE Clienti_Cursor CURSOR FAST_FORWARD FOR
SELECT ID FROM Clienti
WHERE 1=1 -- Qui merri la tua WHERE
ORDER BY ID
OPEN Clienti_Cursor
FETCH NEXT FROM Clienti_Cursor
INTO @Id
WHILE @@FETCH_STATUS = 0
BEGIN
   SET @Nrec=@Nrec+1
   IF @Nrec % @Ogni=0 BEGIN
      UPDATE Clienti
         SET Selezionato=1
      WHERE  ID=@Id
      SET @DaSelezionare=@DaSelezionare-1
      IF @DaSelezionare=0
         BREAK
   END
   FETCH NEXT FROM Clienti_Cursor
   INTO @ID
END
CLOSE Clienti_Cursor
DEALLOCATE Clienti_Cursor
-- Lista dei 200 clienti selezionati
Select * From Clienti
Where Selezionato = 1
Order By ID
--Pulizia
DROP TABLE Clienti
--------------------------------


text:
"giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
messaggio news:4218c518$0$32353$5fc...@news.tiscali.it...
>
> "Pisciotta Fabio" <
pisciot...@email.it
> ha scritto nel messaggio
> news:37rmk1F...@individual.net...
> >
> > "giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
> > messaggio news:42188a7e$0$32343$5fc...@news.tiscali.it...
> > >
> > > "Pisciotta Fabio" <
pisciot...@email.it
> ha scritto nel messaggio
> > > news:37r8ufF...@individual.net...
> > > > Ciao a tutti,
> [CUT]
> > Ciao Giorgio
> > Lato server sarebbe ottimale , ma non riesco a creare un SP dove ad ogni
N
> > record marco il record stesso.
>
> se vuoi prendere spunto da questo esempio che seleziona 200 clienti su una
> tabella di 8 milioni prendendo in esame 4 milioni di clienti.
> Tempo impiegato per la selezione 9 minuti.
> E' la prima volta che suggerisco l'uso dei cursori in T-SQL, di solito li
> evito ma in questo caso provando con altre strade non sono riuscito a
stare
> sotto i 40 minuti :(
>
> una curiosità, hai 17 milioni di nominativi ?? lavori per l'anagrafe

Ciao Giorgio,
17 milioni di nominativi, ricerche di mercato e telemarketing, estrazione
casuale di nominativi per area e/o regione e/o provincia e/o comune.
Ho fatto delle prove e su 4863175 per marcare 1000 nominativi impiega da 2 a
3 minuti, incredibile.
Questo è il codice:
Private Sub cmdCreaTabellaEsportazione_Click()
    Dim rst As New ADODB.Recordset
    Dim cn As ADODB.Connection
    Dim strSQL, strSQLWHERE As String
    Dim SQLWHEREArea, SQLWHERERegione, SQLWHEREProvincia, SQLWHEREComune, x
As String
    Dim i, iDoEvent As Integer
    Dim nNomiDaEstrarre, nStep, nRecord As Double
    Me!TimeInizio = Time()
    Set cn = New ADODB.Connection
    cn.Open "Provider=SQLOLEDB.1;Data Source=Fabio;Initial
Catalog=Privati;Integrated Security=SSPI"
    If Val(Me!nNominativi) = 0 Then
        MsgBox "N° Nominativi da estrarre zero.", vbCritical + vbOKOnly,
"Attenzione"
        Exit Sub
    End If
    If Me!NMaxArchivioFiltrati < Val(Me!nNominativi) Then
        MsgBox "N° Nominativi da estrarre errato.", vbCritical + vbOKOnly,
"Attenzione"
        Exit Sub
    End If
    If Me!TRArea = "00" Then SQLWHEREArea = ""
    If Me!TRArea <> "00" Then
        SQLWHEREArea = StringaWHERE("NArea", "TRArea")
    End If
    If Me!TRRegione = "00" Then SQLWHERERegione = ""
    If Me!TRRegione <> "00" Then
        SQLWHERERegione = StringaWHERE("IdRegione", "TRRegione")
    End If
    If Me!TRProvincia = "00" Then SQLWHEREProvincia = ""
    If Me!TRProvincia <> "00" Then
        SQLWHEREProvincia = StringaWHERE("IdProvincia", "TRProvincia")
    End If
    If Me!TRComune = "00" Then SQLWHEREComune = ""
    If Me!TRComune <> "00" Then
        SQLWHEREComune = StringaWHERE("IdComune", "TRComune")
    End If
    strSQLWHERE = ""
    If SQLWHEREArea <> "" And SQLWHERERegione = "" And SQLWHEREProvincia =
"" And SQLWHEREComune = "" Then
        strSQLWHERE = SQLWHEREArea
    End If
    If SQLWHEREArea = "" And SQLWHERERegione <> "" And SQLWHEREProvincia =
"" And SQLWHEREComune = "" Then
        strSQLWHERE = SQLWHERERegione
    End If
    If SQLWHEREArea = "" And SQLWHERERegione = "" And SQLWHEREProvincia <>
"" And SQLWHEREComune = "" Then
        strSQLWHERE = SQLWHEREProvincia
    End If
    If SQLWHEREArea = "" And SQLWHERERegione = "" And SQLWHEREProvincia = ""
And SQLWHEREComune <> "" Then
        strSQLWHERE = SQLWHEREComune
    End If
    If SQLWHEREArea <> "" And SQLWHERERegione <> "" And SQLWHEREProvincia =
"" And SQLWHEREComune = "" Then
        strSQLWHERE = SQLWHEREArea & " AND " & SQLWHERERegione
    End If
    If SQLWHEREArea <> "" And SQLWHERERegione = "" And SQLWHEREProvincia <>
"" And SQLWHEREComune = "" Then
        strSQLWHERE = SQLWHEREArea & " AND " & SQLWHEREProvincia
    End If
    If SQLWHEREArea <> "" And SQLWHERERegione = "" And SQLWHEREProvincia =
"" And SQLWHEREComune <> "" Then
        strSQLWHERE = SQLWHEREArea & " AND " & SQLWHEREComune
    End If
    If SQLWHEREArea = "" And SQLWHERERegione <> "" And SQLWHEREProvincia <>
"" And SQLWHEREComune = "" Then
        strSQLWHERE = SQLWHERERegione & " AND " & SQLWHEREProvincia
    End If
    If SQLWHEREArea = "" And SQLWHERERegione <> "" And SQLWHEREProvincia =
"" And SQLWHEREComune <> "" Then
        strSQLWHERE = SQLWHERERegione & " AND " & SQLWHEREComune
    End If
    If SQLWHEREArea = "" And SQLWHERERegione = "" And SQLWHEREProvincia <>
"" And SQLWHEREComune <> "" Then
        strSQLWHERE = SQLWHEREProvincia & " AND " & SQLWHEREComune
    End If
    If SQLWHEREArea <> "" And SQLWHERERegione <> "" And SQLWHEREProvincia <>
"" And SQLWHEREComune = "" Then
        strSQLWHERE = SQLWHEREArea & " AND " & SQLWHERERegione & " AND " &
SQLWHEREProvincia
    End If
    If SQLWHEREArea <> "" And SQLWHERERegione <> "" And SQLWHEREProvincia =
"" And SQLWHEREComune <> "" Then
        strSQLWHERE = SQLWHEREArea & " AND " & SQLWHERERegione & " AND " &
SQLWHEREComune
    End If
    If SQLWHEREArea <> "" And SQLWHERERegione = "" And SQLWHEREProvincia <>
"" And SQLWHEREComune <> "" Then
        strSQLWHERE = SQLWHEREArea & " AND " & SQLWHEREProvincia & " AND " &
SQLWHEREComune
    End If
    If SQLWHEREArea = "" And SQLWHERERegione <> "" And SQLWHEREProvincia <>
"" And SQLWHEREComune <> "" Then
        strSQLWHERE = SQLWHERERegione & " AND " & SQLWHEREProvincia & " AND
" & SQLWHEREComune
    End If
    If SQLWHEREArea <> "" And SQLWHERERegione <> "" And SQLWHEREProvincia <>
"" And SQLWHEREComune <> "" Then
        strSQLWHERE = SQLWHEREArea & " AND " & SQLWHERERegione & " AND " &
SQLWHEREProvincia & " AND " & SQLWHEREComune
    End If
    nStep = Me!NMaxArchivioFiltrati \ Me!nNominativi     'operatore \ divide
restituendo solo intero
    If nStep < 1 Then nStep = 1
    i = 1
    nNomiDaEstrarre = 0
    If SQLWHEREArea = "" And SQLWHERERegione = "" And SQLWHEREProvincia = ""
And SQLWHEREComune = "" Then
        strSQL = "SELECT Id FROM TPrivati WHERE (Selezionato IS NULL)"
    Else
        strSQL = "SELECT Id FROM TPrivati WHERE (Selezionato IS NULL) AND "
& strSQLWHERE
    End If
    Me!ProgressBar2.Min = 0
    Me!ProgressBar2.Max = Val(Me!nNominativi)
    rst.Open strSQL, cn, adOpenForwardOnly, adLockReadOnly
    If RecordsetisEmpty(rst) = 0 Then
        rst.MoveFirst
'Inizio nuovo ciclo
        rst.CacheSize = 500000              ' imposto la quantità di record
da anilizzare, dalle prove fatte fino a questo momento, dovrebbe essere il
numero ottimale.
        Do While Not rst.EOF
            DoCmd.RunSQL "EXEC StP_CampoSelezione_Aggiorna " & rst!Id & ", "
& Me!chrSelezione
            nNomiDaEstrarre = nNomiDaEstrarre + 1
            Me!ProgressBar2.Object.Value = nNomiDaEstrarre
            If nNomiDaEstrarre = Val(Me!nNominativi) Then Exit Do
            rst.Move nStep
'sposto il cursore ogni nstep senza dover scorrere tutta la tabella
            iDoEvent = DoEvents()
        Loop
'Fine nuovo ciclo
'Vecchio ciclo 40 minuti ' scorro tutta la tabella di 4863175
        'Do While Not rst.EOF
        '    If i = nStep Then
        '        DoCmd.RunSQL "EXEC StP_CampoSelezione_Aggiorna " & rst!Id &
", " & Me!chrSelezione
        '        i = 1
        '        nNomiDaEstrarre = nNomiDaEstrarre + 1
        '        Me!ProgressBar2.Object.Value = nNomiDaEstrarre
        '        If nNomiDaEstrarre = Val(Me!nNominativi) Then Exit Do
        '    End If
        '    rst.MoveNext
        '    i = i + 1
        '    Me!ProgressBar1.Object.Value = i
        'Loop
'Fine vecchio ciclo
    End If
    Set rst = Nothing
    cn.Close
    Set cn = Nothing
    Me!TimeFine = Time()
    Me!NTRDisponibili = Me!NTRDisponibili - Val(Me!nNominativi)
    MsgBox "Selezione terminata"
End Sub
Grazie per il codice
Ciao Fabio


text:
"Pisciotta Fabio" <
pisciot...@email.it
> ha scritto nel messaggio
news:37teveF...@individual.net...
>
> "giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
> messaggio news:4218c518$0$32353$5fc...@news.tiscali.it...
> >
> > "Pisciotta Fabio" <
pisciot...@email.it
> ha scritto nel messaggio
> > news:37rmk1F...@individual.net...
> > >
> > > "giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto
nel
> > > messaggio news:42188a7e$0$32343$5fc...@news.tiscali.it...
> > > >
> > > > "Pisciotta Fabio" <
pisciot...@email.it
> ha scritto nel
messaggio
> > > > news:37r8ufF...@individual.net...
> > > > > Ciao a tutti,
[CUT]
> >
> >
> >
> Ciao Giorgio,
> 17 milioni di nominativi, ricerche di mercato e telemarketing, estrazione
> casuale di nominativi per area e/o regione e/o provincia e/o comune.
> Ho fatto delle prove e su 4863175 per marcare 1000 nominativi impiega da 2
a
> 3 minuti, incredibile.
> Questo è il codice:
>
[CUT]
>
>             rst.Move nStep
> 'sposto il cursore ogni nstep senza dover scorrere tutta la tabella
>
vero, che bisogno c'è di passarseli uno alla volta ? complimenti :-)
ho provato la stessa tecnica in T-SQL e ottengo il risultato dopo 40 Secondi
:-)
Per il momento so che i 2 minuti che hai ottenuto sono un bel risultato ma
se un giorno vorrai provarla con calma .....
Ciao Giorgio
--------------------
-- Inizio selezione
Declare @DaSelezionare int,
        @Ogni int,
        @Id Int
SELECT  @DaSelezionare =200,
        @Ogni = 20000
DECLARE Clienti_Cursor CURSOR SCROLL FOR
SELECT ID FROM Clienti
WHERE 1=1 -- Qui la tua Where
ORDER BY ID
OPEN Clienti_Cursor
FETCH NEXT FROM Clienti_Cursor
INTO @Id
WHILE @@FETCH_STATUS = 0
BEGIN
   UPDATE Clienti
      SET Selezionato=1
   WHERE  ID=@Id
   SET @DaSelezionare=@DaSelezionare-1
   IF @DaSelezionare=0
      BREAK
   FETCH RELATIVE @Ogni FROM Clienti_Cursor
   INTO @ID
END
CLOSE Clienti_Cursor
DEALLOCATE Clienti_Cursor
---------------------


title: OCX che va con VB6 ma non con Access

author: Fabrizio Ramponi

text:
Ho bisogno di una textbox che mi permetta di gestire il colore del
font ed il colore di fondo carattere per carattere.
Devo visualizzare l'equivalente di uno schermo MS-DOS a colori.
Dopo varie ricerche l'unico componente free che ho trovato che mi
permetta una cosa del genere è DJText
(
http://www.toolcity.net/~djcomlab/index.html
).
Solo che mentre tale ocx mi funziona bene dentro un progetto VB6 (o
VB5), quando cerco di inserirlo in una maschera access ottengo un
errore e mi viene consigliato di riavviare il server OLE all'esterno
di accesso.
Che significa?
Come posso risolvere la cosa?
Se non si potesse (ho provato anche a contattare il programmatore di
DJText ma non mi ha risposto ancora) c'è qualcuno che sa dirmi dove
posso trovare un OCX che permetta l'emulazione di uno schermo a
caratteri DOS a colori.
Tutti gli ocx che ho trovato fornivano una emulazione terminale
completa (VT-100, gestione seriale, protocollo di trasferimento files,
....) che a me non serve ed inoltre erano tutti a pagamento.
Comprare un OCX di quel tipo solo per usarne un frammento sinceramente
non mi va.
Ciao
Fabrizio


title: Tipologia di ricerca con casella combinata

author: Artiglio

text:
Ciao ragazzi,
Descrizione della Richiesta.
Tempo fa su un programma access ho visto funzionare una casella di
riepilogo che limitava la visualizzazione dei record progressivamente
alla digitazione dei valori. Es. una C.onbinata cercava  in un campo
codici EAN (i vecchi codici a barre). Se l'operatore digitava 80015 la
casella combinata visualizzava a schermo tutti, e solo, quei codici
ean che iniziavano con 80015. Man mano che aggiungeva numeri le
visualizzazioni erano sempre più filtrate fino a quando inseriva 12
cifre e la casella combuinata mostrava 10 record:
8001500000000
8001500000001
8001500000002
8001500000003
8001500000004
800150000000....
Richiesta.
Qual è il codice che devo inserire nella casella combinata per
ottenere il risultato descritto sopra?
Grazie infinite Sandro!!


author: almorel

text:

Semplicemente attiva la proprietà di espansione automatica (nelle
maschera delle proprietà Dati della combo.
Ciao
Alberto


text: Ho fatto come dici ma nulla di fatto


text:
On 11 Lug, 17:55, Artiglio <
ingrao...@tiscali.it
> wrote:
> Ho fatto come dici ma nulla di fatto
La funzione che cercavo sostanzialmente restringeva a video i soli
record che via via si completa digitandolo. L'espansione automatica se
ho capito bene individua i record ma tutti gli altri sono ancora
presenti e visibili. Spero che questo possa aiutarvi a capire meglio
quello che vorrei fargli eseguire alla mia combo


text:
On 12 Lug, 10:00, Artiglio <
ingrao...@tiscali.it
> wrote:
> On 11 Lug, 17:55, Artiglio <
ingrao...@tiscali.it
> wrote:
>
ok ragazzi .... sono riuscito a recuperare quel programma (chiuso alla
programmazione). In pratica ricordavo male!!!!!
La maschera è composta da 1 Casella di testo e da 1 casella di
riepilogo (senza pulsanti di spostamento verticale).
La digitazione viene esguita nella casella di testo e in quella di
riepilogo (che funge da lista filtrata) vengono visualizzati soltanto
i record che hanno la parte digitata


author: Popi - TheBadHabits

text:

Ciao!
Posto che tu abbia una textbox non associata "TestoDigitato" ed una
combobox "VociSelezionabili" in cui vuoi far comparire i soli record
la cui chiave inizia con quanto presente in "TestoDigitato", questo
potrebbe fare alla bisogna.
Private Sub TestoDigitato_AfterUpdate()
    With Me.EswbsLista
        .RowSource = "SELECT CampoCodice, CampoDescrizione FROM
TuaTabella WHERE (CampoCodice LIKE '" & Me.TestoDigitato & "*');"
        .Requery
        .Dropdown
    End With
End Sub
HTH
Popi


text:
>     With Me.EswbsLista
EswbsLista non è riconosciuto da Access. l'ho messo sul motore di
ricerca ma non esce nulla


text:

Se l'avessi trovato mi sarei preoccupato.
*MOLTO*.
Per scrivere quel codice mi sono appoggiato ad un software che sto
sviluppando.
Se,però, ti fossi soffermato sul preambolo all'esempio, però, ti
saresti accorto che nel codice non c'era nessun riferimento alla
combobox "VociSelezionabili", e visti proprietà e metodi in gioco ti
sarebbe stato facile arrivare alla soluzione.
Private Sub TestoDigitato_AfterUpdate()
    With Me.VociSelezionabili
        .RowSource = "SELECT CampoCodice, CampoDescrizione FROM
TuaTabella WHERE (CampoCodice LIKE '" & Me.TestoDigitato & "*');"
        .Requery
        .Dropdown
    End With
End Sub
A meno che non ti serva la PappaPronta (TM).
Popi :)


text:
Ciao Popi
Ho compilato con il codice che segue, il mio Database
Private Sub MyTextbox_Change()
   Dim CaratteriDigitati As String
   CaratteriDigitati = Nz(Me!MyTextbox.Text, "")
   Me!MyListbox.RowSource = "SELECT nomeCampo FROM nomeTabella " & _
      "WHERE nomeCampo LIKE '" & CaratteriDigitati & "*'"
End Sub
Ma non funziona!!
Ho provato a compilare lo stesso codice nella maschera di tabella1 con
un solo campo ID (che non è una chiave) e Funziona. Dov'è la
difficolta che non riesco a superare?
Non sono un programmatore come avrai capito e sto cercando di trovare
una soluzione ottimale per le mie esigenze.


text:

Scusa Artiglio, ma il numero di punti esclamativi dopo la frase "non
funziona" non aiuta certo a capire *perché*.
Mi spiego:
1) segnala errore: che codice e testo errore escono?
2) non visualizza nulla,
3) visualizza dati sbagliati: che dati hai fornito e cosa ti saresti
aspettato di vedere?
E, per inciso, il campo "NomeCampo" della tabella "NomeTabella" ... è
un campo testo, vero?
Inoltre, nell'esempio che ti ho dato c'erano (non a caso) i due
comandi requery e dropdown: mettendoli nel tuo codice cosa succede?
In quanto all'ultima frase, permettimi di correggerti: siamo tutti
programmatori, solo che mentre alcuni lo fanno solo nella vita altri
lo fanno anche con il computer ;)
Popi


text:
Ok Mancavano le parentesi Quadre per i nomi con spazio delle tabelle
Post Chiuso con successo!!


text:
On 12 Lug, 16:23, Artiglio <
ingrao...@tiscali.it
> wrote:
> Ok Mancavano le parentesi Quadre per i nomi con spazio delle tabelle
Mi viene in mente quel tipo che diceva "mi sono perso: se dovessi
andare da Roma a Milano, che strada dovrei fare?", e dopo aver
ascoltato tutte le spiegazioni se ne usciva con "sono arrivato, però
che giro per andare da Via Pascoli a Piazza Verdi".
Popi


text:

Popi a me viene in mente un criticone che ha tanta voglia di dire e
mostrarsi bravo, anche con chi è alle prime armi...!!
l'hai presente la pubblicità ... ti piace vincere facile...!! Beh ecco
questa è la mia sensazione in questo momento.
E' comunque doveroso da parte mia ringraziarti per aver risposto alla
mia richiesta


text:

Contavo sul fatto che (Nomen omen) avresti afferrato il punto "se hai
un problema con una query e chiedi aiuto devi dire quella query com'è
fatta, se fai vedere un'altra query ...".
Poi, a parte questo, IMVHO ognuno è libero di pensare e scrivere ciò
che vuole, perculeggiare sfottere & criticare inclusi [1].
In ogni caso, se mi piacesse vincere facile pensi davvero che starei
qua? [2]
Spiacente che te la sia presa, comunque prego.
Popi [3]
[1] Sempre e solo con Correttezza e Sincerità: due buone amiche.
[2] Come partecipante attivo, non come semplice postatore di
richieste.
[3] Va bene che questo è un ng tecnico, ma un po' di senso
dell'umorismo ...


text:

> dell'umorismo ...- Nascondi testo citato
>
> - Mostra testo citato -
Confermi quello che pensavo ... sei uno di quelli che deve dire sempre
l'ultima!!
E che la sua è sempre la risposta giusta...!!!
Se sei contento tu...!!


author: Antonio Biso

text:
"Artiglio" <
ingr...@tiscali.it
> ha scritto nel messaggio
news:1a124d21-a6a0-4926...@34g2000yqr.googlegroups.com...



Io credo che uno che sono 4 giorni che perde del suo tempo libero a gratisse
per risolvere il TUO problema, (virgola e a capo)
meriti un minimo di rispetto in più da parte tua, anche se ritieni di essere
nel giusto e abbassando comunque umilmente la testa, dicendo semplicemente:
(due punti a capo)
GRAZIE       (e basta...)
Antonio


text:

> Confermi quello che pensavo ... sei uno di quelli che deve dire sempre
> l'ultima!!
> E che la sua è sempre la risposta giusta...!!!
> Se sei contento tu...!!
Ciao Sandro.


text:
On 14 Lug, 13:15, "Antonio Biso" <
ab...@libero.it
> wrote:
> Io credo che uno che sono 4 giorni che perde del suo tempo libero a gratisse
> per risolvere il TUO problema, (virgola e a capo)
> meriti un minimo di rispetto in più da parte tua, anche se ritieni di essere
> nel giusto e abbassando comunque umilmente la testa, dicendo semplicemente:
> (due punti a capo)
>
> GRAZIE       (e basta...)
>
> Antonio
Grazie, Antonio.
Quando passerai dalle mie parti sai come avvisarmi ;)
Popi
P.s.: ma che è ... colpa di Fukushima?????


text: Grazie, Antonio!!


text:
"Popi - TheBadHabits" <
rlu...@yahoo.com
> ha scritto nel messaggio
news:6b182dba-b5bc-4748...@cq10g2000vbb.googlegroups.com...
On 14 Lug, 13:15, "Antonio Biso" <
ab...@libero.it
> wrote:
> Io credo che uno che sono 4 giorni che perde del suo tempo libero a
> gratisse
> per risolvere il TUO problema, (virgola e a capo)
> meriti un minimo di rispetto in pi� da parte tua, anche se ritieni di
> essere
> nel giusto e abbassando comunque umilmente la testa, dicendo
> semplicemente:
> (due punti a capo)
>
> GRAZIE (e basta...)
>
> Antonio
Grazie, Antonio.
Quando passerai dalle mie parti sai come avvisarmi ;)
;)
P.s.: ma che � ... colpa di Fukushima?????
s�, e di katrina, e di chernobil e di krakatoa e di tunguska ecc. ecc.
Antonio


title: cambiare nome ed icona maschera

author: Maurizio

text:
Ciao a tutti, vorrei fare in modo che in alto a sinistra di una maschera
invece di averela dicitura es: frm_rubrica:maschera, non appaia nulla,
inoltre vorrei cambiare l'iconcina che affianca tale dicitura con una mia
Mi data qualche indicazione?
Ciao