title: Protezione del BE su server Lan

text:
"Carlo Costarella" <
carloantonioco...@virgilio.it
> ha scritto nel
messaggio news:dHpNd.504011$b5.23...@news3.tin.it...

Se invece uso MySQL? Non ho bisogno di licenze, mi confermi?
Se fosse con MySQL che limite ho nel numero di utenti collegati
contemporaneamente?
Grazie e scusa se approfitto della tua disponibilità.
--
Ken


title: Protezione del BE su server Lan

author: MA

text:
>
> Se invece uso MySQL? Non ho bisogno di licenze, mi confermi?
Hai la licenza per utilizzarlo non per distribuirlo (quest'ultima si paga)
> Se fosse con MySQL che limite ho nel numero di utenti collegati
> contemporaneamente?
Mysql non soffre di limiti ("invalidanti") di contemporaneità
> Grazie e scusa se approfitto della tua disponibilità.
> --
> Ken
Ad un guerriero come te non si può rifutare nulla.
MAssimiliano


title: Esempi QBF: dove?

author: LoTo

text:
Qualcono sa dirmi se e dove possso trovare esempi di codice per query by
form complesse?
Ho provato tutto quello che ho trovato sul sitocomune ma sono tutte cose
troppo semplici e mi perdo nel tentativo di adattarle alle mie necessita'.
Devo creare una query appunto con la tecnica QBF che posso lavorare con
un numero molto alto di controlli e che permetta di incrociarli
legandoli in modo libero tipo:
campo1 = "abc"
and
campo2 = "def"
and
campo3 = "hil" or = "mno"
and
campo4 = "pqr"
ecc ecc
dove i controlli campo* non associati e sono parte di un insieme molto
grande di controlli dal quale li devo poter pescare e incrociare a
piacere in modo articolato e complesso come nella visualizzazione
struttura di una query e in modo da generare l'sql corretto.
Non so se mi sono stato spiegato... he he he ma mi risulta difficile
perfino spiegare dove voglio arrivare...
Si tratta di una banca dati di ricerca impiego che viene da un vecchio
dbIII plus, poi convertito in access97 e ora in access 2000 ora in forma
veramente relazionale (prima, derivando dal dbIII c'erano delle
tabellone enormi)
MI CI STO PERDENDO! Vorrei fare in modo che con la tecnica QBF anche i
colleghi che non sanno creare una query o una stringa sql possano
effetture riceche complesse e articolate.
Quindi se vedo un lavoro gia' fatto magari anche la mia testa di legno
capisce come approcciare la cosa.


title: Esempi QBF: dove?

author: Sergio MAZZA

text:
"LoTo" <
bla...@freemail.it
> ha scritto nel messaggio
news:caue54$g5h$1...@balena.cs.interbusiness.it...

Se non ricordo male sul sito comune (
www.sitocomune.com
) c'č un esempio...
Ciao.
--
Sergio MAZZA


title: Esempi QBF: dove?

author: namor

text:
LoTo ha scritto:
> ... sono tutte cose
> troppo semplici e mi perdo nel tentativo di adattarle alle mie necessita'.
Se ti perdi già sulle cose semplici, la vedo assai dura...
Puoi intanto cercare di farla funzionare con un numero ridotto di
controlli e funzionalità, giusto per capire bene come funzionano i vari
elementi, e quando ne saprai di più ti sarà più facile espanderla.
Magari alla fine non sarà nemmeno tanto complicato, non saprei perchè non
ho inquadrato bene il problema.
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: Esempi QBF: dove?

text:
namor ha scritto:
> Se ti perdi già sulle cose semplici, la vedo assai dura...
Infatti... anche io! Pero' sono uno che non molla mai quindi ci mettero'
il tempo che ci mettero' ma alla fine ce la faro'
> Puoi intanto cercare di farla funzionare con un numero ridotto di
> controlli e funzionalità, giusto per capire bene come funzionano i vari
> elementi, e quando ne saprai di più ti sarà più facile espanderla.
> Magari alla fine non sarà nemmeno tanto complicato, non saprei perchè non
> ho inquadrato bene il problema.
> Namor
In realta' nel sitocomune non c'e' niente che assomigli molto a cio' che
voglio fare: voglio potere scegliere dinamicamente tra tutti gli
attributi delle varie tabelle quali utilizzare per generare l'istruzione
sql ed anche poter scegliere per i vari Or tutti gli And necessari.
es:
tutti i diplomati in Ragioneria o tutti i laureati in Economia e
Commercio o tutti i laureati in Economia Aziendale; che conoscano
l'inglese a livello almeno buono, che abbiano + di 25 anni e che
sappiano usare applicativi Office.
Questo lo posso fare agevolmente nella struttura di una query o in sql
ma con una QBF diventa complicatuccio se non voglio porre limiti alle
scelte possibili.


title: Esempi QBF: dove?

text:
LoTo ha scritto:
> namor ha scritto:



Per il titolo di studio e gli altri campi dove potrebbero essere
selezionati più valori puoi usare una listbox a selezione multipla, per i
campi più semplici ti basta una textbox, poi scrivi nel codice della form
una private sub che costruisca il filtro corrispondente tenendo conto solo
delle caselle in cui è stato selezionato qualche criterio e tralasciando
quelle vuote.
La sub sarà una serie di
if not(isnull(me.nomecontrollo)) then
  filtro=filtro & " And nomecampo=" & me.nomecontrollo



title: Relazioni senza integrità referenziale

author: antologiko

text:
Scusate la domanda forse troppo terra terra, ma sto imparando ad usare
Access (office xp; win xp) e non ho ancora ben capito a cosa serve una
relazione tra tabelle senza integrità referenziale; che me ne faccio?
A che serve?


title: Relazioni senza integrità referenziale

author: Giacomo Alessandroni

text:
antologiko ha scritto:
> [...] a cosa serve una relazione tra tabelle senza integrità referenziale[...]?
Quando crei una query hai belle e pronte le relazioni senza
"strascinare" i collegamenti tra i vari campi.
--
Giacomo Alessandroni
g.aless...@peacelink.it
Associazione PeaceLink
http://www.peacelink.it/
VoIP @ Wengo/Skype
callto://galessandroni


title: Relazioni senza integrità referenziale

text:
>"antologiko" <
antol...@yahoo.it
> ha scritto nel messaggio
news:1179327586....@e65g2000hsc.googlegroups.com...

La relazione è un concetto molto ampio che è la colonna portante del modello
relazionale e che si basa fortemente sulla semantica
dei dati.
Pre farla breve, quando esprimi un concetto con una tabella in realtà stai
già esprimendo, con quella tabella, una relazione tra i suoi attributi (o
colonne). Questo è un primo significato di relazione. Quando, poi, metti in
correlazione tra loro due concetti espressi da due tabelle, lo fai
esclusivamente sulla base dei VALORI, anche derivati, di due o più attributi
(o colonne) delle due tabelle (semantica dei dati).
L'integrità referenziale, invece, è un vincolo inter-relazionale (cioè tra
due relazioni) che esprimi, a livello implementativo di una base di dati,
mediante una regola formale. L'integrità referenziale garantisce, a livello
di architettura, la piena coerenza dei contenuti delle tabelle della base di
dati.
In sostanza il concetto di relazione sta in piedi anche senza vincoli di
integrità referenziale perchè è insito nel modello relazionale stesso.
L'integrità referenziale, invece, è uno strumento implementativo che ti
consente di avere una base di dati corretta, coerente e non ridondante.
I.M.H.O. Access è un valido strumento operativo ma un pessimo strumento
didattico proprio perchè consente la crezione di basi di dati con apparente
semplicità, mascherando la complessità progettuale architetturale.
Spero di essere stato chiaro.
Bye.
--
Simplex2
www.mdenittis.it
_______________


title: Copiare stringhe RETTIFICA

author: DomenicoF

text:
Salve pongo il mio quesito:
ho un file .txt all'interno ci sono delle stringhe del tipo:
Risposta corretta: A
Risposta corretta: B
Risposta corretta: C
Risposta corretta: D
Risposta corretta: E
Vorrei sapere se è possibile da codice leggere il .txt e copiare le
stringhe, nello STESSO ORDINE di lettura del file, in una tabella di ACCESS
In attesa di una risposta vi ringrazio e vi saluto
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Copiare stringhe RETTIFICA

author: Carlo Costarella

text:
"DomenicoF" <
fl...@libero.it
> ha scritto nel messaggio
news:f6kmfj$36l$1...@news.newsland.it...
> Salve pongo il mio quesito:
>
> ho un file .txt all'interno ci sono delle stringhe del tipo:
>
> Risposta corretta: A
> Risposta corretta: B
> Risposta corretta: C
> Risposta corretta: D
> Risposta corretta: E
>
> Vorrei sapere se è possibile da codice leggere il .txt e copiare le
> stringhe, nello STESSO ORDINE di lettura del file, in una tabella di
> ACCESS
> In attesa di una risposta vi ringrazio e vi saluto
>
> --
Premesso che è possibile fare tutto da codice,
non dimenticare la possibilità che puoi anche allegare il file, specie se ha
la struttura che hai postato.
File--->carica dati esterni---->collega tabelle, qui scegli il tipo di file
.txt e quindi il tuo file txt...al resto pensa il wizard.
Ciao, Carlo


title: Copiare stringhe RETTIFICA

text:
Si ma il problema e che il testo è fatto così:
Testo domanda
A)risp.A
B)risp.B
C)risp.C
D)risp.D
E)risp.E
Risposta corretta: B
Testo domanda
A)risp.A
B)risp.B
C)risp.C
D)risp.D
E)risp.E
Risposta corretta: E
Testo domanda
A)risp.A
B)risp.B
C)risp.C
D)risp.D
E)risp.E
Risposta corretta: A
Cioè vorrei come avrai capito che le risposte siano messe a parte
puoi aiutarmi?
Carlo Costarella ha scritto:


> ..txt e quindi il tuo file txt...al resto pensa il wizard.
> Ciao, Carlo



title: Copiare stringhe RETTIFICA

text:
"DomenicoF" <
fl...@libero.it
> ha scritto nel messaggio
news:f6kpm3$fl9$1...@news.newsland.it...
> Si ma il problema e che il testo č fatto cosě:
>
> Testo domanda
> A)risp.A
> B)risp.B
> C)risp.C
> D)risp.D
> E)risp.E
> Risposta corretta: B
>
> Testo domanda
> A)risp.A
> B)risp.B
> C)risp.C
> D)risp.D
> E)risp.E
> Risposta corretta: E
>
> Testo domanda
> A)risp.A
> B)risp.B
> C)risp.C
> D)risp.D
> E)risp.E
> Risposta corretta: A
>
> Cioč vorrei come avrai capito che le risposte siano messe a parte
> puoi aiutarmi?
Ricorda di rispondere sempre in calce come sto facendo ora io.
La struttura che hai ora postato č completamente diversa dalla
precedente...vedi come sia importante dire sempre tutto?
Comunque onde evitare di impelagarti nell'uso del codice, puoi fare come ti
ho detto prima: metti tutto in una tabella allegata e poi fai le tue
operazioni a mezzo query. In pratica hai tutto su una tabella e senza grossi
sforzi.
Ciao, Carlo


title: Copiare stringhe RETTIFICA

text:
> "DomenicoF" <
fl...@libero.it
> ha scritto nel messaggio
> news:f6kmfj$36l$1...@news.newsland.it...
>> Salve pongo il mio quesito:
>>
>> ho un file .txt all'interno ci sono delle stringhe del tipo:
>>
>> Risposta corretta: A
>> Risposta corretta: B
>> Risposta corretta: C
>> Risposta corretta: D
>> Risposta corretta: E
Aggiungo: in pratica e tramite una query estrai solo i record che hanno
"Risposta corretta*"...
Ciao, Carlo


title: query calcolo differenza data da record precedente

author: Massimo omissaM

text:
Salve a tutti,
ho una tabella dove è presente un campo "data" dove registro la data in cui
avviene il parto dei pesci (questa tabella  è la tab "molti" in relazione
con la tab "uno" dei pesci); vorrei creare una query per calcolare il tempo
di gestazione (differenza tra la data presente nel record con quello
precedente) per poi calcolare la media (questo però mi riesce); come posso
fare per calcolare in un campo nuovo la differenza di un record con quello
precedente??
grazie anticipatamente a chiunque mi darà una mano, spero di essermi
spiegato bene, ho provato a cercare info sul sito del comune e sui messaggi
vecchi ma non ho trovato info.
grazie Massimo


title: CommandBar

author: Giuseppe

text:
Ho trovato questo codice sul NG.Solamente che quando lo provo il debbugger
mi dice "Tipo definito dall'utente non definito" In pratica non riesco a
dichiarare "cbarmenu " come  CommandBar.Sapete se devo caricare qualche
libreria particolare.Uso Access 2000.
Più in generale come faccio a far sparire la barra dei menu?
Dim cbarmenu  As CommandBar
>     Set cbarmenu = CommandBars("menu bar")
>     cbarmenu.Enabled = False
Ciao
Giuseppe


title: CommandBar

text:
Ho risolto cosě.
 Dim cbarmenu  As Variant
    Set cbarmenu = Me.Application.CommandBars("menu bar")



title: CommandBar

text:
"Giuseppe" <
sunrexs...@hotmail.com
> ha scritto nel messaggio
news:cWO2a.176897$0v.48...@news1.tin.it...
> Ho risolto così.
>
>  Dim cbarmenu  As Variant
>     Set cbarmenu = Me.Application.CommandBars("menu bar")
>     cbarmenu.Enabled = False
> Ciao
> Giuseppe
>
>
In realtà era meglio la versione che non andava........!!!
Sai perchè non andava......??
Ti mancano i Riferimenti alla Lib: Micosoft Office 10.0 Object Library  (nel
mio caso ho questa versione)
@Alex.


title: CommandBar

author: Karl Donaubauer

text:
Giuseppe ha scritto:

Manca il riferimento al biblioteca di Office perché usi una
variabile di oggetto tipo CommandBar esplicitamente.
Se non fai più che questo coi commandbars basta:
Application.CommandBars("Menu Bar").Enabled = False
o
DoCmd.ShowToolbar "Menu Bar", acToolbarNo
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


title: CommandBar

text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:WKQ2a.114166$YG2.3...@twister1.libero.it...
>
> "Giuseppe" <
sunrexs...@hotmail.com
> ha scritto nel messaggio
> news:cWO2a.176897$0v.48...@news1.tin.it...
[]
> In realtà era meglio la versione che non andava........!!!
> Sai perchè non andava......??
> Ti mancano i Riferimenti alla Lib: Micosoft Office 10.0 Object Library
(nel
> mio caso ho questa versione)
>
> @Alex.
Perchè era meglio l'altra versione?
Ciao
Giuseppe


title: CommandBar

author: Alex

text:
"Giuseppe" <
sunrexs...@hotmail.com
> wrote in message
news:t3R2a.177559$
0v.49...@news1.tin.it
[CUT]
> @Alex.
> Perchè era meglio l'altra versione?
> Ciao
> Giuseppe
Perchè dal punto di vista programmazione
è come se io invece di chiamarti Giuseppe
ti chiamassi "Coso", tu ti gireresti ugualmente
ma non è il tuo nome......!!!
@Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: CommandBar

text:
Giuseppe ha scritto:

Manca il riferimento alla biblioteca di Office perché usi una
variabile di oggetto tipo CommandBar esplicitamente.
Se non fai più che questo coi commandbars puoi
risparmiarti il riferimento con:



title: Ricerca record in una maschera

author: Gilmour

text:
Ho una maschera in cui devo fare decine e decine di ricerche diverse
in base allo stesso campo, quindi il fatto di dover cliccare sul
pulsante trova e specificare i criteri (parte del campo ecc.ecc.)
rallenta notevolmente il mio lavoro. Per ottimizzare i tempi volevo
inserire una textfiled in cui digitare la stringa da cercare e
relativo pulsante per avviare la ricerca. Esiste un metodo valido per
avviare la ricerca dei dati presenti in una maschera? Ho cercato nella
categoria Me. ma non ho trovato nulla
Grazie
Gilmour
ps. fin'ora le ricerche le ho fatte aprendo un recordset e utilizzando
il relativo metodo find, ma volevo qualcosa di automatizzato...
--
ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø
ø Se le persone che parlano male di me sapessero quello che
ø dico io di loro, parlerebbero peggio. Jim Morrison
ø Clicca sul link per contattarmi direttamente da ICQ
ø
http://msg.mirabilis.com/scripts/contact.dll?msgto=32405502
ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø,ļ_ļ,ø*°`°*ø
                                /join #IseekYou


title: Ricerca record in una maschera

author: Alessandro (@Alex)

text:
"Gilmour" <
dark...@virgilio.it
> ha scritto nel messaggio
news:sr9j4u0paacac3acq...@4ax.com...
> Ho una maschera in cui devo fare decine e decine di ricerche diverse
> in base allo stesso campo, quindi il fatto di dover cliccare sul
> pulsante trova e specificare i criteri (parte del campo ecc.ecc.)
> rallenta notevolmente il mio lavoro. Per ottimizzare i tempi volevo
> inserire una textfiled in cui digitare la stringa da cercare e
> relativo pulsante per avviare la ricerca. Esiste un metodo valido per
> avviare la ricerca dei dati presenti in una maschera? Ho cercato nella
> categoria Me. ma non ho trovato nulla
>
> Grazie
> Gilmour
>
Se basi la tua Form su una QRY parametrica in cui il Criterio di Filtro
è il Riferimento alla TxtBox che dicevi :
Nei Criteri QRY in corrispondenza del Campo che ti serve:
Like "*" & Forms![TuaForm]![TuaTextBox] & "*"
Poi sul Pulsante Filtra inserisci Me.Requery.
--
Alessandro./[@Alex]/
*--------------------------------------------------------------------------*
Alessandro B.
Sito Comune      :
http://www.sitocomune.com
Sito Personale   :
http://digilander.iol.it/ik2zok/
*--------------------------------------------------------------------------*


title: Ricerca record in una maschera

text:
Era un luminoso pomeriggio di aprile, e i due giovani "Alessandro
\(@Alex\)" <
ik2...@libero.it
> e Piero si incontrarono nella radura di
Sherwood (it.comp.appl.access), dicendo:
>
>Se basi la tua Form su una QRY parametrica in cui il Criterio di Filtro
>č il Riferimento alla TxtBox che dicevi :
>Nei Criteri QRY in corrispondenza del Campo che ti serve:
>Like "*" & Forms![TuaForm]![TuaTextBox] & "*"
>
>Poi sul Pulsante Filtra inserisci Me.Requery.
Ma cosė facendo, se la textbox rimane vuota dovrei avere un recordset
nullo, no?



title: Ricerca record in una maschera

author: Alessandro

text:
"Gilmour" <
dark...@virgilio.it
> wrote in message
news:h2rj4u8s4ld6oqtqa...@4ax.com...
> >
> >Se basi la tua Form su una QRY parametrica in cui il Criterio di Filtro
> >č il Riferimento alla TxtBox che dicevi :
> >Nei Criteri QRY in corrispondenza del Campo che ti serve:
> >Like "*" & Forms![TuaForm]![TuaTextBox] & "*"
> >
> >Poi sul Pulsante Filtra inserisci Me.Requery.
>
> Ma cosě facendo, se la textbox rimane vuota dovrei avere un recordset
> nullo, no?
> --
Perchč non hai provato prima di ripostare....!!!!?????
E secondo te gli "*" non servono a nulla....!!!Bill li ha inventati
per evitare questo.
Se TextBox=Null---->Recordset=TuttiRecord che magia....!!!
Alessandro./(@Alex)/
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Ricerca record in una maschera

text:
Era un luminoso pomeriggio di aprile, e i due giovani "Alessandro"
<
ik2...@libero.it
> e Piero si incontrarono nella radura di Sherwood
(it.comp.appl.access), dicendo:
>> >Like "*" & Forms![TuaForm]![TuaTextBox] & "*"
>> >
>> >Poi sul Pulsante Filtra inserisci Me.Requery.
>>
>> Ma cosė facendo, se la textbox rimane vuota dovrei avere un recordset
>> nullo, no?
>> --
>Perchč non hai provato prima di ripostare....!!!!?????
Perché access sta sul portatile di mio padre, non sul mio pc, e in
quel momento non lo avevo io
Ho preferito chiarire un mio dubbio prima di provare... mea culpa, era
solo curiositā. :)
Cmq ho provato... perō rimane un piccolo problema. La form in
questione (articoli) č una sottomaschera di ordini... ho provato a
cercare nell'help la sintassi per individuare una form annidata ma non
l'ho trovata... sapresti dirmi qual'č?
Ovviamente il tutto parte correttamente se carico direttamente la
sottomaschera articoli, perō avviando ordini mi chiede il parametro
manualmente.
Gil



title: Ricerca record in una maschera

text:
Era un luminoso pomeriggio di aprile, e i due giovani Gilmour
<
dark...@virgilio.it
> e Piero si incontrarono nella radura di
Sherwood (it.comp.appl.access), dicendo:
>Cmq ho provato... perō rimane un piccolo problema. La form in
>questione (articoli) č una sottomaschera di ordini... ho provato a
>cercare nell'help la sintassi per individuare una form annidata ma non
>l'ho trovata... sapresti dirmi qual'č?
Sintassi trovata perō non riesco ad accedere alla textfield
[ordini]![articoli].Form......



title: Data Access Object

author: ALOL

text:
Mi muovo in modo soddisfacente in access ma non so niente di
programmazione. Ho la necessità di imparare a scrivere qualche
istruzione DAO per importare dei dati da più file di access simili in
uno solo.
Come fare ad imparare i passaggi fondamentali? Dove trovare qualche
esempio per vedere se funziona?


title: Data Access Object

text:
"ALOL" <as...@my.mail> ha scritto nel messaggio
news:3CDB88DD...@my.mail...

Usa ADO invece che DAO. In entrambi i casi la guida in linea è un
fondamentale punto di partenza. Durante l'installazione del pacchetto scegli
la personalizzata e aggiungi alla guida i "Riferimenti al linguaggio".
Dai un'occhiata a
www.sitocomune.com
Ciao, Carlo


title: recordset

author: Simone

text:
Ciao,
Dovrei salvare il contenuto di una tabella appartenente ad un database
esterno in una tabella del database corrente (si tratta di tabelle con lo
stesso tipo di campi e nello stesso ordine).
Sto tentando di imparare ad utilizzare i recordset, attualmente sono
solamente in grado di compilare il seguente codice:
dim Copia as database
dim WinRap as database
dim anag_caus as tabledef
dim corr_anag_caus as tabledef
set copia = opendatabase ("c:\programmi\winrap.mdb")
set anag_caus = copia.tabledef("anag_caus")
set winrap = currentDB
set corr_anag_caus=winrap.tabledef("anag_caus")
....
da qui in poi non sono riuscito a trovare le informazioni necessarie per
completare l'operazione,  come posso fare?
Ciao e grazie


title: recordset

author: Roberto da casa

text:
"Simone" <
sip...@tin.it
> ha scritto nel messaggio
news:zK7m6.9642$q97.2...@twister1.tin.it...

Ipotizziamo che l'altro database abbia il seguente path :
c:\programmi\winrap.mdb
Ipotizziamo che la tabella da duplicare contenuta in quel database si chiami
anag_caus.
Ipotizziamo che la tabella che ospiterà la duplica nel database corrente si
chiami corr_anag_caus e tu ne abbia già dichiarato la struttura.
Ipotizziamo che tu abbia la necessità di operare al livello di campo.
Prova così:
Dim DbEsterno As Database
Dim dbInterno As Database
Dim rstEsterno As Recordset
Dim rstInterno As Recordset
Set dbInterno = CurrentDb
Set rstInterno = dbInterno.OpenRecordset("corr_anag_caus")
Set DbEsterno = OpenDatabase("c:\programmi\winrap.mdb")
Set rstEsterno = DbEsterno.OpenRecordset("anag_caus")
rstEsterno.MoveFirst
Do Until rstEsterno.EOF
rstInterno.AddNew
    rstInterno!NomePrimoCampo= rstEsterno!NomePrimoCampoDaDuplicare
    rstInterno!NomeSecondoCampo = rstEsterno!NomeSecondoCampoDaDuplicare
    rstInterno!NomeTerzoCampo = rstEsterno!NomeTerzoCampoDaDuplicare
    ....................
rstInterno.Update
rstEsterno.MoveNext
Loop
rstInterno.Close
rstEsterno.Close
dbInterno.Close
DbEsterno.Close
Set rstInterno = Nothing
Set rstEsterno = Nothing
Set dbInterno = Nothing
Set DbEsterno = Nothing


title: Domanda su report & query a campi incrociati

text:
Salve a tutti...
premetto che ho fatto una (anche se rapida) ricerca sul sitocomune ma non
sono riuscito a trovare nulla di utile.
Il mio problema è quello di ottenere un report 'dinamico' su una query a
campi incrociati: la query può darmi campi e record differenti a seconda del
parametro ricercato e il report dovrebbe stampare ogni volta tutti i dati
trovati; quello che non riesco a stabilire è come creare la struttura del
report!
Spero di essere stato chiaro...


author: Marco

text:
"T3rm1n4t0r" <
termi...@libero.it
> wrote in message
news:Nmkxb.107890$
hV.39...@news2.tin.it

Il database di esempio Northwind distribuito con Access97 riportava il
report di esempio Vendite Impiegati che penso possa fare al caso tuo.
Ciao
Marco
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
"Marco" <
in...@echovr.it
> ha scritto nel messaggio
news:5f3796a7b18dd7be889...@mygate.mailgate.org...
> Il database di esempio Northwind distribuito con Access97 riportava il
> report di esempio Vendite Impiegati che penso possa fare al caso tuo.
> Ciao
> Marco
>
>
ti ringrazio per la risposta... ho controllato il report 'vendita impiegati
per paese' (credo sia quella che intendevi tu) ma onestamente non mi è
chiara la struttura, anche perchè la query (omonima) su cui si appoggia non
è a campi incrociati... !


text:
"T3rm1n4t0r" <
termi...@libero.it
> ha scritto nel messaggio
news:Nmkxb.107890$hV.39...@news2.tin.it...

Sicuramente la tua ricerca sul Sito Comune è stata moooolto rapida e ti è
sfuggita nella Sezione Reports la FAQ di RoDAgo e Sib intitolata "Report
dinamici per rappresentazioni a campi incrociati".
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:7Inxb.150562$e6.54...@twister2.libero.it...
>
> Sicuramente la tua ricerca sul Sito Comune č stata moooolto rapida e ti č
> sfuggita nella Sezione Reports la FAQ di RoDAgo e Sib intitolata "Report
> dinamici per rappresentazioni a campi incrociati".
>
urka.. ho guardato quella pagina 2 volte :/ grazie mille :) e mi scuso..


title: Intercettare chiusura Word dopo averlo aperto da codice

author: VT @ work

text:
In una tabella ho due campi di tipo testo che contengono
rispettivamente il path ed il nome di un documento Word.
Nella form associata a tale tabella, sull'evento "doppio click" di
entrambi i controlli associati ai campi in questione, ho inserito il
seguente codice:
Private Sub txtPath_Verbale_DblClick(Cancel As Integer)
Dim appWrd As Word.Application, wrdDoc As Word.Document
If Nz(Me.txtPath_Verbale, "") > "" And Nz(Me.txtVerbale, "") > "" Then
    Set appWrd = New Word.Application
    appWrd.Visible = True
    Set wrdDoc = appWrd.Documents.Open(Me.txtPath_Verbale &
Me.txtVerbale, True)
End If
End Sub
e tutto funziona a meraviglia: se i campi contengono un valore, Word
si apre sul documento corrispondente.
Il problema sorge nel "sincronizzare" Word e la maschera Access: per
esempio voglio impedire che la maschera possa essere chiusa (tramite
un apposito pulsante) quando Word è attivo dopo aver fatto doppio
click sul controllo; inoltre ho bisogno di recuperare, prima che Word
venga chiuso, il nome ed il percorso del documento, che potrebbe
essere stato cambiato dall'utente (con "Salva con nome").
In altre parole ho bisogno di intercettare gli eventi (o almeno
l'evento quit) dell'oggetto wrddoc; oppure, in alternativa, mi
andrebbe bene anche di bloccare la chiusura di Word e pilotarlo da
Access (wrddoc.quit) .
Come posso fare ?
Ho sbagliato l'approccio al problema ?
Ho guardato l'help ma non ho ricavato un gran che: ho trovato la
dichiarazione di variabili con la parola chiave WithEvents che
sembrava fare al caso mio, ma dopo qualche tentativo sono riuscito
soltanto a non fare funzionare più il collegamento con Word.
Grazie a chiunque risponderà
Vincenzo Turturro
----------------------------------
Niuna impresa, per minima che sia,
può avere cominciamento e fine
senza queste tre cose:
e cioè senza sapere,
senza potere,
senza con amore volere
(Anonimo fiorentino, XIV sec.)
------------------------------


author: Rabozzi Luigi

text:
Ciao prova il seguente codice :
Public Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA"
(ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
Public Declare Function GetWindow Lib "user32" (ByVal hwnd As Long, ByVal
wCmd As Long) As Long
Public Declare Function GetClassName Lib "user32" Alias "GetClassNameA"
(ByVal hwnd As Long, ByVal lpClassName As String, ByVal nMaxCount As Long)
As Long
Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal
hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As
Long
Const BUFFER_SIZE = 64
Const GW_HWNDFIRST = 0
Const GW_HWNDNEXT = 2
Const GW_OWNER = 4
Const SW_HIDE = 0
Const WM_CLOSE = &H10
Const WM_DESTROY = &H2
Const WM_NCDESTROY = &H82
Const WM_QUIT = &H12
Public Function WordRunning() As Boolean
Dim sname As String
Dim sBuffer As String
Dim nChar As Integer
Dim hCurrWnd As Integer
Dim nI As Integer
Dim vntError As Variant
sBuffer = Space$(BUFFER_SIZE)
hCurrWnd = GetWindow(Application.hWndAccessApp, GW_HWNDFIRST)
Do While hCurrWnd <> 0
    nChar = GetClassName(hCurrWnd, sBuffer, BUFFER_SIZE)
    If sBuffer Like "*OpusApp*" Then
        nChar = GetWindowText(hCurrWnd, sBuffer, BUFFER_SIZE)
        If sBuffer Like "*Microsoft Word*" Then
            WordRunning = True
            Exit Function
        End If
    End If
    hCurrWnd = GetWindow(hCurrWnd, GW_HWNDNEXT)
    DoEvents
Loop
WordRunning = False
End Function
Cosi' puoi vedere in ogni momento se word e' aperto.
E' valido per qualsiasi tipo di processo Windows basta vedere la classe
della finestra (tramite un banalissimo programma di trace dei processi vedi
Spy++) ed il testo (opzionalmente) che deve contenere, infatti come puoi
notare partendo dalla tua applicazione Access fa la scansione di tutte le
finestre aperte e restituisce vero quando trova quella desiderata.
Per quel che riguarda l'intercettazione dei messaggi di un altra
applicazione mi pare proprio che con VB (o VBA) non si possa fare quindi
devi eventualmente demandare tale gestione al codice contenuto nel documento
Word stesso.
Spero di esserti stato utile.
<LuigI>
VT @ work <
semitogliprimadirisp...@tiscalinet.it
> wrote in
message 397d4b74...@firewall.regione.toscana.it...



text:
Ho provato, ma non funziona perchč l'istruzione
hCurrWnd = GetWindow(Application.hWndAccessApp, GW_HWNDFIRST)
restituisce hCurrWnd = 0 e quindi il loop seguente non viene eseguito.
Cosa ho sbagliato ?
Grazie per le risposte: quella precedente e quella che mi invierai
:-))
Vincenzo Turturro
----------------------------------
Niuna impresa, per minima che sia,
puņ avere cominciamento e fine
senza queste tre cose:
e cioč senza sapere,



text:
Ciao,
trovo strano che non funzioni se hai definito nel modo appropriato le
costanti, io sfrutto questo codice sia con A2000 che con A97 per vedere se
Word e' gia' aperto prima di passare dei dati un documento precostituito ed
non ho mai avuto noie.
Provo comunque ad inviarti l'intero  modulo via e-mail sperando funzioni.
<LuigI>
VT @ work <
semitogliprimadirisp...@tiscalinet.it
> wrote in
message 397d6c5d...@firewall.regione.toscana.it...
> Ho provato, ma non funziona perchè l'istruzione
>
> hCurrWnd = GetWindow(Application.hWndAccessApp, GW_HWNDFIRST)
>
> restituisce hCurrWnd = 0 e quindi il loop seguente non viene eseguito.
> Cosa ho sbagliato ?
> Grazie per le risposte: quella precedente e quella che mi invierai
> :-))
>
>
>
> Vincenzo Turturro
> ----------------------------------
> Niuna impresa, per minima che sia,
> può avere cominciamento e fine
> senza queste tre cose:
> e cioè senza sapere,



author: Sergio MAZZA

text:
"VT @ work" <
semitogliprimadirisp...@tiscalinet.it
> ha
scritto nel messaggio news:397d4b74...@firewall.regione.toscana.it...

> Vincenzo Turturro
> ----------------------------------
> Niuna impresa, per minima che sia,
> può avere cominciamento e fine
> senza queste tre cose:
> e cioè senza sapere,
> senza potere,
> senza con amore volere
> (Anonimo fiorentino, XIV sec.)
> ------------------------------
Prova con GetObject() che va in errore se l'oggetto indicato non è
istanziato; questo è uno stralcio preso dall'help di access:
----------------------------
Dim MyXL As Object  ' Variabile in cui viene memorizzato
       ' il riferimento a Microsoft Excel.
Dim ExcelWasNotRunning As Boolean ' Flag per il rilascio finale.
' Prova per verificare se vi è già una copia di
' Microsoft Excel in esecuzione.
On Error Resume Next  ' Rimanda l'intercettazione degli errori.
' La funzione Getobject chiamata senza il primo
' argomento restituisce un riferimento a un'istanza
' dell'applicazione. Se l'applicazione non è in
' esecuzione viene generato un errore. Si noti la
' virgola utilizzata come segnaposto per il primo
' argomento.
Set MyXL = GetObject(, "Excel.Application")
If Err.Number <> 0 Then ExcelWasNotRunning = True
Err.Clear  ' Cancella l'oggetto Err in presenza di errori.
------------------------
Ciao.


title: Collegare tabelle residenti su back-end protetto da mdw

text:
Dopo giorni passati a capire pregi e difetti della protezione con file
mdw, ho letteralmente iniziato a dare i numeri... Ora non riesco
neppure ad effettuare un link di tabelle con i DAO... Posto
direttamente il codice che genera l'errore di runtime 3029 (nome
utente o password non validi), eppure sono proprio corretti, come pure
è corretto il file mdw...
Public Sub Connetti()
Dim wrk As DAO.Workspace
Dim dbs As DAO.Database
DBEngine.SystemDB = "C:\Rassegna\licenza.mdw"
Set wrk = DBEngine.CreateWorkspace("", "Administrator",
"3K4azzITwy2iae")
Set dbs = wrk.OpenDatabase("C:\Rassegna\Archivio\db1.mdb")
Collega
dbs.Close
wrk.Close
End Sub
Sub Collega()
Dim dbs As DAO.Database
Dim tdf As DAO.TableDef
Dim tdg As DAO.TableDef
Dim tdh As DAO.TableDef
Set dbs = CurrentDb
Set tdf = dbs.CreateTableDef("Articoli")
tdf.Connect = ";DATABASE=C:\Rassegna\Archivio\db1.mdb"
tdf.SourceTableName = "Articoli"
dbs.TableDefs.Append tdf
Set tdg = dbs.CreateTableDef("Autori")
tdg.Connect = ";DATABASE=C:\Rassegna\Archivio\db1.mdb"
tdg.SourceTableName = "Autori"
dbs.TableDefs.Append tdg
Set tdh = dbs.CreateTableDef("Fonti")
tdh.Connect = ";DATABASE=C:\Rassegna\Archivio\db1.mdb"
tdh.SourceTableName = "Fonti"
dbs.TableDefs.Append tdh
End Sub


text:
"Marco" <
marc...@tiscali.it
> ha scritto nel messaggio
news:ec98e6fa-cb0a-4ee7...@u9g2000yqb.googlegroups.com...
Dopo giorni passati a capire pregi e difetti della protezione con file
mdw, ho letteralmente iniziato a dare i numeri... Ora non riesco
neppure ad effettuare un link di tabelle con i DAO... Posto
direttamente il codice che genera l'errore di runtime 3029 (nome
utente o password non validi), eppure sono proprio corretti, come pure
� corretto il file mdw...
Public Sub Connetti()
Dim wrk As DAO.Workspace
Dim dbs As DAO.Database
DBEngine.SystemDB = "C:\Rassegna\licenza.mdw"
Set wrk = DBEngine.CreateWorkspace("", "Administrator",
"3K4azzITwy2iae")
-----------------------------------------------
Qui sembra mancare il "nome" del Workspace...
Set wrk = DBEngine.CreateWorkspace("MioWork", "Administrator",
"3K4azzITwy2iae")
http://support.microsoft.com/kb/163002
-------------------------------------------
Set dbs = wrk.OpenDatabase("C:\Rassegna\Archivio\db1.mdb")
----------------------------------------------
Qui � sbagliata la sintassi.
Dovrebbe essere:
Set dbs =
DBEngine.Workspaces("MioWork").OpenDatabase("C:\Rassegna\Archivio\db1.mdb")
Il resto sembra OK.
Ciao, Carlo


text:
On 26 Feb, 06:28, "Carlo Costarella" <
carlocoslib...@libero.it
> wrote:
> "Marco" <
marco...@tiscali.it
> ha scritto nel messaggionews:ec98e6fa-cb0a-4ee7...@u9g2000yqb.googlegroups.com...

Grazie Carlo, ma nulla da fare. Sempre lo stesso errore 3029. Ho anche
rifatto da capo la protezione.mdw e dichiarato tutte le variabili
stringa. Questa è l'ultima versione (non funzionante).
Option Compare Database
Option Explicit
Public Sub Connetti()
On Error GoTo Err_Connetti
Dim wrk As DAO.Workspace
Dim dbs As DAO.Database
Dim slUserName As String
Dim slPassword As String
Dim programma As String
Dim nomewrk As String
Dim filewrk As String
slUserName = "FinalUser"
slPassword = "3K4azzITwy2iae"
nomewrk = "parametri"
filewrk = "C:\Rassegna\licenza.mdw"
programma = "C:\Rassegna\Archivio\archivio.mdb"
DBEngine.SystemDB = filewrk
Set wrk = DBEngine.CreateWorkspace(nomewrk, slUserName, slPassword)
Set dbs = DBEngine.Workspaces(wrk).OpenDatabase(programma)
Collega
dbs.Close
wrk.Close
Exit_Connetti:
    Exit Sub
Err_Connetti:
    Set wrk = Nothing
    Set dbs = Nothing
    MsgBox Err.Number & Err.Description
    Resume Exit_Connetti
End Sub
Sub Collega()
Dim dbs As DAO.Database
Dim tdf As DAO.TableDef
Dim tdg As DAO.TableDef
Dim tdh As DAO.TableDef
Set dbs = CurrentDb
Set tdf = dbs.CreateTableDef("Articoli")
tdf.Connect = ";DATABASE=C:\Rassegna\Archivio\archivio.mdb"
tdf.SourceTableName = "Articoli"
dbs.TableDefs.Append tdf
Set tdg = dbs.CreateTableDef("Autori")
tdg.Connect = ";DATABASE=C:\Rassegna\Archivio\archivio.mdb"
tdg.SourceTableName = "Autori"
dbs.TableDefs.Append tdg
Set tdh = dbs.CreateTableDef("Fonti")
tdh.Connect = ";DATABASE=C:\Rassegna\Archivio\archivio.mdb"



title: Apri maschera solo se...

text:
Ciao a tutti.
Ho una casella di testo "COGNOMI" che, dopo aggiornamento esegue una query
di selezione e mi apre la rispettiva maschera.
In pratica: se digito ROSSI, la query mi andrà a selezionare tutti gli
eventuali ROSSI già inseriti cosicchè valutando trattarsi della stessa
persona, tramite un pulsunte posso terminare la registrazione degli altri
dati relativi a ROSSI senza digitarli (Cognome.Value = Me.Cognome... etc).
La maschera della query si apre tramite (DoCmd.OpenForm" mia form query",
acNormal).
Vorrei, nel caso digitassi un cognome inesistente non si aprisse la maschera
della Query.
Cioè, se la query non trova riscontri continuo l'inserimento manualmente.
Spero di essermi ..capito!
Grazie
Mr.Quid


title: Apri maschera solo se...

text:
"Mr.Quid" <
elsaco...@libero.it
> ha scritto nel messaggio
news:48ee0377$0$1082$4faf...@reader2.news.tin.it...

if dcount("*","nometabella/query","cognome like '*" &  Me!Cognome & "*'")>0
then
    docmd.openform ...
end if
Ciao.
--
Sergio MAZZA


title: Apri maschera solo se...

author: AleC

text:

Puoi usare dlookup (guarda l'help) se ti restituisce un valore ha
trovato il cognome altrimenti no.
AleC


title: Apri maschera solo se...

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:gcl3u9$vlf$1...@tdi.cu.mi.it...

Grazie Sergio ottimo col DCount
Ciao
Mr.Quid


title: Query tra + database?

author: mantofob

text:
Vorrei raccogliere un parametro da una finestra di un db e passarlo a 3
query, facenti riferimento ciascuna ad un diverso database. I tre
database sono identici per definizione ma ho dovuto spezzarli per
problemi di dimensioni. Per raccolgiere il parametro, no problem,dopo
di chè lancerò una query con un'istruzione di questo tipo:
Private Sub Comando5_Click()
DoCmd.TransferSpreadsheet acExport, , "FD Query
perTerm", "C:\Ricerche.xls"

End Sub
e volgio farlo da un unico punto per 3 db in modo che si creino 3 file
di excel.
Qualche suggerimento o riferimento?
Grz :)
Fob


title: Query tra + database?

author: Antonio Biso

text:
"mantofob" <
mant...@fastwebnet.it
> ha scritto nel messaggio
news:200502151...@mynewsgate.net...

Gli altri dabatase avranno delle tabelle no?
Collega in un database le tabelle degli altri e lavori solo su uno
Antonio


title: Query tra + database?

author: ALESSANDRO Baraldi

text:
"mantofob" <
mant...@fastwebnet.it
> ha scritto nel messaggio
news:200502151...@mynewsgate.net...

Come già risposto sul NG MS:
Non vedo grossi problemi, apri tramite l'oggetto Application in sequenza
i 3 Database, ne modifichi il costrutto SQL della Query cia QueryDefs
quindi il comando che hai usato è proprio un'oggetto di Application
che riferendosi al DB aperto ti genererà il file Excel.
E' un pò il gioco delle scatole cinesi, ma semplice.
Sull'Help dai uno sguardo al metodo OpenCurrentDatabase .
Ti allego un esempio di come gestire la cosa, è esattamente
quanto serve a te.
Sub VisualizzaMaschera ()
 Const strPercorsoPerEsempi = "C:\Programmi " _
  & "\MSOffice\Access\Esempi"
 Dim strDB As String
 ' Inizializza la stringa al percorso del database.
 strDB = strPercorsoPerEsempi & "Northwind.mdb"
 ' Crea una nuova istanza di Microsoft Access.
 Set appAccess = _
  CreateObject("Access.Application.8")
 ' Apre il database nella finestra di Microsoft Access.
appAccess.OpenCurrentDatabase strDB
 ' Apre la maschera Ordini.
 appAccess.DoCmd.OpenForm "Ordini"
End Sub
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: Query tra + database?

text:
Grz 1000!
Vi farò sapere
F


title: Immagine Gif. Maurizio75

author: Mak

text:
Salve Maurizio
in merito alla tua risposta sulle gif e su animatiogif.ocx
mi proponi che nonč la soluzione migliore.
Ti chiedo se mi proponi un' alternativa alle gif per avere un animazione in
una maschera.
In alternativa dove ti sei procurato l' ocx
Gią so che ti devo ringraziare.
Mak


title: Immagine Gif. Maurizio75

author: Emyr

text:
On Fri, 21 Jun 2002 20:09:10 +0200, "Mak" <
mak....@tiscalinet.it
>
wrote:

bitmap cambiate su evento timer?
Saluti.
Emanuele.


title: Poblema con QUERY.......

author: Norica UD

text:
Ho 2 Tabelle ("Insert","Giacenze") che contengono tra gli altri 1campo
uguale sia nell' una che nell'altra, il campo si chiama "NSped";
Ho creato una query che mi trova nella tabella "Insert" gli stessi dati
presenti nella tabella "Giacenze" che hanno in comune il campo "NSped"; (ho
creato la query inserendo le 2 tabelle e creando la relazione di uguaglianza
tra i 2 campi...)
La query da il risultato voluto ma PERCHE' NON MI PERMETTE DI AGGIORNARE
(andando semplicemente a scriverci sopra) NESSUN CAMPO ???
Grazie mille.....
Ciaooooo
--
Posted from
smtp2.libero.it
 [193.70.192.52]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Poblema con QUERY.......

text:
""Norica UD"" <
nor...@libero.it
> ha scritto nel messaggio
news:000501c0e47d$493922a0$3200000a@server...
> Ho 2 Tabelle ("Insert","Giacenze") che contengono tra gli altri 1campo
> uguale sia nell' una che nell'altra, il campo si chiama "NSped";
> Ho creato una query che mi trova nella tabella "Insert" gli stessi dati
> presenti nella tabella "Giacenze" che hanno in comune il campo "NSped";
(ho
> creato la query inserendo le 2 tabelle e creando la relazione di
uguaglianza
> tra i 2 campi...)
> La query da il risultato voluto ma PERCHE' NON MI PERMETTE DI AGGIORNARE
> (andando semplicemente a scriverci sopra) NESSUN CAMPO ???
>
> Grazie mille.....
> Ciaooooo
>
Una query che risulta dal join di due tabelle che sono tra loro in relazione
uno-a-molti non risulta aggiornabile, sicuramente per i campi della tabella
del lato uno.
Puoi farlo però con la tecnica della maschera/sottomaschera.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: [Già Postato?] come inserire una tringa in una tabella da form

author: Carlo

text:
Buona serata a tutto il NG
come da Oggetto ripongo il mio problema non perché nel post precedente Carlo
Costarella non sia stato esauriente ma perché la mia limitata conoscenza di
access non mi ha consentito di poter arrivare alla realizzazione di quello
che volevo realizzare.
Ho sempre quella famosa stringa "Rif. DDT N.12 del 21/01/2007"che  viene
generata al momento che confermo determinati dati ; contestualmente alla
conferma dei dati vorrei che venisse inserita nella  "Tb-DocFiscali"
generando cosi un  nuovo record .Quale é la sintassi giusta?
Come sempre un Grazie
 --
Carlo
:-)
--------------------------------------------------------------------------------
La mia Cartella di Posta in Arrivo è protetta con SPAMfighter
1272 messaggi contenenti spam sono stati bloccati con successo.
Scarica gratuitamente SPAMfighter!


author: Antonio

text:
"Carlo" <
carlog...@tiscali.it
> ha scritto nel messaggio
news:45c8e5e3$0$7745$5fc...@news.tiscali.it...
> Buona serata a tutto il NG
>
> come da Oggetto ripongo il mio problema non perché nel post precedente
> Carlo Costarella non sia stato esauriente ma perché la mia limitata
> conoscenza di access non mi ha consentito di poter arrivare alla
> realizzazione di quello che volevo realizzare.
> Ho sempre quella famosa stringa "Rif. DDT N.12 del 21/01/2007"che  viene
> generata al momento che confermo determinati dati ; contestualmente alla
> conferma dei dati vorrei che venisse inserita nella  "Tb-DocFiscali"
> generando cosi un  nuovo record .Quale é la sintassi giusta?
> Come sempre un Grazie
>
ciao fai una funzione di insert tramite l'oggeto querydef
lo instanzi e fai
 QD.SQL = strSQL
QD.Execute
dove qd è l'istanza di querydef.
ciao


text:
"Antonio" <
nob...@tin.it
> ha scritto nel messaggio
news:e56yh.833$BP5....@twister2.libero.it...

L'oggetto QueryDef  ?  Lo istanzi  ? devi scusarmi Antonio e abuso della tua
cortesia non sono molto pratico di Access ma dove lo devo inserire la routin
che mi hai sopra descritta
Grazie della tua disponibilità



text:
"Carlo" <
carlog...@tiscali.it
> ha scritto nel messaggio
news:45c8f11d$0$20818$5fc...@news.tiscali.it...
>
> "Antonio" <
nob...@tin.it
> ha scritto nel messaggio
> news:e56yh.833$BP5....@twister2.libero.it...
>>
>> "Carlo" <
carlog...@tiscali.it
> ha scritto nel messaggio
>> news:45c8e5e3$0$7745$5fc...@news.tiscali.it...
>>> Buona serata a tutto il NG
>>>
>>> come da Oggetto ripongo il mio problema non perché nel post precedente
>>> Carlo Costarella non sia stato esauriente ma perché la mia limitata
>>> conoscenza di access non mi ha consentito di poter arrivare alla
>>> realizzazione di quello che volevo realizzare.
>>> Ho sempre quella famosa stringa "Rif. DDT N.12 del 21/01/2007"che  viene
>>> generata al momento che confermo determinati dati ; contestualmente alla
>>> conferma dei dati vorrei che venisse inserita nella  "Tb-DocFiscali"
>>> generando cosi un  nuovo record .Quale é la sintassi giusta?
>>> Come sempre un Grazie
>>>
>> ciao fai una funzione di insert tramite l'oggeto querydef
>> lo instanzi e fai
>>
>> QD.SQL = strSQL
>> QD.Execute
>> dove qd è l'istanza di querydef.
>> ciao
> L'oggetto QueryDef  ?  Lo istanzi  ? devi scusarmi Antonio e abuso della
> tua cortesia non sono molto pratico di Access ma dove lo devo inserire la
> routin che mi hai sopra descritta
> Grazie della tua disponibilità
Ciao copiati dove ti pare questo codice l'oggetto querydef ti permette di
crearti una query via codice e di eseguirla.
Dove c'è Qd.Sql devi mettere il tuo comandi di insert che sara piu o meno
"insert into tuatabella(campo) values('Rif. DDT N.12 del 21/01/2007')
Private Sub Comando0_Click()
Dim QD As queryDef
Dim Valore As String
Valore = "Ciao"
Set QD = CurrentDb.CreateQueryDef("")
QD.SQL = "insert into dipendenti (nominativo) values ('" & Valore & "')"
QD.Execute
QD.Close
End Sub


text:
"Antonio" <
nob...@tin.it
> ha scritto nel messaggio
news:WF6yh.887$h_1....@twister1.libero.it...

> End Sub funziona  alla grande per essere perfetta dovrei aggiundere altri
> du campi alla tabella come posso fare
Dove posso inserire i campi IDORDINE, ID IDCLiente sempre nella stessa
tabella
Private Sub cmdSalvaRecord_Click()
Dim QD As QueryDef
Dim Valore As String
Valore = Me.Testo113
Set QD = CurrentDb.CreateQueryDef("")
QD.SQL = "insert into tbl_ddt_dettaglio(D_descrizione)values ('" & Valore &
"')"
QD.Execute
QD.Close
Ciao



text:
"Carlo" <
carlog...@tiscali.it
> ha scritto nel messaggio
news:45c8fc26$0$20820$5fc...@news.tiscali.it...

QD.SQL = "insert into
tbl_ddt_dettaglio(D_descrizione,idordine,idcliente)values ('" & Valore &
"'," & "1" & "," & "2" &   ")"
al posto di 1 e 2 metti la tua stringa, se numerica, altrimenti metti gli
apici.
ciao


text:
[CUT]
>>
>> Private Sub cmdSalvaRecord_Click()
>> Dim QD As QueryDef
>> Dim Valore As String
>> Valore = Me.Testo113
>> Set QD = CurrentDb.CreateQueryDef("")
>> QD.SQL = "insert into tbl_ddt_dettaglio(D_descrizione)values ('" & Valore
>> & "')"
>> QD.Execute
>> QD.Close
>>
>> Ciao
>> Carlo :-)
>>
>
> QD.SQL = "insert into
> tbl_ddt_dettaglio(D_descrizione,idordine,idcliente)values ('" & Valore &
> "'," & "1" & "," & "2" &   ")"
>
> al posto di 1 e 2 metti la tua stringa, se numerica, altrimenti metti gli
> apici.
> ciao
>Ho provato ma da un errore, scusa  Antonio mi sono spiegato male, i valori
>che volevo inserire provengono da altri due campi sempre del form, e devono
>andare nei campi analogi della tabella in questione



text:
[CUT]
>> QD.Close
>>
>> Ciao
>> Carlo :-)
>>
>
> QD.SQL = "insert into
> tbl_ddt_dettaglio(D_descrizione,idordine,idcliente)values ('" & Valore &
> "'," & "1" & "," & "2" &   ")"
>
> al posto di 1 e 2 metti la tua stringa, se numerica, altrimenti metti gli
> apici.
> ciao
Antonio mi da questo errore:
Parametri insufficienti pervisto 2
Private Sub cmdSalvaRecord_Click()
Dim QD As QueryDef
Dim Valore As String
Valore = Me.Testo113
Set QD = CurrentDb.CreateQueryDef("")
QD.SQL = "insert into tbl_ddt_dettaglio(D_descrizione,RifOrdine,idCliente)
values ('" & Valore & "'," & "IDdoc_Fisc" & "," & "IDCliente" & ")"
QD.Execute
QD.Close
si ferma il debug su QD.Execute
Grazie Carlo :-)



text:
"Carlo" <
carlog...@tiscali.it
> ha scritto nel messaggio
news:45c900fa$0$20819$5fc...@news.tiscali.it...
> [CUT]
>>>
>>> Private Sub cmdSalvaRecord_Click()
>>> Dim QD As QueryDef
>>> Dim Valore As String
>>> Valore = Me.Testo113
>>> Set QD = CurrentDb.CreateQueryDef("")
>>> QD.SQL = "insert into tbl_ddt_dettaglio(D_descrizione)values ('" &
>>> Valore & "')"
>>> QD.Execute
>>> QD.Close
>>>
>>> Ciao
>>> Carlo :-)
>>>
>>
>> QD.SQL = "insert into
>> tbl_ddt_dettaglio(D_descrizione,idordine,idcliente)values ('" & Valore &
>> "'," & "1" & "," & "2" &   ")"
>>
>> al posto di 1 e 2 metti la tua stringa, se numerica, altrimenti metti gli
>> apici.
>> ciao
>>Ho provato ma da un errore, scusa  Antonio mi sono spiegato male, i valori
>>che volevo inserire provengono da altri due campi sempre del form, e
>>devono andare nei campi analogi della tabella in questione
> Ciao
> Carlo:-)
>
Scusa Antonio, mi sono spiegato male Private Sub cmdSalvaRecord_Click()
Dim QD As QueryDef
Dim Valore As String
Valore = Me.Testo113
Set QD = CurrentDb.CreateQueryDef("")
QD.SQL = "insert into tbl_ddt_dettaglio(D_descrizione,RifOrdine,idCliente)
values ('" & Valore & "'," & "IDdoc_Fisc" & "," & "IDCliente" & ")"
QD.Execute
QD.Close
mi dà un errore nel debug Parametri insufficenti previsto 2
e si ferma du QD.Execute
Grazie Carlo



text:
[CUT]
>>
>> End Sub funziona  alla grande per essere perfetta dovrei aggiundere altri
>> du campi alla tabella come posso fare
> Dove posso inserire i campi IDORDINE, ID IDCLiente sempre nella stessa
> tabella
>
> Private Sub cmdSalvaRecord_Click()
> Dim QD As QueryDef
> Dim Valore As String
> Valore = Me.Testo113
> Set QD = CurrentDb.CreateQueryDef("")
> QD.SQL = "insert into tbl_ddt_dettaglio(D_descrizione)values ('" & Valore
> & "')"
> QD.Execute
> QD.Close
>
> Ciao
> Carlo :-)
Da errore il server cancella le risposte



text:
"Carlo" <
carlog...@tiscali.it
> ha scritto nel messaggio
news:45c90207$0$20804$5fc...@news.tiscali.it...
> [CUT]
>>> QD.Close
>>>
>>> Ciao
>>> Carlo :-)
>>>
>>
>> QD.SQL = "insert into
>> tbl_ddt_dettaglio(D_descrizione,idordine,idcliente)values ('" & Valore &
>> "'," & "1" & "," & "2" &   ")"
>>
>> al posto di 1 e 2 metti la tua stringa, se numerica, altrimenti metti gli
>> apici.
>> ciao
> Antonio mi da questo errore:
> Parametri insufficienti pervisto 2
>
> Private Sub cmdSalvaRecord_Click()
> Dim QD As QueryDef
> Dim Valore As String
> Valore = Me.Testo113
> Set QD = CurrentDb.CreateQueryDef("")
> QD.SQL = "insert into tbl_ddt_dettaglio(D_descrizione,RifOrdine,idCliente)
> values ('" & Valore & "'," & "IDdoc_Fisc" & "," & "IDCliente" & ")"
>
> QD.Execute
> QD.Close
> si ferma il debug su QD.Execute
> Grazie Carlo :-)
IDdoc_Fisc=1
IDCliente=1
QD.SQL = "insert into tbl_ddt_dettaglio(D_descrizione,RifOrdine,idCliente)
values ('" & Valore & "'," & IDdoc_Fisc & "," & IDCliente & ")"
prova cosi ciao


text:
"Carlo" <
carlog...@tiscali.it
> ha scritto nel messaggio
news:45c90400$0$7742$5fc...@news.tiscali.it...
> [CUT]
>>>
>>> End Sub funziona  alla grande per essere perfetta dovrei aggiundere
>>> altri du campi alla tabella come posso fare
>> Dove posso inserire i campi IDORDINE, ID IDCLiente sempre nella stessa
>> tabella
>>
>> Private Sub cmdSalvaRecord_Click()
>> Dim QD As QueryDef
>> Dim Valore As String
>> Valore = Me.Testo113
>> Set QD = CurrentDb.CreateQueryDef("")
>> QD.SQL = "insert into tbl_ddt_dettaglio(D_descrizione)values ('" & Valore
>> & "')"
>> QD.Execute
>> QD.Close
>>
>> Ciao
>> Carlo :-)
>
> Da errore il server cancella le risposte
>
Antonio ho inserito la stringa ma da un errore
Private Sub cmdSalvaRecord_Click()
Dim QD As QueryDef
Dim Valore As String
Valore = Me.Testo113
Set QD = CurrentDb.CreateQueryDef("")
QD.SQL = "insert into tbl_ddt_dettaglio(D_descrizione,RifOrdine,idCliente)
values ('" & Valore & "'," & "IDdoc_Fisc" & "," & "IDCliente" & ")"
QD.Execute
QD.Close
dove sbaglio? l'errore che ha dato e: parametri insufficenti  previsto 2
Ciao



text:
"[CUT]
>>>
>>> Ciao
>>> Carlo :-)
>>
>> Da errore il server cancella le risposte
>>
> Antonio ho inserito la stringa ma da un errore
> Private Sub cmdSalvaRecord_Click()
> Dim QD As QueryDef
> Dim Valore As String
> Valore = Me.Testo113
> Set QD = CurrentDb.CreateQueryDef("")
> QD.SQL = "insert into tbl_ddt_dettaglio(D_descrizione,RifOrdine,idCliente)
> values ('" & Valore & "'," & "IDdoc_Fisc" & "," & "IDCliente" & ")"
>
> QD.Execute
> QD.Close
> dove sbaglio? l'errore che ha dato e: parametri insufficenti  previsto 2
> Ciao
>
Private Sub cmdSalvaRecord_Click()
Dim QD As QueryDef
Dim Valore As String
Valore = Me.Testo113
Set QD = CurrentDb.CreateQueryDef("")
idDoc_fisc = 1
IDCliente = 1
QD.SQL = "insert into tbl_ddt_dettaglio(D_descrizione,RifOrdine,idCliente)
values ('" & Valore & "'," & "IDdoc_Fisc" & "," & "IDCliente" & ")"
QD.Execute
QD.Close
Antonio é giusto così perche mi da l'errore "impossibile assegnare  un
valore all'oggetto"



title: finestra per selezione di un file

text:
Avete presente la finestra che propone windows di default per selezionare un
file, e nel mio caso vorrei poter cercare solo i file .bmp, sapete come č
possibile farla uscire e come facendo doppio click sul file scelto catturare
il percorso e nome di file compreso e assegnarlo al un controllo in access?
Grazie.


title: finestra per selezione di un file

author: warp

text:
"Tosto73" <
> Avete presente la finestra che propone windows di default per selezionare
un
> file, e nel mio caso vorrei poter cercare solo i file .bmp, sapete come è
> possibile farla uscire e come facendo doppio click sul file scelto
catturare
> il percorso e nome di file compreso e assegnarlo al un controllo in
access?
Ti riferisci al commondialog?
In tal caso vai sul Sito Comune: trovi un'API (di Stefano Bettini mi pare)
che fa al caso tuo.
Ciao: warp


title: da Access ricerca e scrittura su word di campi sequenziali (tipo indirizzario)

author: Maurizio Giri

text:
Scusate ma il mio progetto, nato per la consultazione di documenti, diventa
sempre più complicato
Devo trovare un nome "Pippo" da una tabella di Access chiamata "Personale"
con i campi:
nome, mansione, sede lavorativa ecc.
se il nome esiste allora apro word, scrivo il nome e i campi relativi al
nome con una  tabulazione in colonna:
nome
mansione
sede lavorativa
ecc.
 e poi lo devo stampare
se qualcuno ha già affrontato il problema e avesse un codice scritto, mi
sarebbe veramente di aiuto
Ps: esiste una rivista che tratta esempi pratici di uso comune con
applicazioni Office e VB?
grazie di nuovo
Maurizio


title: Elimizazione doppioni in tabe_clienti

author: montanaro

text:
Buongiorno, sono un principiante, infatti le query nn le faccio in
SQL.........
Ho un elenco clienti con un sacco di doppioni individuabili confrontando la
p.iva o il codice fiscale (il cliente ha l'una o l'altro, ed alcune volte i
campi sono in bianco!).
Come posso eliminare i doppioni tenendone uno solo?
Grazie.
montanaro
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Elimizazione doppioni in tabe_clienti

author: Roberto da casa

text:
"montanaro" <
trading...@yahoo.it
> ha scritto nel messaggio
news:82Z88Z48Z250Y1...@usenet.libero.it...
> Buongiorno, sono un principiante, infatti le query nn le faccio in
> SQL.........
> Ho un elenco clienti con un sacco di doppioni individuabili confrontando
la
> p.iva o il codice fiscale (il cliente ha l'una o l'altro, ed alcune volte
i
> campi sono in bianco!).
> Come posso eliminare i doppioni tenendone uno solo?
> Grazie.
> montanaro
Evidenzia i doppioni creandoti una query con l'Autocomposizione dati
duplicati; lanciando la query ti verrano mostrate le coppie, le triplette le
quadriplette ecc; manualmente, per ognuna di esse, puoi eliminare il/i
record che ti interessa cancellare.
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: creazione di una routine con caratteristiche di "macro di excel"

author: Neo

text:
so che il subject non è fantastico, ma non sono riuscito ad esprimermi
meglio
la macro di excel è per il semplice fatto che registra i movimenti e i
pulsanti premuti...
il mio problema è questo:
dovre creare una procedura automatica che alla pressione di un tasto nella
maschera X faccia le seguenti operazioni:
aprire la maschera Y (fin qui tutti ok :-))
cliccare virtualmente sul pulsante zz (qui non so come fare)
esiste una soluzione senza dover integrare tutte le maschere insieme??
grazie


author: RoDAgo

text:
"Neo" scrisse...

Cliccare virtualmente vuol dire che vuoi eseguire il codice legato
all'evento click del pulsante?
Se è cosi puoi fare riferimento direttamente al codice del pulsante:
Esempio:  Comando13_Click
Oppure con una macro
    Dim ctl As Control
    Set ctl = Forms!TuaForms!TuoControllo
    DoCmd.RunMacro ctl.OnClick
RoDAgo


title: Problemi di autocomposizione guidata/creazione pannello comandi

author: madaxy

text:
Ciao a tutti...niente da fare.
Ogni volta che tento di creare un pannello comandi access mi sbatte
fuori e mi chiede di inviare l'errore...
Avvio la procedura...creo il pannello...e fin quì tutto
bene...sembrerebbe fatta...
Invece:
Se imposto il pannello come maschera di apertura...Access non mi fa
nemmeno aprire il db....mi comunica un errore e mi invita a
segnalarlo..
Se provo ad aprire un db nel quale è già presente un pannello
comandi....la stessa cosa...mi sbatte fuori...
La stessa cosa se devo creare una casella combinata...
Avvio la procedura ed alla fine mi appare l'errore "la classe non
supporta l'automazione o l'interfaccia prevista"
Premetto che ho WIN2000 e OFFICE XP
Ho provato a disinstallare XP ed installare OFFICE2000 per vedere se
cambiava qualcosa....niente....
Qualcuno del gruppo mi sa dire che cosa succede?
Grazie in anticipo per le risposte


author: Karl Donaubauer

text:
madaxy wrote:
> Ogni volta che tento di creare un pannello comandi access mi sbatte
> fuori e mi chiede di inviare l'errore...
> Avvio la procedura...creo il pannello...e fin quì tutto
> bene...sembrerebbe fatta...
> Invece:
> Se imposto il pannello come maschera di apertura...Access non mi fa
> nemmeno aprire il db....mi comunica un errore e mi invita a
> segnalarlo..
> Se provo ad aprire un db nel quale è già presente un pannello
> comandi....la stessa cosa...mi sbatte fuori...
>
> La stessa cosa se devo creare una casella combinata...
> Avvio la procedura ed alla fine mi appare l'errore "la classe non
> supporta l'automazione o l'interfaccia prevista"
> Premetto che ho WIN2000 e OFFICE XP
> Ho provato a disinstallare XP ed installare OFFICE2000 per vedere se
> cambiava qualcosa....niente....
> ...
Prova di riregistrare la DLL di DAO 3.60 come descritto nel
FAQ 7.9 sul sito indicato qui sotto.
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Query di aggiornamento su range di record

author: Claudio

text:
Buonasera a tutto il NG :-) !
Ho bisogno, come sempre del vostro aiuto.
Come posso fare tramite una query di aggiornamento determinare ad es. che
dal record 35 al 59 il valore del campo di una tabella da "pippo" deve
cambiare in "pluto" ?.
Non riesco a capire come posso indicare, se è possibile, il range 35 - 59 ?
Grazie a tutti !
Paolo


text:
"Claudio" <
hac...@fastwebnet.it
> ha scritto nel messaggio
news:1p1Ia.30206$Fr5.6...@tornado.fastwebnet.it...

Tieni presente che a seconda di come accedi alla tabella non è detto che il
record 35 sia sempre lo stesso.
Un modo comunque potrebbe essere di farlo via codice ciclando su un
recordset e usando un contatore.
Se invece hai un campo che assume un valore contatore allora lo fai con una
query mettendo come criterio sotto quel campo
Between 35 And 59
Antonio


text:
"Claudio" <
hac...@fastwebnet.it
> ha scritto nel messaggio
news:1p1Ia.30206$Fr5.6...@tornado.fastwebnet.it...

Nei criteri della query relativi al campo che contiene il numero del record
scrivi:
Between 35 And 59
Per maggiori chiarimenti vedi sull'help l'Operatore Between...And .
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:Kv1Ia.102384$lK4.2...@twister1.libero.it...
>
> "Claudio" <
hac...@fastwebnet.it
> ha scritto nel messaggio
> news:1p1Ia.30206$Fr5.6...@tornado.fastwebnet.it...
> > Buonasera a tutto il NG :-) !
> >
> > Ho bisogno, come sempre del vostro aiuto.
> >
> > Come posso fare tramite una query di aggiornamento determinare ad es.
che
> > dal record 35 al 59 il valore del campo di una tabella da "pippo" deve
> > cambiare in "pluto" ?.
> >
> > Non riesco a capire come posso indicare, se è possibile, il range 35 -
59
> ?
> >
> > Grazie a tutti !
> >
> > Paolo
>
> Nei criteri della query relativi al campo che contiene il numero del
record
> scrivi:
>
> Between 35 And 59
>
> Per maggiori chiarimenti vedi sull'help l'Operatore Between...And .
>
> --
> Roberto
>
Ringrazio infinitamente sia Antonio che Roberto per la soluzione, e credo
proprio che sia cio che cercavo mentre prima pensavo invece di ottenere le
posizioni tramite proprio un ciclo su un campo "contatore" ma peraltro è
molto piu semplice cio che mi avete indicato.
Sempre in debito per le indicazioni che sapete dare,.....  di nuovo grazie e
buona serata ! :))
Paolo



title: metodi ItemsSelected.Count e Selected(u)

author: Riccardo Baldinotti

text:
Ho una maschera "mTel", contenente tre caselle di riepilogo [amm],
[tec] e [altro].
C'è anche una casella di testo [quanti].
Alla pressione di un pulsante, chiamo le seguenti istruzioni
        Forms!mTel!quanti = [Forms]![mTel]![amm].ItemsSelected.Count +
_
           [Forms]![mTel]![tec].ItemsSelected.Count + _
           [Forms]![mTel]![altro].ItemsSelected.Count
        If Forms!mTel!quanti = 0 Then
            MsgBox "Scegliere almeno un tipo di problema!", vbCritical
+ vbOKOnly
per controllare che almeno una voce in una casella di riepilogo sia
stata selezionata.
Se tutto va bene, esegue il seguente codice
            stri = "'"
            For u = 0 To Forms!mTel!amm.ListCount - 1
                stri = stri & Forms!mTel!amm.Selected(u) & "', '"
            Next
            For u = 0 To Forms!mTel!tec.ListCount - 1
                stri = stri & Forms!mTel!tec.Selected(u) & "', '"
            Next
            For u = 0 To Forms!mTel!altro.ListCount - 1
                stri = stri & Forms!mTel!altro.Selected(u) & "', '"
            Next
            stri = Left(stri, Len(stri) - 1)
            stri = "insert into telefonate values(" & codice & ", '" &
Forms!mTel!contatto & _
                "', '" & Forms!mTel!provsr.Caption & "', '" & Forms!
mTel!giorno & "', '" & _
                Forms!mTel!prov & "', " & stri & Chr(34) & Forms!mTel!
descr & Chr(34) & _
                ", " & Chr(34) & _
                Forms!mTel!nome & Chr(34) & ", " & Chr(34) & Forms!
mTel!tel & Chr(34) & _
                ", " & Chr(34) & _
                Forms!mTel!postel & Chr(34) & ", " & Forms!mTel!quanti
& ");"
            CurrentDb.Execute stri
La "insert into" comprende, fra i valori, la stringa "stri", composta
più o meno così:
"1;0;0;1;..." tanti uni e zeri quanti ne sono stati trovati scorrendo,
con i tre "For...Next", le tre caselle di riepilogo. Questi valori
sono scritti in campi di tipo Sì/No. Non mi risultano messaggi di
errore tipo: "il numero di valori non corrisponde al numero dei
campi", che uscirebbe se i "For... Next" non scorressero tutti i
valori.
L'istruzione contiene anche il valore di [quanti] calcolato prima.
Dovrebbe essere uguale al conto degli uni della stringa precedente.
Ora succede che circa il 2% dei record così creati ha un valore di
[quanti] superiore di uno al conto delle opzioni scelte. Il valore di
[quanti] in questi record va da 1 a 5.
Si tratta di un applicativo usato da più persone e ricevo questi dati
fasulli da diversi di loro. Ho provato a selezionare cliccando o
battendo lo spazio ma a me non è successo.
Non mi è parso nemmeno di notare che l'errore possa aver mangiato
sistematicamente una scelta in particolare.
Bò! Come dire: mi affido all'altrui acume.
Grazie a tutti.
Riccardo Baldinotti


author: Alessandro Baraldi

text:
On 20 Nov, 12:11, Riccardo Baldinotti <
riccardo.baldino...@poste.it
>
wrote:

L'uso di questa sintassi:
INSERT INTO <tabella> VALUES( <valori> )
richiede che tutti i campi vengano valorizzati, qual'ora non vengano
ionteressati tutti la sintassi deve esere variata in questo modo:
INSERT INTO <tabella> ( <campi> ) VALUES( <valori> )
Es:
INSERT INTO dirigenti(id, cognome, nome) VALUES(10, 'Corinzi',
'Mimmo')
Nel tuo caso non sò bene che stai facendo non sapendo il numero dei
campi della tabella ma tu sicuramente lo conosci...!
P.S.
Altra confusione che vedo è che alcune volte usi l'APICE altre il
chr(34) non sarebbe opportuno che uniformassi...?
Per le ListBox basta verificare che ListIndex>0 al fine di capire se è
apportata una selezione.
@Alex


author: Alessandro Cara

text:
Riccardo Baldinotti wrote:
[cut]
> "1;0;0;1;..." tanti uni e zeri quanti ne sono stati trovati scorrendo,
[cut]
Non capisco. A meno che mi sia perso qualcosa la tua stri e'
stri = '0','-1',.........,'-1',
1) se deve finire in campi di tipo si/no non comprendo perche' vengono
passati in alfanumerico
2) a occhio la logica sembra corretta
3) Ti consiglerei di mettere in ogni for
ctr = ctr + abs(Forms!mtel!xxx.Selected(u))
e dopo le for (prima della insert)
if quanti <> ctr then msgbox "'ste quantita' non tornano mai'
questo, se non altro, dovrebbe evidenziarti sul momento il problema
--
ac
y-1=x


text:
On 20 Nov, 13:44, Alessandro Cara <
alessandro.c...@ay-1asistemi.it
>
wrote:
Rispondo un po' a entrambi.
La sintassi della "insert into" non comprende i campi perché li scrive
tutti, e quindi non serve metterli. Se i cicli For...Next fossero il
problema, avrei un errore proprio per quello, ma l'errore lì non esce,
quindi tutto bene.
> Altra confusione che vedo è che alcune volte usi l'APICE altre il
> chr(34) non sarebbe opportuno che uniformassi...?
La storia degli apici o delle virgolette richiederebbe un altro
messaggio perché avrei qualche domanduccia...
> Per le ListBox basta verificare che ListIndex>0 al fine di capire se è
> apportata una selezione.
Ho liste con Multiselect. Non mi è chiaro dall'help se listindex sia
applicabile. Io pensavo di no e per questo faccio il ciclo sulla
proprietà Selected.
> 3) Ti consiglerei di mettere in ogni for
> ctr = ctr + abs(Forms!mtel!xxx.Selected(u))
> e dopo le for (prima della insert)
> if quanti <> ctr then msgbox "'ste quantita' non tornano mai'
Ci avevo pensato. Il problema è che succede in uffici sparsi in altre
province. Non sono riuscito a ottenere l'errore sul mio pc. Non vorrei
bloccare un operatore senza poter intervenire sulla macchina.
Preciso che non sono nemmeno in grado di spostarmi facilmente (sedia a
rotelle senza antigravità...;-).
Proverò a mettere un messaggio dettagliato e a inviare la nuova
versione in uno solo di quegli uffici, con preghiera di chiamarmi
immediatamente.
Nel frattempo, a costo di ripetermi, esprimo il mio entusiasmo per la
vostra esistenza.
Riccardo Baldinotti


text:
Riccardo Baldinotti wrote:
[cut]
> Proverò a mettere un messaggio dettagliato e a inviare la nuova
> versione in uno solo di quegli uffici, con preghiera di chiamarmi
> immediatamente.
Behhh.... direbbero gli ovini.
Puoi sempre in quel caso, invece della msgbox, mandarti in automatico
una e-mail con i dati che ti interessano.
--
ac
y-1=x


text:
On 20 Nov, 16:22, Alessandro Cara <
alessandro.c...@ay-1asistemi.it
>
wrote:

Mai che mi vengano in mente le soluzioni più ovvie...
Comunque, ho scoperto che nessun dato era sbagliato: c'erano delle
query incoerenti nel prenderli! Pardon.


text:
On 20 Nov, 16:22, Alessandro Cara <
alessandro.c...@ay-1asistemi.it
>
wrote:
> Behhh.... direbbero gli ovini.
> Puoi sempre in quel caso, invece della msgbox, mandarti in automatico
> una e-mail con i dati che ti interessano.
>
Dimenticavo di precisare che volevo sapere in diretta qual fosse
l'inserimento che produceva il dato strambo. Sentendoci in diretta.
pensavo, avrei capito cosa succedeva.
Tutto superato, come dicevo.
Saluti e grazie.
Riccardo Baldinotti


title: Importare più file di testo

author: Gestione

text:
Scusate il disturbo ma io devo importare circa 400 file di testo in una
unica tabella. Esiste un modo per importarli tutti in un unico colpo senza
dover eseguire la procedura di importazione per ogni singolo file.
Grazie


title: Importare più file di testo

author: access il top

text:
"Gestione" <
gest...@tecomitaliia.com
> ha scritto nel messaggio
news:rGZSd.943000$35.35...@news4.tin.it...

sono nella stessa cartella?
se si prova con un codice tipo questo
privatesub ......
path = "c:\"
CERCAFILE:
INFILE = Dir(path & "*.*")'assegna a infile il nome e il percorso
If INFILE = "" Then
   MsgBox "non ci sono più file da importare"
   Exit Sub
End If
tua routine per importare il file
goto cercafile
End Sub


title: Importare più file di testo

author: namor

text:
Gestione ha scritto:

Li unisci tutti in un unico file cosě poi importi una volta sola.
Apri una finestra DOS e con CD ti posizioni nella cartella, poi fai
  for %1 in (*.txt) do type %1 >> C:\archivio.txt
e troverai in C:\ il file unico archivio.txt.
Puoi cambiare i nomi, ma č importante che il file unico non sia creato
nella stessa cartella che contiene i 400 originali, sennň va in loop.
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: Importare più file di testo

text:
"Gestione" <
gest...@tecomitaliia.com
> ha scritto nel messaggio
news:rGZSd.943000$35.35...@news4.tin.it...

Grazie mille per l'aiuto mi avete evitato un lungo e palloso lavorone.
Saluti


title: approfondire le funzioni del generatore di espressioni

author: Luciano

text:
ciao
dove potrei trovare sul web una guida approfondita su come usare il
generatore di espressioni? Sulla guida in linea non c'è molto e anche sulla
guida cartacea che ho c'è poco.
grazie


author: SunRex

text:
"Luciano" <
l...@luckymain.org
> ha scritto nel messaggio
news:qifgc.6853$l27....@news.edisontel.com...

Io ti consiglio
SQL Query a partire da zero
di Michael J. Hernandez e Jhon L. Viescas
Edizione Mondadori informatica
Sui 40 Eurelli
altro che generatore di query ;)
SunRex


title: ordinamento tabella

author: redcloud

text:
Salve, devo eseguire una query SQL su un DB access. Vorrei che la query
mi restituisse una tabella con ordinamento crescente su un attributo
data. Mi indicate uno statment SQL access? Grazie!


title: ordinamento tabella

text:
redcloud ha scritto:
> Salve, devo eseguire una query SQL su un DB access. Vorrei che la query
> mi restituisse una tabella con ordinamento crescente su un attributo
> data. Mi indicate uno statment SQL access? Grazie!
Ho risolto aggiungendo semplicemente "ORDER BY nomeAttributo" alla query.
Per l'ordinamento decrescente basta aggiungere
"ORDER BY nomeAttributo DESC"


title: perchè con office xp e windows xp non funziona?

author: Guggenheim

text:
QUESTO CODICE DOVREBBE CAMBIARE LA FRECCINA IN MANINA MA CON XP NON FUNGE!
GRAZIE
GUGGE
Option Compare Database
Option Explicit
Declare Function LoadCursorFromFile Lib "user32" Alias "LoadCursorFromFileA"
(ByVal lpFileName As String) As Long
Declare Function SetCursor Lib "user32" (ByVal hCursor As Long) As Long
Function PointM(strPathToCursor As String)
  Dim lngRet As Long
  lngRet = LoadCursorFromFile(strPathToCursor)
  lngRet = SetCursor(lngRet)
End Function
Public Function Curs()
Call PointM("C:\WINDOWS\CURSORS\HAND-M.CUR")
End Function


author: Sib

text:
"Guggenheim" <
gugge...@iol.it
> ha scritto nel messaggio
> QUESTO CODICE DOVREBBE CAMBIARE LA FRECCINA IN MANINA MA NON XP NON FUNGE!
> GRAZIE
> GUGGE
>
> Option Compare Database
> Option Explicit
cut
Ma sei sicuro che ci sia bisogno di scomodare le API (che per forza di cose
in XP possono essere diverse da W9X)?
Mi pare ci siano funzioni interne ad access che ti consentono di cambiare
l'aspetto del puntatore.
Sib


title: Errori di comlilazione su funzione MID Help please !!!

author: Roby - Mister NO

text:
Ciao
>Ciao a tutti,
>
>Mi è capitata una cosa stranissima, mai successa prima.
>Ho quasi terminato un programma in access 97,vado dal cliente a farlo
>vedere e mi da una serie di errori stranissimi, le cose incriminate
>sono essenzialmente due:
>
>La prima questa semplice funzione:
>txtAnno.Value = CLng("20" & CStr(Mid(Now(), 7, 2)))
>
>Si inchioda sulla funzione Mid dicendomi che non può compliare il
>modulo perchè "Impossibile trovare il progetto o libreria"
PS: ho provato ora a fare una copia MDE del database, e funziona
dappertutto, però vorrei evitare questa soluzione in quanto se poi
devo fare dei piccoli aggiornamenti al programma è un casino
trasferire tutti i dati inseriti per vie delle molte tabelle e molte
relazioie, almeno per me, che non sono un professionista :-)
Preferirei lavorare sull'mdb......
------------
Beep Bepp
           Roby
Togliere XXX per rispondere via Email
PGP KEY  Disponibile


text:
Ciao a tutti,
Mi è capitata una cosa stranissima, mai successa prima.
Ho quasi terminato un programma in access 97,vado dal cliente a farlo
vedere e mi da una serie di errori stranissimi, le cose incriminate
sono essenzialmente due:
La prima questa semplice funzione:
txtAnno.Value = CLng("20" & CStr(Mid(Now(), 7, 2)))
Si inchioda sulla funzione Mid dicendomi che non può compliare il
modulo perchè "Impossibile trovare il progetto o libreria"
Lo stesso errore me lo dà anche se apro il db in access 2000 senza
convertirlo....mah !!!
Sulla macchina che uso per sviluppare (win 98 e access 97) tutto
funziona benissimo, l'ho testato su un altro client con
l'installazione tipicha di office 97 e non funzionava, ho installato
la  versione personalizzata e installato tutto e va anche sul secondo
client........... Bohhhhhh
La cosa buffa è che dal cliente ( oltre che ad aver reinstallato tutto
office con tutto l'immaginabile) mi sono fatto una maschera al volo, e
ho scritto e ho utilizzato la funione MID e tutto funziona bene, solo
utilizzando il mio DB si inchioda (dal cliente).
Inoltre lo stesso problema  me lo da su un campo di una query, il
campo incriminato è il seguente:
anno: IIf(CStr(Mid([tblCorsi_DataDecreto];7;1))="9";"19" &
Mid([tblCorsi_DataDecreto];7;2);"20" &
Mid([tblCorsi_DataDecreto];7;2))
Ripeto sulla macchina di sviluppo tutto funziona benissimo............
Qualcuno ha idea di come fare a risolvere questo problema.........??
Non so più dove sbattere la testa.
Ciao e grazie



author: Michele Doimo

text:
> >Si inchioda sulla funzione Mid dicendomi che non può compliare il
> >modulo perchè "Impossibile trovare il progetto o libreria"
Il solito problema. Apri un modulo e controlla i riferimenti mancanti.
Menu Stumenti>Riferimenti. Controlla/ripristina dove vedi scitto "Manca".
Byez. mikele


author: VT @ work

text:
Il Mon, 10 Jul 2000 16:50:52 +0200, Roby - Mister NO
<ro...@XXXkantea.it> scrisse:
>PS: ho provato ora a fare una copia MDE del database, e funziona
>dappertutto, però vorrei evitare questa soluzione in quanto se poi
>devo fare dei piccoli aggiornamenti al programma è un casino
>trasferire tutti i dati inseriti per vie delle molte tabelle e molte
>relazioie, almeno per me, che non sono un professionista :-)
>Preferirei lavorare sull'mdb......
Non c'entra niente con il tuo problema, ma la struttura che hai dato
al tuo applicativo non è la migliore: infatti hai lasciato le tabelle
insieme a tutti gli altri oggetti (form, query, report ...).
Come ti sei già reso conto, questo ti costringe, ogni volta che porti
una modifica presso il cliente, a trasferire tutti i dati dal vecchio
mdb al nuovo.
Dovresti dividere il tuo applicativo in due parti: Back End (Tabelle)
e Front End (tutto il resto), allegando le tabelle del Back End nel
Front End. In questo modo puoi lasciare il Back End del cliente
inalterato, e sostituire ogni volta che vuoi solo il Front End;
l'unica cosa da fare presso il cliente è riallegare le tabelle del
Back End.
Sono stato volutamente sommario ed approssimativo: guarda il menù
Strumenti -> Aggiunte -> Divisione database, e l'help alla voce
corrispondente.
Vincenzo Turturro
----------------------------------
Niuna impresa, per minima che sia,
può avere cominciamento e fine
senza queste tre cose:
e cioè senza sapere,
senza potere,
senza con amore volere
(Anonimo fiorentino, XIV sec.)
------------------------------


text:
Ciao,
>Sono stato volutamente sommario ed approssimativo: guarda il menù
>Strumenti -> Aggiunte -> Divisione database, e l'help alla voce
>corrispondente.
Grazie, ho capito cosa intendi, l'idea non è male, la fretta non mi ci
ha fatto pensare, forse sono ancora in tempo :-)
Ciao



text:
Ciao
>Il solito problema. Apri un modulo e controlla i riferimenti mancanti.
>Menu Stumenti>Riferimenti. Controlla/ripristina dove vedi scitto "Manca".
Sarà anche solito, ma non ci sarei mai arrivato con quel messaggio di
errore :-)
Comunque grazie infinite, ho tolto il ceck da quelli con scritto manca
e tutto funzia.......... ora...........
Grazie ancora ciao



title: evitare attivazione textbox

author: PBsoft

text:
Sto cercando un modo per evitare che l'azione dell'utente (tastiera o mouse)
possa attivare una textbox.
So benissimo che basterebbe impostare la proprietą Enabled a False, ma la
textbox in questione ha una formattazione condizionale, che prevede la colorazione
del suo sfondo a seconda di un'espressione.
Purtroppo per colorare lo sfondo la textbox deve essere abilitata.
Qualche suggerimento?
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution


title: evitare attivazione textbox

author: MoNiCa

text:
On 1 Set, 15:05, PBsoft <info[REMOVE]@
pbsoft.it
> wrote:
> Sto cercando un modo per evitare che l'azione dell'utente (tastiera o mouse)
> possa attivare una textbox.
> So benissimo che basterebbe impostare la proprietà Enabled a False, ma la
> textbox in questione ha una formattazione condizionale, che prevede la colorazione
> del suo sfondo a seconda di un'espressione.
> Purtroppo per colorare lo sfondo la textbox deve essere abilitata.
>
> Qualche suggerimento?
>
> --
> PBsoft di Gabriele
Bertolucciwww.pbsoft.it
> skype:pbsoftsolution
io ho un suggerimento ....poco consono, ma che funziona:
Crea un'etichetta contenente una lettera di dimensioni picccccccccole
e di colore uguale allo sfondo della mashera (la lettera, non la
label) e mettila sopra la textbox
poco consono.... ma perchè no?


title: evitare attivazione textbox

author: Simone Calligaris

text:
"PBsoft" <info
> Sto cercando un modo per evitare che l'azione dell'utente (tastiera o
mouse)
> possa attivare una textbox.
> So benissimo che basterebbe impostare la proprietą Enabled a False, ma la
> textbox in questione ha una formattazione condizionale, che prevede la
colorazione
> del suo sfondo a seconda di un'espressione.
> Purtroppo per colorare lo sfondo la textbox deve essere abilitata.
>
> Qualche suggerimento?
Inserisci una funzione su evento "Attivato" delle textboxs 'disabilitate',
che sposta il focus da qualche altra parte.
Saluti.


title: evitare attivazione textbox

author: ALESSANDRO Baraldi

text:
"PBsoft" <info[REMOVE]@
pbsoft.it
> ha scritto nel messaggio
news:875ea3552bcde8...@news.tin.it...
> Sto cercando un modo per evitare che l'azione dell'utente (tastiera o
mouse)
> possa attivare una textbox.
> So benissimo che basterebbe impostare la proprietà Enabled a False, ma la
> textbox in questione ha una formattazione condizionale, che prevede la
colorazione
> del suo sfondo a seconda di un'espressione.
> Purtroppo per colorare lo sfondo la textbox deve essere abilitata.
>
> Qualche suggerimento?
>
> --
> PBsoft di Gabriele Bertolucci
Magari sbaglio o ricordo male... ma nonostante tu imposti a Enabled=False se
hai la formattazione
condizionale la proprietà non viene eseguita..., almeno mi pareva(sono
abbastanza sicuro sia così
nelle Form continue)...!
In ogni caso io ti suggerirei di verificare l'evento GotFocus se si attiva
sposta il Focus sul
Screen.PreviousControl.SetFocus(+/- quello che ti ha detto Simone..., ma
verifica il discorso di Enabled)..!
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------


title: evitare attivazione textbox

text:
"PBsoft" <info[REMOVE]@
pbsoft.it
> ha scritto nel messaggio
news:875ea3552bcde8...@news.tin.it...
> Sto cercando un modo per evitare che l'azione dell'utente (tastiera o
mouse)
> possa attivare una textbox.
> So benissimo che basterebbe impostare la proprietà Enabled a False, ma la
> textbox in questione ha una formattazione condizionale, che prevede la
colorazione
> del suo sfondo a seconda di un'espressione.
> Purtroppo per colorare lo sfondo la textbox deve essere abilitata.
>
> Qualche suggerimento?
>
> --
> PBsoft di Gabriele Bertolucci
Magari sbaglio o ricordo male... ma nonostante tu imposti a Enabled=False se



title: evitare attivazione textbox

text:
> Magari sbaglio o ricordo male... ma nonostante tu imposti a
> Enabled=False se
> hai la formattazione
> condizionale la proprietà non viene eseguita..., almeno mi pareva(sono
> abbastanza sicuro sia così
> nelle Form continue)...!
E' così, è così.
> In ogni caso io ti suggerirei di verificare l'evento GotFocus se si
> attiva sposta il Focus sul
> Screen.PreviousControl.SetFocus(+/- quello che ti ha detto Simone...,
> ma verifica il discorso di Enabled)..!
PreviousControl !!!!!!!
Ecco la parolina magica che mi ero dimenticato!!!!
Grazie.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution


title: evitare attivazione textbox

text:
> Inserisci una funzione su evento "Attivato" delle textboxs
> 'disabilitate', che sposta il focus da qualche altra parte.
Ci avevo pensato, ma fino a quando Alex non ha detto la parolina magica "PreviousControl"
ero in preda ad una catalessi.
Grazie mille.



title: evitare attivazione textbox

text:
"PBsoft" <
> Ci avevo pensato, ma fino a quando Alex non ha detto la parolina magica
"PreviousControl"
> ero in preda ad una catalessi.
Ma potrebbe non esistere un "previouscontrol".
In casi simili io preferisco posizionare su un controllo appositamente
nascosto oppure sul selettore record della form (che potrebbe essere anche
invisibile).
Saluti.


title: evitare attivazione textbox

text:
> Ma potrebbe non esistere un "previouscontrol".
Capisco la problematica, ma non è il mio caso.
Giusta osservazione, comunque.



title: evitare attivazione textbox

author: MA

text:
PBsoft wrote:
> Sto cercando un modo per evitare che l'azione dell'utente (tastiera o
> mouse) possa attivare una textbox.
> So benissimo che basterebbe impostare la proprietà Enabled a False,
> ma la
> textbox in questione ha una formattazione condizionale, che prevede
> la colorazione del suo sfondo a seconda di un'espressione.
> Purtroppo per colorare lo sfondo la textbox deve essere abilitata.
>
> Qualche suggerimento?
Scusa ma perchè non usi locked?
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access
Segrate (MI), 7-8 giugno 2007


title: evitare attivazione textbox

text:
On 2 Set, 08:45, "MA" <
mas...@massimilianoamendola.it
> wrote:
> PBsoft wrote:
> > Sto cercando un modo per evitare che l'azione dell'utente (tastiera o
> > mouse) possa attivare una textbox.
> > So benissimo che basterebbe impostare la proprietà Enabled a False,
> > ma la
> > textbox in questione ha una formattazione condizionale, che prevede
> > la colorazione del suo sfondo a seconda di un'espressione.
> > Purtroppo per colorare lo sfondo la textbox deve essere abilitata.
>
> > Qualche suggerimento?
>
> Scusa ma perchè non usi locked?
>
Credo perchè l'evento attivazione si verifica comunque.
> --
> --
> MAssimiliano
Amendolawww.accessgroup.it
> Cisa - Conferenza Italiana Sviluppatori Access
> Segrate (MI), 7-8 giugno 2007
--
Ciao
Access


title: evitare attivazione textbox

text:
piet...@gmail.com
 wrote:
> On 2 Set, 08:45, "MA" <
mas...@massimilianoamendola.it
> wrote:
>> PBsoft wrote:
>>> Sto cercando un modo per evitare che l'azione dell'utente (tastiera
>>> o mouse) possa attivare una textbox.
>>> So benissimo che basterebbe impostare la proprietà Enabled a False,
>>> ma la
>>> textbox in questione ha una formattazione condizionale, che prevede
>>> la colorazione del suo sfondo a seconda di un'espressione.
>>> Purtroppo per colorare lo sfondo la textbox deve essere abilitata.
>>
>>> Qualche suggerimento?
>>
>> Scusa ma perchè non usi locked?
>>
>
> Credo perchè l'evento attivazione si verifica comunque.
>
Hai ragione
--
--
MAssimiliano Amendola
www.accessgroup.it



title: evitare attivazione textbox

text:
> Credo perchè l'evento attivazione si verifica comunque.
Centrato in pieno.
Inoltre la casella di testo in questione è soggetta a formattazione condizionale,
quindi viene ignorato eventuale codice VBA che ne imposta la proprietà Enabled
a False.



title: Problema con weekday

author: Oyster

text:
Nel mio database ho una colonna (Giorno) che contiene un numero da 1 a 7
corrispondente ai giorni della settimana e vorrei utilizzare Weekday per una
query.
Ho utilizzato il seguente codice
SELECT Tabella.*
FROM Tabella
WHERE (((Tabella.Giorno)=Weekday([Inserire la data])));
ma mi da errore di compilazione.
Idem se al posto delle quadre metto direttamente una data.
Any Idea?


title: Problema con weekday

author: ciroteo

text:
"Oyster" <
b....@libero.it
> ha scritto nel messaggio
news:n8ngd.6581$Es2.1...@twister2.libero.it...

ma tabella.giorno è un campo data o numerico?


title: Problema con weekday

text:
è un campo numerico di tipo integer, come il risultato di weekday



title: Problema con weekday

text:
"Oyster" <
b....@libero.it
> ha scritto nel messaggio
news:7Xngd.6663$Es2.1...@twister2.libero.it...
>è un campo numerico di tipo integer, come il risultato di weekday
>
>>
>> ma tabella.giorno è un campo data o numerico?
>>
>>
>
>
allora non ti serve usare weekday, ma solo un dato numerico che va da 1 a 7
....


title: FlexGrid Access E Aggiornamenti Windows

author: D

text:
Buongiorno a tutti
    Uso da anni con soddisfazione l'accoppiata Access + OCX Flexgrid (sia
gerarchiaca che normale). In data 13 febbraio la microsoft ha distribuito 2
patch di sicurezza di windows  il cui effetto (non so quanto voluto) č
disabilitare il supporto, da parte di access per questi 2 ocx. Appare
proprio un messaggio che indica questo , in fase di design e non ci sono
registrazioni dell'ocx reinstallazioni di access o viasualbasic 6.0 che
risolvano il problema. L'unico modo č disinstallare le patch di windows
(testato sia per vista che per xp).
Volevo sapere se qualcuno del newsgroup ha maggiori informazioni al riguardo
visto che ho speso un'intera giornata con google ma non ho avuto notizie piů
approfondite in proposito.
Ringrazio anticipatamente
Daniele Fasoli


title: FlexGrid Access E Aggiornamenti Windows

author: Carlo Costarella

text:
"D" <
daniele...@tiscali.it
> ha scritto nel messaggio
news:ODRll.265552$FR.5...@twister1.libero.it...
> Buongiorno a tutti
>    Uso da anni con soddisfazione l'accoppiata Access + OCX Flexgrid (sia
> gerarchiaca che normale). In data 13 febbraio la microsoft ha distribuito
> 2 patch di sicurezza di windows  il cui effetto (non so quanto voluto) è
> disabilitare il supporto, da parte di access per questi 2 ocx. Appare
> proprio un messaggio che indica questo , in fase di design e non ci sono
> registrazioni dell'ocx reinstallazioni di access o viasualbasic 6.0 che
> risolvano il problema. L'unico modo è disinstallare le patch di windows
> (testato sia per vista che per xp).
>
> Volevo sapere se qualcuno del newsgroup ha maggiori informazioni al
> riguardo visto che ho speso un'intera giornata con google ma non ho avuto
> notizie più approfondite in proposito.
>
> Ringrazio anticipatamente
>
> Daniele Fasoli
Ho fatto anche io tutti gli aggiornamenti e l'ocx funziona perfettamente
(ver. 6.1.97.82)...
Il consiglio è quello deregistrare il controllo:
regsvr32 msflxgrd.ocx /u
e poi riregistrarlo:
regsvr32 msflxgrd.ocx
Ciao, Carlo


title: FlexGrid Access E Aggiornamenti Windows

text:
Aggiungo che qui e nel mese di febbraio così si esprime Microsoft:
http://msdn.microsoft.com/en-us/vbrun/ms788708.aspx
Si evince che il controllo è pienamente funzionante oltre che in Vista anche
in Windows Server 2008.
Hai notizie diverse?
Ciao, Carlo


title: FlexGrid Access E Aggiornamenti Windows

text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:gn9o4v$ol1$1...@tdi.cu.mi.it...
>
> "D" <
daniele...@tiscali.it
> ha scritto nel messaggio
> news:ODRll.265552$FR.5...@twister1.libero.it...
>> Buongiorno a tutti
>>    Uso da anni con soddisfazione l'accoppiata Access + OCX Flexgrid (sia
>> gerarchiaca che normale). In data 13 febbraio la microsoft ha distribuito
>> 2 patch di sicurezza di windows  il cui effetto (non so quanto voluto) č
>> disabilitare il supporto, da parte di access per questi 2 ocx. Appare
>> proprio un messaggio che indica questo , in fase di design e non ci sono
>> registrazioni dell'ocx reinstallazioni di access o viasualbasic 6.0 che
>> risolvano il problema. L'unico modo č disinstallare le patch di windows
>> (testato sia per vista che per xp).
>>
>> Volevo sapere se qualcuno del newsgroup ha maggiori informazioni al
>> riguardo visto che ho speso un'intera giornata con google ma non ho avuto
>> notizie piů approfondite in proposito.
>>
>> Ringrazio anticipatamente
>>
>> Daniele Fasoli
>
> Ho fatto anche io tutti gli aggiornamenti e l'ocx funziona perfettamente
> (ver. 6.1.97.82)...
> Il consiglio č quello deregistrare il controllo:
> regsvr32 msflxgrd.ocx /u
> e poi riregistrarlo:
> regsvr32 msflxgrd.ocx
>
> Ciao, Carlo
>Riprovato appena adesso dopo aver letto i tuoi 2 interventi: purtroppo il
>risultato č ancora negativo, solo disintsallando le 2 patch in questione
>gli ocx flexgrid tornano a funzionare con access non so proprio cosa
>pensare. E' appena il caso di dire che le versioni degli ocx in mio
>possesso sono le medesime dei tuoi.
Ciao
Daniele Fasoli


title: FlexGrid Access E Aggiornamenti Windows

text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:gn9oln$p8d$1...@tdi.cu.mi.it...

>Dopo qualche altra ricerca  mi sono convinto che le patch in questione si
>richiamino a questo bollettino di sicurezza
MS 08-070 . Ma in teoria l'effetto di blocco su Access non dovrebbe essere
contemplato. Un vero mistero.
Ciao
Daniele


title: FlexGrid Access E Aggiornamenti Windows

text:
"D" <
daniele...@tiscali.it
> ha scritto nel messaggio
news:Lu2ml.266041$FR.5...@twister1.libero.it...

Aggiornamento delle 02.10 finalmente il problema è risolto: e chiaramente
serve una nuova versione dei controlli flexgrid denominata
6.01.98.13 compatibile con le patch di sicurezza del 13 febbraio.
Le versioni in oggetto sono reperibili al seguente indirizzo:
http://www.microsoft.com/downloads/details.aspx?displaylang=it&FamilyID=e27eebcb-095d-43ec-a19e-4a46e591715c
link alla Knowledge Base
http://www.microsoft.com/downloads/info.aspx?na=49&p=1&SrcDisplayLang=it&SrcCategoryId=&SrcFamilyId=e27eebcb-095d-43ec-a19e-4a46e591715c&u=http%3a%2f%2fsupport.microsoft.com%2f%3fkbid%3d926857
Spero almeno che questo mini calvario sia di aiuto ad altri
Ciao
Daniele


title: FlexGrid Access E Aggiornamenti Windows

text:
"D" <
daniele...@tiscali.it
> ha scritto
cut
> Aggiornamento delle 02.10 finalmente il problema è risolto: e chiaramente
> serve una nuova versione dei controlli flexgrid denominata
> 6.01.98.13 compatibile con le patch di sicurezza del 13 febbraio.
> Le versioni in oggetto sono reperibili al seguente indirizzo:
>
http://www.microsoft.com/downloads/details.aspx?displaylang=it&FamilyID=e27eebcb-095d-43ec-a19e-4a46e591715c
>
> link alla Knowledge Base
>
http://www.microsoft.com/downloads/info.aspx?na=49&p=1&SrcDisplayLang=it&SrcCategoryId=&SrcFamilyId=e27eebcb-095d-43ec-a19e-4a46e591715c&u=http%3a%2f%2fsupport.microsoft.com%2f%3fkbid%3d926857
>
> Spero almeno che questo mini calvario sia di aiuto ad altri
>
> Ciao
>
> Daniele
Certamente utile, ottimo lavoro.
Resta il mistero (forse) del perchè a me funziona.
Ciao, Carlo


title: Problema: installare office 2003 su win 7 64

author: pfm

text:
salve

mi potete dare delle dritte su come installare office 2003 su win 7 64?

pur copiandolo su una cartella ed eseguendolo come amministratore, mi da' errore
(file corrotti)

eppure i file sono gli stessi. se eseguo da un altro pccon win 7 32 puntando alla cartella dove ho i files non ho problemi

Grazie anticipatamente


text:
aggiorno un po' la situazione

leggo che per installarlo e' necessario creare un pacchetto di office 2003 con integrato il SP3

http://www.eng2ita.net/forum/index.php/topic,4996.0.html

purtroppo non so dove scaricare Office Integrator

sapete dove trovare il file?

Grazie


author: scaronic

text:

molto strano ,
nella mia situazione , win7 64 bit , office 2003 installato dal cd , senza utilizzare alcun programma esterno .  Dovresti far girare windows update o simile e l'aggiornamento ad office SP3  si risolve da solo ..
A meno che non sia un office 2003 crackkato


text:
grazie del messaggio

- non e' Office crackato

facendo una virtualizzazione ho provato sia con win7_32 che win7_64
sono riuscito facendo proima un aggiornamento. Non so se e' quello, ma sono riuscito

Grazie


title: #Errore in casella di testo

author: cidi

text:
Ciao a tutti
Anche questo Ng partecipa allo sciopero generale?  :-)
In un controllo di una maschera ho =Nz(DSum("[
QuantitàCarico]";"tblCarico";"IDMateriale=" & [IDMateriale]))
che  all'aggiornamento di IDMateriale mi da il risultato, mentre quando
IDMateriale è vuoto mi da #Errore. Come posso inserire uno "0" al posto
dell'errore?
Grazie e buona giornata
Daniele


title: #Errore in casella di testo

text:
"cidi" <
dadonzin...@tin.it
> ha scritto nel messaggio
news:Ua4mb.342531$R32.11...@news2.tin.it...

IIf iserror(DSum("[QuantitàCarico]";"tblCarico";"IDMateriale=" &
[IDMateriale]);0;(DSum("[ QuantitàCarico]";"tblCarico";"IDMateriale=" &
[IDMateriale]))
Ciao MAssimiliano


title: #Errore in casella di testo

text:
"cidi" <
dadonzin...@tin.it
> ha scritto nel messaggio
news:Ua4mb.342531$R32.11...@news2.tin.it...

Cosa hai messo NZ a fare se non gli passi la condizione alternativa...??
Così non va bene:
Nz(DSum("[QuantitàCarico]";"tblCarico";"IDMateriale=" & [IDMateriale]))
Così va bene:
Nz(DSum("[QuantitàCarico]";"tblCarico";"IDMateriale=" & [IDMateriale]),0)
Ciao.
@Alex.


title: #Errore in casella di testo

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:bnajrs$pom$1...@lacerta.tiscalinet.it...

Grazie Alex
ho messo il tuo suggerimento nell'origine del controllo ma mi da errore di
sintassi nell'espressione ...ah ho messo anche = davanti a Nz
ciao Daniele


title: #Errore in casella di testo

text:
"MA" <
keiko...@libero.it
> ha scritto nel messaggio
news:ej4mb.12716$uv4....@news.edisontel.com...

Grazie Ma
il tuo suggerimento mi da #Nome
ho provato a togliere/mettere virgole, parentesi, triangoli strisce per
terre....... niente da fare :-(
dove sbaglio?
Ciao Daniele


title: #Errore in casella di testo

author: namor

text:
cidi ha scritto:

L'errore è dovuto al fatto che quando IDmateriale è vuoto il criterio
diventa "IDmateriale=" (Idmateriale uguale a "niente") ed è incompleto.
Se ci aggiungi un nz() diventa "IDmateriale=0" ed eviti l'errore.
Ovviamente non dovrai avere in tabella materiali con ID uguale a zero.
=Nz(DSum("[QuantitàCarico]";"tblCarico";
 "IDMateriale=" & nz([IDMateriale])))
Namor
--

questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: #Errore in casella di testo

text:
> cidi ha scritto:
> > Ciao a tutti
> > Anche questo Ng partecipa allo sciopero generale?  :-)
> > In un controllo di una maschera ho =Nz(DSum("[
> > QuantitàCarico]";"tblCarico";"IDMateriale=" & [IDMateriale]))
> > che  all'aggiornamento di IDMateriale mi da il risultato, mentre quando
> > IDMateriale è vuoto mi da #Errore. Come posso inserire uno "0" al posto
> > dell'errore?
> > Grazie e buona giornata
> > Daniele
>
>
> L'errore è dovuto al fatto che quando IDmateriale è vuoto il criterio
> diventa "IDmateriale=" (Idmateriale uguale a "niente") ed è incompleto.
> Se ci aggiungi un nz() diventa "IDmateriale=0" ed eviti l'errore.
> Ovviamente non dovrai avere in tabella materiali con ID uguale a zero.
>
> =Nz(DSum("[QuantitàCarico]";"tblCarico";
>  "IDMateriale=" & nz([IDMateriale])))
>
> Namor
Bravo Namor.
MAssimiliano


title: #Errore in casella di testo

text:
cidi ha scritto:


Mancano le parentesi dell'iif.
Ma ti consiglio l'altro mio suggerimento, è più semplice e non deve
calcolare due Dsum(), quindi è anche più veloce.



title: #Errore in casella di testo

text:
MA ha scritto:
[cut]
> > L'errore è dovuto al fatto che quando IDmateriale è vuoto il criterio
> > diventa "IDmateriale=" (Idmateriale uguale a "niente") ed è incompleto.
> > Se ci aggiungi un nz() diventa "IDmateriale=0" ed eviti l'errore.
> > Ovviamente non dovrai avere in tabella materiali con ID uguale a zero.
> >
> > =Nz(DSum("[QuantitàCarico]";"tblCarico";
> >  "IDMateriale=" & nz([IDMateriale])))
> >
> > Namor
> Bravo Namor.
> MAssimiliano
(petro)JOLLY???  :-)))



title: #Errore in casella di testo

text:
"MA" <
keiko...@libero.it
> ha scritto nel messaggio
news:IW4mb.12728$uv4....@news.edisontel.com...

Grazie Namor
ma con questa riga:
=Nz(DSum("[QuantitàCarico]";"tblCarico";"IDMateriale=" & nz([IDMateriale]))
non è cambiato niente ... ricevo sempre #Errore quando IDMateriale è vuoto.
in tabella non ci sono materiali con id = 0
Ciao Daniele


title: #Errore in casella di testo

text:
"namor" <
do...@spam.me
> ha scritto nel messaggio
news:bnam7l$vol$1...@news.newsland.it...
> MA ha scritto:
>
> [cut]
>
> > > L'errore è dovuto al fatto che quando IDmateriale è vuoto il criterio
> > > diventa "IDmateriale=" (Idmateriale uguale a "niente") ed è
incompleto.
> > > Se ci aggiungi un nz() diventa "IDmateriale=0" ed eviti l'errore.
> > > Ovviamente non dovrai avere in tabella materiali con ID uguale a zero.
> > >
> > > =Nz(DSum("[QuantitàCarico]";"tblCarico";
> > >  "IDMateriale=" & nz([IDMateriale])))
> > >
> > > Namor
>
>
> > Bravo Namor.
> > MAssimiliano
>
>
> (petro)JOLLY???  :-)))
> Namor
>
>
Prima risolvi ......poi (PetroJolly) :-)))
Daniele


title: #Errore in casella di testo

text:
cidi ha scritto:


> > Bravo Namor.
> > MAssimiliano

Oh, ma le volete mettere 'ste parentesi? Tre aperte e due chiuse non va
bene!
La formula mi sembra giusta. IDmateriale è numerico, no?
[QuantitàCarico] non è che ce l'hai senza accento in tabella?
