title: xgeronimo

author: tommy

text:
> Private Declare Function MCISendString Lib "winmm.dll" _
> Alias "mciSendStringA" (ByVal lpstrCommand As String, _
> ByVal lpstrReturnString As String, _
> ByVal uReturnLength As Long, _
> ByVal hwndCallback As Long) As Long
>
> Private Declare Function DeviceIoControl Lib "kernel32" _
> (ByVal hDevice As Long, ByVal dwIoControlCode As Long, lpInBuffer _
> As Any, ByVal nInBufferSize As Long, lpOutBuffer As Any, ByVal _
> nOutBufferSize As Long, lpBytesReturned As Long, _
> ByVal lpOverlapped As Long) As Long
>
> č un po' dura da spiegare...
>
>
Ma dove devo mettere questo codice?
sulla rotun evento del pulsante cosa devo scrivere?
ciao e grazie


title: xgeronimo

author: Carlo Costarella

text:
"tommy" <
sime...@tin.it
> ha scritto nel messaggio
news:9WXeb.155435$hE5.5...@news1.tin.it...
> > Private Declare Function MCISendString Lib "winmm.dll" _
> > Alias "mciSendStringA" (ByVal lpstrCommand As String, _
> > ByVal lpstrReturnString As String, _
> > ByVal uReturnLength As Long, _
> > ByVal hwndCallback As Long) As Long
> >
> > Private Declare Function DeviceIoControl Lib "kernel32" _
> > (ByVal hDevice As Long, ByVal dwIoControlCode As Long, lpInBuffer _
> > As Any, ByVal nInBufferSize As Long, lpOutBuffer As Any, ByVal _
> > nOutBufferSize As Long, lpBytesReturned As Long, _
> > ByVal lpOverlapped As Long) As Long
> >
> > è un po' dura da spiegare...
> >
> >
> Ma dove devo mettere questo codice?
> sulla rotun evento del pulsante cosa devo scrivere?
> ciao e grazie
>
>
>
Nella sezione dichiarazioni di un modulo, subito dopo
Option Compare Database
Option Explicit
Si tratta di dichiarazioni che nell'esempio sono private ma che possono
diventare pubbliche (cioeè valide per tutto il db) semplicemente inserendole
in un modulo pubblico e cambiando la parolina "Private" in "Public".
Con il pulsante di comando non hanno nulla a che fare nel senso che se sono
pubbliche verranno caricate all'apertura del db e se sono private (per
esempio nel modulo di una maschera) verranno caricate all'apertura della
maschera.
In generale quando si copia una porzione di codice è bene informarsi su
quello che fà e a cosa serve.
Ciao, Carlo


title: Dati doppi

author: Gabriele Preatoni

text:
E' possibile evitare di immettere dati doppi in una tabella senza essere
costretto a creare una chiave primaria multipla n(6 campi ) nel mio caso.
Grazie


title: Dati doppi

author: Antonio Biso

text:
"Gabriele Preatoni" <
gabriele...@inwind.it
> ha scritto nel messaggio
news:h_8y9.122255$RO.31...@twister1.libero.it...
> E' possibile evitare di immettere dati doppi in una tabella senza essere
> costretto a creare una chiave primaria multipla n(6 campi ) nel mio caso.
Cioè non vuoi che vengano inseriti record che abbiano nei famosi 6 campi la
stessa combinazione di valori?
E perchè non dovresti usare le chiavi multiple, che è la soiluzione più
ovvia, immediata e corretta?
Altrimenti da codice, prima di salvare il nuovo record, devi testare il
valore di una dlookup sulla tabella con un criterio tipo
"[campo1] = '" & controllo1 & "' AND.... AND [campo6] = '" & controllo6 &
"'"
Se il risultato è null non c'è un record duplicato
Antonio


title: Stampare un report senza preview e' possibile?

author: Linux

text:
La stampa viene richiamata da un bottone di comando presente in una
maschera, e' possibile stampare il report senza che venga stampata anche la
maschera?


author: Fabio

text:
"Linux" <
li...@fol.it
> ha scritto nel messaggio
news:ajafei$msc$1...@newsreader.mailgate.org...

Nell'oggetto e nel testo hai scritto due cose un po' diverse:
Per quanto riguarda la stampa diretta senza anteprima basta modificare
l'evente SuClick del pulsante di comando togliendo il paramentro
acViewPreview (di default quindi stampa il report direttamente) dal comando
OpenReport
Per quanto riguarda la stampa della maschera non so cosa intendi perchè o
nella routine evento viene stampata anche la maschera o c'è qualcosa che non
mi torna...
Ciao, FABIO


title: Funzione di ricerca

author: antbac

text:
Una domanda da niubbo: mi costruisco una tabella con tre semplici campi:
Data/Via/Atti, una maschera d'inserimento.....ma come si fa a crearne una di
ricerca? O ancora meglio un'unica d'inserimento e ricerca?
Grazie 1001!


title: Funzione di ricerca

author: Roberto dal portatile

text:
"antbac" <
ant...@alice.it
> ha scritto nel messaggio
news:45e05cc5$0$37204$4faf...@reader3.news.tin.it...
> Una domanda da niubbo: mi costruisco una tabella con tre semplici campi:
> Data/Via/Atti, una maschera d'inserimento.....ma come si fa a crearne una
> di ricerca? O ancora meglio un'unica d'inserimento e ricerca?
Se vai nella Sezione Forms del Sito Comune (link qui sotto) ci troverai più
di una FAQ che indica come sia possibile filtrare una maschera attraverso
un'altra maschera; tra le altre esiste una mia FAQ intitolata "3.70 Maschera
universale per cercare, filtrare, ordinare o incollare dati in un'altra
qualsiasi maschera" che illustra una maschera universale che permette di
effettuare ricerche in una qualsiasi maschera nata invece solo per inserire
dati.
>
> Grazie 1001!
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: Incrociare campi senza query 2

author: Gianluca

text:
Chiedo scusa ma essendo offline devo scrivere un messaggio fuori thread.
Dunque Sib, mi sono espresso male (specialmente per l'oggetto, intendevo
'Incrociare campi senza usare una query a campi incrociati'!), e me ne
scuso.
Ora vado a dettagliare meglio le cose. Gli assunti sono:
- tblA, tabella, contiene date per appuntamenti pianificati con il Cliente;
è presente, per ogni record, un campo booleano che si chiama 'Svolta';
- mskA, maschera, serve a inserire gli appuntamenti in tblA;
- tblB, tabella, contiene gli appuntamenti con le date in cui effettivamente
il cliente è stato incontrato;
- mskB, maschera, serve a inserire i dati in tblB;
- non sempre la data pianificata in tblA è rispettata (e questo significa
che a volte il Cliente viene incontrato in una data differente da quella
pianificata);
Obiettivi:
- al momento dell'inserimento delle date di effettivo incontro col Cliente,
tramite mskB, vorrei fare in modo che A97 vada a verificare se la data
imputata è presente in tblA;
- se è presente, deve impostare 'Svolta' a Si (-1);
Semplice no? Talmente semplice che sono due giorni che faccio tentativi a
vuoto...


title: Incrociare campi senza query 2

author: Roberto-Angelo azzurro

text:
"Gianluca" <
NO_SPAM_v...@wappi.com
> ha scritto nel messaggio
news:n91o8.74794$%g7.24...@twister2.libero.it...

Non mi è molto chiaro!
xchè non fai una tabella clienti a cui colleghi una sola tabella degli
orari?


title: Incrociare campi senza query 2

author: Roberto da casa

text:
"Gianluca" <
NO_SPAM_v...@wappi.com
> ha scritto nel messaggio
news:n91o8.74794$%g7.24...@twister2.libero.it...

Forse non ho capito un tubo di cosa ti serve, ma invece di creare e gestire
una tblB non ti conviene aggiungere un campo Data/ora alla tblA in cui
digiti la data e l'ora effettiva dell'appuntamento?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: sostituzione di un carattere all'interno di un campo

author: Maurizio

text:
salve a tutti
devo esportare dei dati in formato testo. Ho un campo descrittivo di
tipo testo: vorrei creare una funzione per sostituire il carattere "à"
con "a'". In pratica quando trovo una "a" con l'accento la sostituisco
con una "a" con apostrofo
grazie a tutti
Maurizio


author: Sergio MAZZA

text:
"Maurizio" <
consu...@open.it
> ha scritto nel messaggio
news:1183725903....@n60g2000hse.googlegroups.com...

grazie a tutti
Maurizio
[risposta]
Crea una query e ci inserisci un campo calcolato con questa funzione:
nuovoCampoDescrittivo: replace([campoDescrittivo];"à";"a'")
Ciao.
--
Sergio MAZZA


title: memorizzare i dati di una listbox multiselect

author: Alessandro

text:
Ho una tabella T con 3 campi (C1,C2,C3) e la relativa maschera.
Ciascun campo preleva dati da una tabella diversa.
Ora, nella maschera io scelgo UN valore per C1 e UN valore per C2,
utilizzando una combo box. Fin qui tutto ok
Per C3 voglio che ci sia la possibilità di scegliere più opzioni, quindi
utilizzo una listbox con multiselect impostato a 1.
Il problema è che non riesco a memrizzare questi dati in tabella.
Se nella maschera, io scelgo, ad esempio
C1: x
C2: y
C3: a,d,f,g
Quello che vorrei ottenere nella tabella T è questo:
C1    C2    C3
x        y        a
x        y        d
x        y        f
x        y        g
Invece quello che ottengo è un solo record con C!1=x, C2=y e C3=null
Come risolvo il problema?
Grazie
--
***Alessandro***


author: Roberto Pasqualini

text:
On Thu, 18 Jul 2002 23:51:12 GMT, "Alessandro" <
al...@softhome.net
>
wrote:

Devi creare un pezzo di codice che iteri sugli elementi selezionati
della list-box e che utilizzando un recordset aggiunga i record.
Utilizza la proprietà SelectedItems della list box per scorrere
l'insieme degli elementi selezionati.
Roberto Pasqualini


text:
"Alessandro" <
al...@softhome.net
> ha scritto nel messaggio
news:QvIZ8.3579$GV2....@twister2.libero.it...
> Ho una tabella T con 3 campi (C1,C2,C3) e la relativa maschera.
Nella maschera ci sono 3 controlli
> Ciascun campo preleva dati da una tabella diversa.
Ciascun controllo...
> Ora, nella maschera io scelgo UN valore per C1 e UN valore per C2,
> utilizzando una combo box. Fin qui tutto ok
> Per C3 voglio che ci sia la possibilità di scegliere più opzioni, quindi
> utilizzo una listbox con multiselect impostato a 1.
> Il problema è che non riesco a memrizzare questi dati in tabella.
> Se nella maschera, io scelgo, ad esempio
>
> C1: x
> C2: y
> C3: a,d,f,g
>
> Quello che vorrei ottenere nella tabella T è questo:
>
> C1    C2    C3
> x        y        a
> x        y        d
> x        y        f
> x        y        g
>
> Invece quello che ottengo è un solo record con C!1=x, C2=y e C3=null
>
> Come risolvo il problema?
Non puoi usare una maschera associata alla tabella per fare questa cosa,
visto che in quella maniera i controlli sono associati ai campi di un
singolo record.
Quello che vuoi fare tu lo puoi fare via codice.
A grandi linee quello che devi fare tu è:
utilizzare un recordset aperto sulla tabella dove vuoi aggiungere i record.
Fare un ciclo sulle righe della listbox
Per ogni riga selezionata fare un addnew sul recordset con i valori comuni e
il valore della riga corrente
Fine
Il tutto associato al clic di qualche pulsante.
Antonio


text:
"Alessandro" <
al...@softhome.net
> ha scritto nel messaggio
news:QvIZ8.3579$GV2....@twister2.libero.it...

Vai sul Sito Comune (link qui sotto), Sezione Reports; prova a leggere la
FAQ "Come si può filtrare un report in base alla selezione multipla
effettuata su una casella di riepilogo?".
Naturalmente tu, anziché un report, filtrerai una maschera (DoCmd.OpenForm
invece di DoCmd.OpenReport).
Oppure userai strCriteri per impostare la proprietà Filter della tua
maschera, quindi imposterai la proprietà FilterOn.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
Grazie a tutti per le risposte.
Ho capito il concetto, solo che, non avendelo mai fatto, non so come si
effettua una conessione al database (se è necessaria).
Qualcuno mi può dire il codice per farlo?
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:RXQZ8.4320$s74....@twister1.libero.it...



text:
"Alessandro" <
al...@softhome.net
> ha scritto nel messaggio
news:fh%Z8.7105$GV2.1...@twister2.libero.it...
> Grazie a tutti per le risposte.
> Ho capito il concetto, solo che, non avendelo mai fatto, non so come si
> effettua una conessione al database (se è necessaria).
> Qualcuno mi può dire il codice per farlo?
>
[CUT]
Quando rispondi ad un messaggio, rispondi dopo e non prima del testo dei
messaggi precedenti.
Comunque non riesco a capire cosa vuoi dire; cosa intendi per "come si
effettua una conessione al database" ??



text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:_pA_8.12066$GV2.3...@twister2.libero.it...
>
> Comunque non riesco a capire cosa vuoi dire; cosa intendi per "come si
> effettua una conessione al database" ??
>
> --
> Roberto
Se voglio aggiungere record ad una tabella tramite codice visual basic, se
non sbaglio è necessario usare l'oggetto recordset, ma prima di far questo
si deve accedere al database. Io lo so fare in ASP, con Vbscrip, ma non  so
se qui è la stessa cosa.
In asp farei:
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "driver={Microsoft Access Driver
(*.mdb)};dbq="&Server.MapPath("C:/blablabla")
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "news", conn, 3, 3
rs.addnew
rs("campo1")="tizio"
rs("campo2")="caio"
rs.update
rs.close
conn.close
spero di essermi spiegato...


text:
"Alessandro" <
al...@softhome.net
> ha scritto nel messaggio
news:DrI_8.13905$s74.3...@twister1.libero.it...
>
> "Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
> news:_pA_8.12066$GV2.3...@twister2.libero.it...
>
> >
> > Comunque non riesco a capire cosa vuoi dire; cosa intendi per "come si
> > effettua una conessione al database" ??
> >
> > --
> > Roberto
>
> Se voglio aggiungere record ad una tabella tramite codice visual basic, se
> non sbaglio č necessario usare l'oggetto recordset, ma prima di far questo
> si deve accedere al database. Io lo so fare in ASP, con Vbscrip, ma non
so
> se qui č la stessa cosa.
> In asp farei:
>
> Set conn = Server.CreateObject("ADODB.Connection")
> conn.open "driver={Microsoft Access Driver
> (*.mdb)};dbq="&Server.MapPath("C:/blablabla")
> Set rs = Server.CreateObject("ADODB.Recordset")
> rs.Open "news", conn, 3, 3
> rs.addnew
> rs("campo1")="tizio"
> rs("campo2")="caio"
> rs.update
> rs.close
> conn.close
>
> spero di essermi spiegato...
Se, come sembra, usi ADO, va bene cosě.



text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:75P_8.14201$s74.4...@twister1.libero.it...
> Se, come sembra, usi ADO, va bene cosě.
>
> --
> Roberto
>
Cosě com'č non funziona. penso che si debba includere la libreria ADODB nel
codice. Come si fa?


text:
"Alessandro" <
al...@softhome.net
> ha scritto nel messaggio
news:4X1%8.19159$GV2.4...@twister2.libero.it...

Per aggiungere la libreria DAO ai riferimenti del tuo database, apri un
modulo qualsiasi (volendo anche di classe) del tuo database, dal menu
Strumenti seleziona Riferimenti...; dalla finestra di dialogo attiva con uno
"svirgolino" la libreria DAO e posiziona tale riferimento prima dei
riferimenti alla libreria ADO.



text:
[CUT]
Non l'hai mai detto, ma do per scontato che usi A2000 o A2002.



title: Problema con l'apostrofo

author: Carlo

text:
Quando inserisco un record contenente un'apostrofo, tutto funziona
correttamente e quando eseguo una query che mi elenca i record non ci
sono problemi.
Se invece cerco quei particolari record con l'apostrofo selezionandoli
da una combobox mi appare una finestra con scritto:
Errore di run-time 3077
Errore di sintassi (operatore mancante) nell'espressione.
e ovviamente non mi carica i dati relativi al record che volevo
visionare. Per i record senza apostrofo invece, tutto funziona
correttamente.
Come posso superare questo ostacolo?


title: Problema con l'apostrofo

author: Paolo Beltrame

text:
Ciao Carlo,
> Quando inserisco ...
>Per i record senza apostrofo invece, tutto funziona
> correttamente.
> Come posso superare questo ostacolo?
E' tutto spiegato in "Virgolette nelle stringhe" sull'help in linea.
    Paolo


title: Problema con l'apostrofo

author: CarloCos

text:
"Carlo" <
cca...@usa.net
> ha scritto nel messaggio
news:390429f...@news.net-one.it...
> Quando inserisco un record contenente un'apostrofo, tutto funziona
> correttamente e quando eseguo una query che mi elenca i record non ci
> sono problemi.
> Se invece cerco quei particolari record con l'apostrofo selezionandoli
> da una combobox mi appare una finestra con scritto:
> Errore di run-time 3077
> Errore di sintassi (operatore mancante) nell'espressione.
> e ovviamente non mi carica i dati relativi al record che volevo
> visionare. Per i record senza apostrofo invece, tutto funziona
> correttamente.
> Come posso superare questo ostacolo?
Ho provato e riprovato a simulare l'errore ma non ci sono riuscito. Forse
non ho capito bene.
Se da una CBox cerco "L'Ape Regina" e cerco il record corrispondente nella
maschera, nessun errore. Se filtro la maschera con una query che abbia lo
stesso criterio: nessun problema.
Allora?
Forse ti riferisci al filtro applicato via codice? Se è così va bene la
risposta di Beltrame.
Ciao, Carlo


title: Problema con l'apostrofo

author: Ricky

text:
"Carlo" <
cca...@usa.net
> wrote in message
news:390429f...@news.net-one.it...
> Quando inserisco un record contenente un'apostrofo, tutto funziona
> correttamente e quando eseguo una query che mi elenca i record non ci
> sono problemi.
> Se invece cerco quei particolari record con l'apostrofo selezionandoli
> da una combobox mi appare una finestra con scritto:
> Errore di run-time 3077
> Errore di sintassi (operatore mancante) nell'espressione.
> e ovviamente non mi carica i dati relativi al record che volevo
> visionare. Per i record senza apostrofo invece, tutto funziona
> correttamente.
> Come posso superare questo ostacolo?
se c'e' un apostrofo basta che ne metti un altro.
Proprio cosi', basta raddoppiarlo.
Ti posto una function che a suo tempo mi hanno postato quando ho avuto il
tuo stesso problema, gli passi quello che vuoi cercare e lei te lo ritorna
corretto in modo tale che la ricerca SQL non dia problemi.
Spero di esserti stato utile, Ciao da Ricky
Function TrdApo(X As String) As String
'Toglie apostrofo per ricerca S.Q.L.
Dim N As Integer, StrA As String
X = Trim(X)
For N = 1 To Len(X)
 If Mid(X, N, 1) = "'" Then                'Attenzione qui " ' "
  StrA = StrA + "''"                         '                      " ' ' "
 Else
  StrA = StrA + Mid(X, N, 1)
 End If
Next N
TrdApo = StrA
End Function


title: Modifica/sostituisci

text:
Ciao a tutti :)
Ho una tabella con 350.000 record. Su uno dei campi di questa tabella
devo fare 10.000 modifiche (che ho già sul file di excel), del tipo
com'è ora        |      come deve diventare
1234a             |      pippo
tre43              |      pluto
72jd8             |      @dhj8
C'è un automatismo?  Vorrei evitare di fare trova e sostituisci x
10.000 volte....
Pensavo ad una query di aggiornamento, ma, se non sbaglio, posso farlo
con un solo criterio
Sapete aiutarmi?


title: Modifica/sostituisci

author: max

text:
<
moni...@gmail.com
> ha scritto nel messaggio
news:57f9b762-bac8-42eb...@o36g2000yqh.googlegroups.com...
Ciao a tutti :)




Sapete aiutarmi?
hai già in Excel vuol dire che hai le due colonne una a fianco all'altra?
se si importati questo file avrai due campi, fai una query in cui hai un
join tra il campo ke devi cambiare e quello comera di excel metti nella
colonna della tua tabella metti come aggiorna a
nometabellainportatadaexcel.campomoedeveessere.
ciao
max


title: Modifica/sostituisci

text:
On 25 Mar, 14:43, "max" <
pi...@pippo.it
> wrote:
> <
monic...@gmail.com
> ha scritto nel messaggionews:57f9b762-bac8-42eb...@o36g2000yqh.googlegroups.com...

PERFETTO!!!!
Grazie mille Max!


title: Recupero Database

author: Emy

text:
Aiuto ragazzi chi puo risolvere questo dramma? Ho fatto un piccolo archivio
di dati e poi ho trasformato il file MDB in MDE purtroppo ho perso il file
nativo in MDB c'è un metodo per recuperare tutto il file dal MDE che ho
ancora? Attendo con ansia il vostro aiuto.
Ciao a tutti
Emy
Mantova.
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Recupero Database

author: sv

text:
Emy ha scritto:


Vedi
http://www.donkarl.com/it/
FAQ 1.26
--
sv
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: aprire html e posizionarsi su ancora

text:
qualcuno è riuscito ad aprire un html da access per poi posizionarsi ad una
certa ancora all'interno dell'html?
io utilizzo la funzione execbrowser per aprire la pagina cosi definita
'apre il browser alla pagina internet specificata
Public Sub ExecBrowser(strURL$)
Dim lVal As Integer
lVal = ShellExecute(1, "open", strURL, "", "", 1)
End Sub
Ma non saprei come posizionarmi ad un ancoraggio, qualcuno lo sa?


title: aprire html e posizionarsi su ancora

author: PBsoft

text:
> qualcuno è riuscito ad aprire un html da access per poi posizionarsi
> ad una certa ancora all'interno dell'html?
Devi sfruttare pienamente la sintassi degli URL.
> io utilizzo la funzione execbrowser per aprire la pagina cosi definita
> 'apre il browser alla pagina internet specificata
> Public Sub ExecBrowser(strURL$)
> Dim lVal As Integer
> lVal = ShellExecute(1, "open", strURL, "", "", 1)
> End Sub
> Ma non saprei come posizionarmi ad un ancoraggio, qualcuno lo sa?
Devi fare attenzione che la variabile strURL includa anche la specifica per
l'anchor. Deve essere somigliante alla seguente:
http://www.pbsoft.it/default.asp#nomeriferimento
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution


title: Come avere informazioni su una immagine da VBA?

author: jobxxyy

text:
Salve a tutti,
avendo un certo percorso, a cui ovviamente corrisponde una immagine,
vorrei arrivare a sapere le sue dimensioni (larghezza, altezza )
Sapete da dove cominciare?!


text:

in pratica dovrei riuscire ad avere 4 valori:
-larghezza in pixel
-altezza in pixel
-risoluzione orizzontale (in dpi)
-risoluzione verticale (in dpi)


author: Lorenzo(pyx)

text:
In news:47eb8401$0$5933$
5fc...@news.tiscali.it
,
jobxxyy <
m_piccTOG...@hotmail.com
> ha scritto:

Ciao,
Tralasciando soluzioni che coinvolgano ocx o comunque
componenti esterni, i file immagine sono dei file binari
che oltre all'immagine di per se contiene anche le informazioni
di come e' composta.
Qui trovi alcune specifiche
http://www.wotsit.org/list.asp?fc=1
Di fatto devi aprire il file in modalità binaria da vba ed estrarti
le informazioni che ti servono.
Non e' proprio immediato, ma altro non mi viene in mente ora.
--
Lorenzo


title: Query a campi incrociati

author: Logo

text:
Chiedo l'help!
Ho scritto una query a campi incrociati via VBA (la query funziona), ma
quando provo ad aprire il report col "DoCmd.OpenReport ..." al quale ho
(sempre via VBA) impostato la proprietą RecordSource = a questa query mi
compare il messaggio "Impossibile usare il campo incrociato di una colonna
non fissa come sottoquery". Notare che se salvo la query e imposto la
proprietą RecordSource alla query salvata funziona tutto.
C'č qualche anima buona che puņ dirmi dove sbaglio?
Grazie
Daniele


title: Query a campi incrociati

author: Maurizio Borrelli

text:
> "Logo" <
olor...@tin.it
> ha scritto nel messaggio
> news:MJxU9.10706$%p6.8...@news.edisontel.com...

    Non sbagli. ;-) Semplicemente non fai cio' che il messaggio ti invita a
fare...
        . apri la query in struttura;
        . visualizza le Proprieta' della query;
        . seleziona la proprieta' "Intestazioni colonne";
        . premi F1.
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


title: Query a campi incrociati

text:
MITICO !!!
Non so cosa dire, basta un GRAZIE !!!
Ciao
Daniele
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:avuala$jbe9e$1...@ID-52090.news.dfncis.de...



title: auguri

author: vincenzo barletta

text:
auguri anche da parte mia al fantastico Roberto
--------------------------------
Inviato via
http://usenet.iol.it


title: auguri

author: Roberto da casa

text:
"vincenzo barletta" <
vincen...@ionwind.it
> ha scritto nel messaggio
news:62Z98Z142Z207Y1...@usenet.iol.it...
> auguri anche da parte mia al fantastico Roberto
Grazie!!
Roberto


title: Errore Libreria  Jet and Replication Ob. 2.1

text:
Salve.
Un libro mi indica di istallare questa libreria:
"Microsoft Jet and Replication Objects 2.1 Library"
per connettere il mio DB  con un DB access esterno.
Nel mio sistema operativo Win7 Access 2010,
quando provo a caricarla mi restituisce:
"errore di caricamento DLL"
... sapete a cosa è dovuto?
Ed è indispensabile per fare questa operazione?


text:

...P.s
Infatti l'errore parte sin dalla prima riga di codice
Dim ApriExt As New Connection
New è in azzurro: la riconosce ma poi mi dà
"Utilizzo non valido della parola chiave NEW"
Cominciamo bene....


text:

Peccato che qui non si possano pubblicare screenshot:
Le librerie attualmente caricate sono:

1)Visual basic for application
2)Microsoft Access 14.0 object Library
3)OLE Automation
4)Microsoft ADO Ext. 2.8 for DLL and Security
5)Microsoft Office 14.0 Access database engine Objects  Library
6)Microsoft ActiveX Data Objects 2.1 Library


text:
Puoi spiegare tecnicamente PERCHE' devi usare questa LIB che viene chiamata JRO...?
Che tipo di utilizzo devi fare...?

Di solito si usa per il COMPACT quando si usa ADO in quanto ADO non espone metodi per il Compact...!
Tu con Access usi DAO che è NATIVO, spero per te,... quindi ripeto la domanda...

PERCHE'...?

P.S. dall'elenco delle LIB, dovresti invertire la 4 e la 5... prima ACEDAO, poi ADO...

ADO si può usare, ma se c'è un motivo sensato... e di solito con Access-JET non c'è.

Se hai lato SERVER un RDBMS può servire... ma siccome si usano le LINKED TABLE, via ODBC...

Insomma, c'è qualche nuvola di confusione.

@Alex


text:
Ti sbagli di grosso Alex. Non c'è qualche nuvola di confusione, cammino nella nebbia senza fendinebbia.
Sto provando per la prima volta a collegarmi con db esterno, per necessità. Il libro dalla quale sto prendendo la routine di esempio mi ha indicato la libreria che ho caricato. Ma come al solito non funziona niente, sin dalla prima riga. Io si, solitamente uso Dao. (Anche se anni fa usavo Adodb per aprire recordset... ma poi ho capito che non serviva e son tornato a Dao.) Ora mi serve connettermi ... qual è l'abc?


text:
Si usano le LINKED TABLE...!
Una volta LINKATE le Tabelle, lavori come in locale con DAO.

Per linkare le tabelle puoi vedere questo:
https://www.addintools.com/documents/access/where-is-linked-table-manager.html

P.S. JRO non serve per fare connessioni... eventualmente puoi usare ADO via OLEDB.PROVIDER.

Servirebbe un manualetto per queste cose.

@Alex


text:
Ma io uso già tabelle collegate, praticamente sempre, per poter fare modifiche al Fe senza toccare il be. In questo caso pero vorrei evitare questo sistema in quanto due db sono identici, stesse tabelle, stesso Fe. Quindi andrebbero riscritte tutte le routine in modo da far funzionare tutto coi nuovi nomi.
Anagrafica si chiamerebbe Anagrafica1
Clienti si chiamerebbe Clienti1 etc....
Tu dirai ma a che serve tutto questo?
Il cliente oltre che in ufficio lavora in giro e quindi deve usare lo stesso db. Ma quando torna in ufficio deve aggiornare le tabelle coi nuovi dati da accodare alle tabelle del db in ufficio. Quindi volevo andare a prendere i dati indirizzando ado su un certo percorso. Data source c:\utenti etc.....
Cmq... qual è la soluzione migliore secondo te? Quella più approdabile...


text:
Aspetta no! Ho scritto una grande cazzata. Di quelle che restano per saecula e saeculorum su Google:-)
E' il db principale che le rinomina cosi una volta collegate ma nel db di origine rimangono coi loro nomi !!!....


author: RobertoA

text:

".. e quindi deve usare lo stesso db.."
L'hai detto tu quello che devi fare
Fallo lavorare sui dati che ha in ufficio
Via terminal server e' la via piu' semplice
Tenere dei doppioni e' estremamente complesso
E pure inutile aggiungo io a meno che non ci siano ragioni particolari
per mantenere i due db separati


author: BFS

text:
Il 24/05/2019 14:32,
gabria...@gmail.com
 ha scritto:

mi permetto...
fare il sincro è una gran rogna da gestire e ti consiglio di evitarla se
le tabelle da tenere sincronizzate sono molte

quando il tuo cliente è fuori ufficio, in ufficio usano il db?
se no, potresti fargli copiare l'mdb dei dati dal pc al portalile e
viceversa al ritorno in ufficio. Ci sono programmi free che fanno il sincro.

se invece in ufficio lo usano quando lui è fuori, non fai prima a farlo
lavorare tramite rdp direttamente sulla postazione in ufficio da remoto?

altra soluzione, prendi un pc con 2gb di ram, 30 gb di disco in cloud su
aruba, installi il tuo programma e il cliente lo puo usare da qualsiasi
dispositivo e da qualsiasi parte del mondo sempre in rdp. Hanno piani a
consumo e a costo fisso. Te la cavi con 30 euro al mese per il costo
fisso, meno se non gli serve averlo 24h al giorno acceso

ciao
BFS


text:
Al clouds ci avevo pensato ma non l'ho mai fatto. E poi c'e un prpblema. Lo costringo ad avere una connessione. Se non c'è campo niente.... non si lavora! Improponibile.
Forse dovrei approfondire il concetto di syncro. Che fanno sti programmi, rispetto a ciò che si fa manualmente? Cioe copia e incolla? In ufficio non lavora nessuno. A fine ricezione dei suoi clienti dovrebbe ricordare di fare il back up dei dati sul portatile e viceversa. Che fanno i sincro?


text:
Il 24/05/2019 14:54,
gabria...@gmail.com
 ha scritto:
> Al clouds ci avevo pensato ma non l'ho mai fatto. E poi c'e un prpblema. Lo costringo ad avere una connessione. Se non c'è campo niente.... non si lavora! Improponibile.
> Forse dovrei approfondire il concetto di syncro. Che fanno sti programmi, rispetto a ciò che si fa manualmente? Cioe copia e incolla? In ufficio non lavora nessuno. A fine ricezione dei suoi clienti dovrebbe ricordare di fare il back up dei dati sul portatile e viceversa. Che fanno i sincro?
>

temevo il discorso del "non c'è campo", ho dovuto affrontarlo anche io
per agenti che raccolgono ordini e li devono trasmettere in sede

per il sincro vedi questo, funziona bene ed è free
https://freefilesync.org/

lo imposti che tenga sincronizzata cartella del notebook e quella del pc
che contengono i due BE e con un click il file più recente sovrascrive
l'altro

ciao
BFS


text:

Ho un dubbio...

Oggi(ore 8:00) consegno all'agente il DB di lavoro.
Io oggi, alle ore 10:00, lavoro sulla mia COPIA del BE, quindi i dati di modifica risalgono ad ogig ore 10.

L'agente ci lavora alle 14:00 del pomeriggio, poi domani rientra e diamo il via al FileSync... questo mi sostituisce il BE(dell'agente) in quanto più recente...? (Ovviamente non contiene le mie modifiche)...

Sicuramente questo SW deve essere più intelligente di me... che devo aver frainteso.

@Alex


text:

la mia proposta del programma di sinc si basa su questa affermazione

"In ufficio non lavora nessuno."

altrimenti, casca il palco e il software non va bene

BFS


text:
...
> la mia proposta del programma di sinc si basa su questa affermazione
>
> "In ufficio non lavora nessuno."
>
> altrimenti, casca il palco e il software non va bene
>
> BFS

Cercavo di capire proprio tecnicamente se questo SYNC è "intelligente" o meno... perchè con ACCESS usare la REPLICA, dal 2007 è impossibile... ed anche prima era da evitare..., quindi se fosse stato una cosa tecnicamente più evoluta poteva essere una cosa da considerare.

SQLServer ha il serivzio di gestione REPLICA, che funziona molto bene RMO, ma non è banale e non è FREE... oltretutto in casi di gestione da portatile è indiscutibile la comodità di Access...

Peccato.

@Alex


text:

In questo caso, si porta dietro il FILE... ci lavora e quando torna lo COPIA INCOLLA... senza alcun SW esterno, tanto sa che lui è l'unico ad averci lavorato..., quindi sicuramente è l'ultimo.

Sbaglio qualche cosa..?

@Alex


text:

se si tratta di un file solo, sicuramente basta fare un copia incolla.

ma siccome capita ed è capitato con un cliente che è riuscito a
invertire il copia incolla sovrascrivendo il più recente con il meno
recente avere una semplice icona su cui fare doppio click che faccia da
solo toglie un pensiero. Infatti il programma permette di salvare il
batch di sincro con una pratica icona sul desktop

il programma di sinc torna utile se oltre al db lavoro su altri file
personali che vanno aggiornati una volta in sede

Altra soluzione può realizzare una maschera con due bei pulsanti "copia
archivi da notebook a pc" e "copia archivi da pc a notebook" che faccia
la copia in un vero o in un altro, magari backuppando i due file prima
di ogni movimentazione.

BFS


text:
Non sbagli Alex. L'ho appena chiamato per assicurarmi sul fatto che nessuno usa il pc fisso. Ma è anche vero che non è affatto pratico di pc e per di più sempre  di fretta. Potrebbe capitare qualche intoppo col copia e incolla. La soluzione dei due bottoni sarebbe più adatta. Ma non ho mai smanettato con questo tipo di routine (backup, copia etc)
Una volta provai una routine di backup... e non funzionava.
La pappa pronta in fondo ... è solo una chimera :-)


author: Bruno Campanini

text:

Quasi sempre, sì!
Ma anche se dovessi fare 10 query d'aggiornamento,
una volta testate singolarmente farle partire a
mitragliatrice è solo una goduria.

Prima di lanciare l'update la procedura dovrebbe
eseguire un Compact con codice personalizzato
tale da salvare copia del file compattato con
denominazione contenente data e ora dell'operazione.

Bruno


title: Sapere se il controllo ha una certa proprietà

author: Silvio

text:
Ciao a tutti.
Vorrei ciclare tutti i controlli di una maschera per vedere che "Ordine di
Spostamento" hanno (TabIndex). Uso questo codice:
        For Each Controls In Me
                Debug.Print Controls.Name & " " & Controls.TabIndex
        Next
Ovviamente dà errore (438) sui controlli che non hanno la proprietà TabIndex
(ad esempio le etichette). Vorrei non utilizzare la gestione errori. La
TabIndex ce l'hanno un sacco di tipi di controllo quindi trovo un po'
scomodo utilizzare il ControlType. Non c'è un modo di sapere se un controllo
ha quella proprietà?
Grazie
Ciao
Silvio


author: Carlo Costarella

text:
"Silvio" <
tilvioX...@softhome.net
> ha scritto nel messaggio
news:42a95...@x-privat.org...

Non vedo perchè non utilizzire la proprietà Type o meglio ControlType così:
Dim aa As Control
For Each aa In Me.Controls
                If aa.ControlType <> 100 Then
                Debug.Print aa.Name & " " & aa.TabIndex
                End If
        Next
Ciao, Carlo


author: Alessandro Baraldi

text:
"Silvio" <
tilvioX...@softhome.net
> wrote in message
news:42a95...@x-privat.org

Alternativa al suggerimento di Carlo
è usare la gestione errori.
On Error Goto Err_Check
dim ctl as Acces.Control
For Each ctl In Me
      Debug.Print ctl.Name & " " & ctl.TabIndex
Next
Exit Sub/Function
Err_Check:
   If err.Number=438 then resume next
End Sub/Function
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:

Grazie!!!
In effetti non avevo pensato di usare il ControlType per *escludere* i
controlli che non hanno la TabIndex!
Mi sembra un'ottima idea. Verifico che siano soltanto le etichette
(acLabel=100) a non averla (lo scriverò qui) e uso questa soluzione.
Ancora grazie.
Ciao
Silvio


text:
[cut]
> Alternativa al suggerimento di Carlo
> è usare la gestione errori.
>
> On Error Goto Err_Check
> dim ctl as Acces.Control
> For Each ctl In Me
>      Debug.Print ctl.Name & " " & ctl.TabIndex
> Next
> Exit Sub/Function
>
> Err_Check:
>   If err.Number=438 then resume next
> End Sub/Function
Grazie.
Ci avevo pensato ma visto che la routine è piuttosto complessa, preferirei
non utilizzare la gestione errori. Credo che seguirò il consiglio di Carlo.
Grazie ancora.
Ciao
Silvio


text:

OK, la TabIndex NON si applica a acImage, acLabel, acLine, acPage,
acPageBreak, acRectangle.
Ancora grazie a tutti.
Ciao
Silvio


author: ALESSANDRO Baraldi

text:
[CUT]
> Grazie.
> Ci avevo pensato ma visto che la routine č piuttosto complessa, preferirei
> non utilizzare la gestione errori. Credo che seguirņ il consiglio di
Carlo.
> Grazie ancora.
> Ciao
> Silvio
Volevo segnalarti che la proprietą in questione non si applica a
tutti gli oggetti, ma vedo che ti sei accorto in autonomia.
Personalmente non usare la gestione errori a maggior ragione
in una Routine complessa č un metodo molto discutibile, ma
non voglio insistere.
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


text:
[CUT]
> Personalmente non usare la gestione errori a maggior ragione
> in una Routine complessa è un metodo molto discutibile, ma
> non voglio insistere.
Non so, a me non piace molto...per esempio, io ho un caso del genere:
On Error GoTo Errore
    If MioControllo.TabIndex = 2 Then
         Set ControlloDaOrdinare = MioControllo
    End If
Uscita:
    Exit Sub
Errore:
    If Err.Number = 438 Then
        Resume Next
    Else
        MsgBox Err.Description
        Resume Uscita
    End If
In questo caso, se c'è l'errore, la Resume Next mi rimanda comunque alla
riga
"Set ControlloDaOrdinare = MioControllo"
e non è quello che voglio.
Ovviamente si potrebbe usare qualche trucchetto tipo
    If MioControllo.TabIndex <> 2 Then
        'fai niente
    Else
         Set ControlloDaOrdinare = MioControllo
    End If
...ma non so neanche se funzioni. Oppure con un Resume a un'etichetta di
riga...
Insomma, siccome la routine è già piuttosto complessa...preferisco evitare.
Comunque grazie.
Ciao
Silvio


text:
"Silvio" <
tilvioX...@softhome.net
> ha scritto nel messaggio
news:42a9d...@x-privat.org...

Secondo me ti sbagli.
Fai una prova su quanto hai affermato.
Il Resume Next come dice la parola stessa passa all'istruzione successiva
altrimenti andrebbe in LOOP....!!!!
Ovvio che il Resume Next va usato con criterio e solo quando si ha
la certezza o la possibilità di discriminare un errore(che mi pare il tuo
caso).
In ogni caso a prescindere da questa tua necessità contingente l'uso della
Gestione Errori è fondamentale, supponi di avere un Bugs nella tua Routine
complessa(sappi anche che le Routine complesse si spezzano in routine
semplici
decisamente gestibili con meno problemi) da dove parti per
trovarlo....!!!!!!
Questa è la mia personale opinione di struttura del codice.



title: Oggetto "struttura a schede"

author: Stefano B

text:
Per quanto riguarda l'oggetto "struttura a schede", c'è un evento legato al
cambio della pagina?
Nelle proprietà ne sono elencati 5 (su click, su doppio click ecc.) ma
nessuno che riguardi espressamente il cambio pagina. Eppure sarebbe un
evento importante.
Qualcuno può darmi delle indicazioni?
grazie
Stefano


title: Oggetto "struttura a schede"

author: Alessandro Cara

text:

onChange?
--
Alessandro Cara


title: ACCESS

author: vito

text:
esiste un tutorial in italiano che spiega come usare Acces?
Grazie in anticipo
Ciao


title: ACCESS

author: Roberto in campagna

text:
"vito" <
vitusc...@tin.it
> ha scritto nel messaggio
news:Dxd37.57972$cd.3...@news1.tin.it...
> esiste un tutorial in italiano che spiega come usare Acces?
>
> Grazie in anticipo
>
> Ciao
>
Cosa non ti soddisfa della Guida in linea di Access?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: ACCESS

author: Vito

text:
Nulla  Sinceramente non mi è neanche passato per la testa di guardarla....
adesso ci do un occhiata e poi al massimo richiedo... :-)
CIAO e grazie :-)
"Roberto in campagna" <
r.ma...@libero.it
> ha scritto nel messaggio
news:Hoi37.6519$kf3.2...@news.infostrada.it...



title: ACCESS

author: Antonio Biso

text:
Vito <
v.gimi...@iol.it
> wrote in message
5cA37.72137$cd.4...@news1.tin.it...
> Nulla  Sinceramente non mi č neanche passato per la testa di guardarla....
>
> adesso ci do un occhiata e poi al massimo richiedo... :-)
Magari scrivendo DOPO il quoting!!!
Antonio


title: ACCESS

text:
Vito <
v.gimi...@iol.it
> wrote in message
5cA37.72137$cd.4...@news1.tin.it...
> Nulla  Sinceramente non mi č neanche passato per la testa di guardarla....
>
> adesso ci do un occhiata e poi al massimo richiedo... :-)
Se proprio stiamo tera tera e l'help ti fa paura prova a vedere su
www.manuali.net
  ci dovrebbero essere un paio di tutorial su access
per chi inizia
Carlo Ve


title: ACCESS

text:
Grazie per il consiglio provo a farmi un giro
"Carlo_Ve" <
xp...@libero.it
> ha scritto nel messaggio
news:jbn47.14008$m06.5...@news.infostrada.it...



title: Help su ora legale.

author: Angelo Vannini

text:
Salve a tutti,
il mio problema è come farmi dire dal sistema
operativo (win98), se è attiva o meno l'ora
legale. Ovviamente mi serve all'interno di sub
in visual basic relativa ad una maschera.
Ho cercato qulache chiave nel registro...ma
vattelapesca come si chiama!
Grazie.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Concatenare campi di un risultato della query

author: Nemo

text:
Ho questa necessita:
dalla tabella NOTECARTELLINI estrapolo con una query le varie  righe note
del cartellino:
es di righe:
nrcartellino= 4418      nota= "prove tecniche"
nrcartellino= 4418      nota= "produzione OK"
nrcartellino= 4418      nota= "colore OK"
Il risultato che volevo ottenere era il seguente:
nrcartellino= 4418      sommanote= "prove tecniche - produzione OK - colore
OK"
cioè un'unica riga con tute le note.
Come posso fare??
Grazie a chiunque potrà essermi d'aiuto


author: RoDAgo

text:
"Nemo" scrisse.

Un paio di domandine
Devi utilizzare la query per crearti un report?
Il numero di record con cartellino 4418 è sempre 3 o varia da cartellino a
cartellino?
Cià
RoDAgo


text:
La query serve per aggancio ad un altra tabella/query (dove ci sono tutti i
dati del cartellino)
I record sulla tabella NOTECARTELLINI sono + note per cartellino (da 0 a n)
Grazie
"RoDAgo" <
rodago...@tiscali.it
> ha scritto nel messaggio
news:aqapea$8c3tl$1...@ID-166778.news.dfncis.de...
> "Nemo" scrisse.
>
> > Ho questa necessita:
> > dalla tabella NOTECARTELLINI estrapolo con una query le varie  righe
note----
>...............



author: Roberto da casa

text:
"Nemo" <
pre...@libero.it
> ha scritto nel messaggio
news:aqamp2$4st$1...@geronimo.keycomm.it...

Dai un'occhiata al thread aperto da Axel_4 il 30/10/2002 alle ore 12:38 che
ha per subject "dati in.... riga".
In essa viene discussa la soluzione ad un problema del tutto simile al tuo.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: (OT : aiuto) il pc di casa non funziona piu', o meglio :

text:
riesco a farlo funzionare solo se carico il sistema operativo
(windows 7) in modalita' non normale, ossia ... oddio come si
dice ... argh. Buco di memoria.

Mi pare  "provvisoria"  o  "ridotta". Avete  presente quando
spegnete la macchina in modo irregolare (per es togliendo la
corrente) e allora quando riaccendete il monitor vi dice :

il pc e' stato spento in modo irregolare : volete che si
ristarti normalmente oppure ... e vi espone altre due
modalita' : una che si appoggia al web e l' altra no, ma
comunque in modalita' ridotta ossia vengono caricate solo
il nucleo minimale dell' SO.

Ho  provato anche ad eseguire il rispristino di tutto il
sistema a 3 giorni fa.

Ma niente : continua a non partire correttamente. Quello
che  succede e'  che (ripeto : a meno  che non lo faccia
partire in modalita' provvisoria) ho  davanti lo schermo
con le icone e tutto sembra normale.

E osservo anche che la lucetta del disco rigido e' sempre
accesa, come se il sistema s' alluppasse per leggere qualche
files dal disco.

E se clicco col mouse sull' icona X (excel, word, google
ecc) non si apre nulla.

Inoltre la tastiera e' come se non ci fosse. Non funziona
nemmeno il ctrl-alt-canc per far partire il coso ... come
si chiama ... la gestione dei processi.

Sono anche andato a vedere le impostazioni della ROM, dei
drivers, della RAM (sapete : quando accendete e fate F10 entrate
nella gestione dell' hardware a basso livello) ma sembra tutto a
posto.

Ma che cavolo gli sara' preso a quel catorcio ?

Qualche dritta per uscirne senza portarlo al negozio ? :-)


text:

sicuramente qualche programma all'avvio lo pianta.
avvia in modalita provvisoria
start-->esegui-->msconfig
tab avvio...deseleziona tutto
tab servizi disabilita tutto quello che non è microsoft
riavvia

se si riavvia normalmente puoi provare a rimettere le spunte una alla
volta finchè becchi quella che non lasciava partire il windows

ciao
BFS


text:

Si, penso anch' io

> avvia in modalita provvisoria
> start-->esegui-->msconfig
> tab avvio...deseleziona tutto
> tab servizi disabilita tutto quello che non è microsoft
> riavvia
> se si riavvia normalmente puoi provare a rimettere le spunte una alla
> volta finchè becchi quella che non lasciava partire il windows

Ok, appena a casa provo. Ti ringrazio infinitamente Maestro.
E che Dio me la mandi bona. E magari senza mutande :-)


text:
Il giorno giovedì 16 luglio 2015 14:18:04 UTC+2, BFS ha scritto:

Congratulazioni, Maestro. Ha funzionato. Ancora grazie !


text:

che programma era che bloccava?
che magari torna utile a qualcuno
ciao
BFS


text:

Mica lo so ! E sai perche' ? Perche' prima l' ho tolti tutti e
quindi funzionava.

Poi ho rimesso altra robetta e funzionava ancora.

Poi ho azzardato : rimettemoli tutti e vedemo che succede !
E ha funzionato !

A questo punto l' unica spiegazione e' che smanettando come un
matto con tutti quei maneggi ho in qualche modo "riposizionato"
(diciamo) il file colpevole. E cosi' facendo il sistema l' ha
digerito.

Tra l' altro cosi' facendo mi sono accorto  di una  cosa : che
l' architettura fa VERAMENTE SCHIFO : una miriade di programmi
e programmetti che interagiscono fra di loro e stanno in piedi
per miracolo come un castello di carta.

La bisognerebbe  AZZERARE  tutto  e riscrivere tutto da capo.
Te lo dice questo fesso.


title: MSDE: campi univoci non riconosciuti

author: ciroteo

text:
Finalmente sono riuscito a creare un nuovo utente in msde e testare il login
sql server..
Ho creato un dsn con questo user e pwd e da un normale db access collego le
tabelle via odbc.
(per la cronaca non funziona un bel niente se uso un progetto di database
.adp)
Sembra funzionare, ma mi viene chiesto di indicare quali siano i campi
univoci tabella per tabella ...
come mai avviene ciò? Non dovrebbe bastare indicare nelle tabelle su msde
quali sono i campi chiave?


title: casella di testo ipertestuale

text:
ciao, vorrei usare una casella di testo  come link ipertestuale in modo che
al comparire della "manina" (e click ) possa fargli eseguire un certo
codice. ho cercato tra gli activex offerti da access2000 ma non ho trovato
nulla.
qualcuno mi può dare qualche dritta?
paolo


casella di testo ipertestuale


title: casella di testo ipertestuale

author: MA

text:
"P.Levorato" <
levo...@comune.padova.it
> ha scritto nel messaggio
news:cmuid7$eft$2...@carabinieri.cs.interbusiness.it...

Prendi la tua textbox
nella proprietà collegamento ipertestuale ci metti uno spazio
sull'evento click ci metti la funzione che ti serve.
Nessun activex
MAssimiliano


title: casella di testo ipertestuale

text:
"P.Levorato" <
levo...@comune.padova.it
> wrote in message
news:cmuid1$eft$
1...@carabinieri.cs.interbusiness.it

Non serve nessun ACTIVEX.
Occorre capire se serve realmente una Casella di Testo o se
invece non sia meglio una Label(Etichetta)
Nel caso Label la cosa è estremamente semplice:
Proprietà SubHyperlinkAddress:
Inserisci un carattere Spazio
Quindi nell'Evento Click della Label fai eseguire il Codice
che credi.
Appare la manina senza costi aggiuntivi.
Se invece serve proprio una TextBox allora devi ricorrere alle
API (trovi nel SitoComune un Demo di Roberto) per modificare l'icona
del Mouse su EVento MouseMove della TextBox, quindi devi gestire
sempre l'EVENTO CLICK.
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: query eliminazione con odbc

author: mino

text:
ho un problema che non riesco a risolvere con questa sql
"delete *FROM residui_ante_90_cartelle LEFT JOIN residui_ante_90_righe ON
residui_ante_90_cartelle.IdCartella = residui_ante_90_righe.IdCartella
WHERE (((residui_ante_90_righe.IdCartella) Is Null))"
anzitutto premetto che le 2 tabelle sono tabelle MYSQL collegate tramite
gli odbc. devo eliminare i record della prima tabella che non
corrispondono alla seconda. se dovessi farlo con tabelle access non avrei
problemi mentre invece con questa query non riesco a farlo. mi esce un
errore del motore MYSQL. Devo cambiare qualcosa nella query o non è
possibile eliminare i record in questo modo.
ciao a tutti
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: query eliminazione con odbc

author: HjKlOp

text:
> "delete *FROM residui_ante_90_cartelle LEFT JOIN residui_ante_90_righe ON
> residui_ante_90_cartelle.IdCartella = residui_ante_90_righe.IdCartella
> WHERE (((residui_ante_90_righe.IdCartella) Is Null))"
>
> anzitutto premetto che le 2 tabelle sono tabelle MYSQL collegate tramite
> gli odbc. devo eliminare i record della prima tabella che non
> corrispondono alla seconda. se dovessi farlo con tabelle access non avrei
> problemi mentre invece con questa query non riesco a farlo. mi esce un
> errore del motore MYSQL. Devo cambiare qualcosa nella query o non è
> possibile eliminare i record in questo modo.
dimmi che errore hai, uso mysql...un consiglio...prima di eseguire il codice
tramite
ODBC, testa la query...usa ad esempio mysqlfront che ha un approccio diretto
tramite API, in questo modo sarai sicuro che non hai commesso errori che
potrebbero
essere mascherati da ODBC....


title: query eliminazione con odbc

text:
HjKlOp ha scritto:


ho fatto anche così ma non riuscivo a risolvere il problema.
questo è l'errore ERROR 1064: Errore di sintassi nella query SQL vicino a
'LEFT JOIN residui_ante_90_righe ON residui_ante_90_cartelle.IdCartella =
residui' linea 1"
grazie comunque dell'interessamento se riesci a capire tu o qualunque
altra persona fatemi sapere.
ciao



title: query eliminazione con odbc

author: Brown Jenkin

text:
news...@libero.it
 (mino) wrote in news:bkrpud$dd7$
1...@news.newsland.it
:
> HjKlOp ha scritto:
>
>> > "delete *FROM residui_ante_90_cartelle LEFT JOIN
[cut]
>> dimmi che errore hai, uso mysql...un consiglio...prima di eseguire il
>> codice tramite
>> ODBC, testa la query...usa ad esempio mysqlfront che ha un approccio
>> diretto tramite API, in questo modo sarai sicuro che non hai commesso
>> errori che potrebbero
>> essere mascherati da ODBC....
>
> ho fatto anche cosě ma non riuscivo a risolvere il problema.
Mi sembra che mysql non voglia l'asterisco dopo il comando delete.
Ciao
BJ


title: query eliminazione con odbc

text:
Brown Jenkin ha scritto:
>
news...@libero.it
 (mino) wrote in news:bkrpud$dd7$
1...@news.newsland.it
:
> > HjKlOp ha scritto:
> >
> >> > "delete *FROM residui_ante_90_cartelle LEFT JOIN
> [cut]
> >> dimmi che errore hai, uso mysql...un consiglio...prima di eseguire il
> >> codice tramite
> >> ODBC, testa la query...usa ad esempio mysqlfront che ha un approccio
> >> diretto tramite API, in questo modo sarai sicuro che non hai commesso
> >> errori che potrebbero
> >> essere mascherati da ODBC....
> >
> > ho fatto anche così ma non riuscivo a risolvere il problema.
> Mi sembra che mysql non voglia l'asterisco dopo il comando delete.
> Ciao
> BJ
si è vero infatti l'asterisco non c'è. penso che il problema sia il left
join. ma come posso fare a far girare questa maledetta query?



title: query eliminazione con odbc

text:
> ho fatto anche cosě ma non riuscivo a risolvere il problema.
> questo č l'errore ERROR 1064: Errore di sintassi nella query SQL vicino a
> 'LEFT JOIN residui_ante_90_righe ON residui_ante_90_cartelle.IdCartella =
> residui' linea 1"
Scusa sono tornato solo ora...
come ha ben detto Brown, con mysql usi la sintassi "DELETE FROM table",
ciň che invece forse non hai capito č che quando chiedi a qualcuno aiuto
dovresti
fornire le informazioni dettagliate sull'errore ricevuto dal DB, vedi, nel
tuo caso l'errore
č un errore di sintassi, ma dal primo messaggio non si evince nulla, hai
scritto...
"mi esce un errore del motore MYSQL" (č chiaro che da una analisi piů
attenta della tua query
si capiva chiaramente che in "DELETE *FROM" c'era qualcosa che non andava,
ma non č
questo il metodo migliore per apprendere) questo č il motivo per cui
ti ho chiesto di usare front-end diretti che ritornano esattamente l'errore
che stai commettendo...
la sintassi dell' SQL di mysql č diversa per alcuni aspetti da quella di
Access,  scaricati il manuale
di MySQL (esiste anche in versione help di windows),  prima di chiedere
aiuto all'esterno cerca
di controllare che la sintassi usata sia quella giusta...ne trarrai un
immenso vantaggio in termini di
conoscenza...ciao.


title: query eliminazione con odbc

text:
> si č vero infatti l'asterisco non c'č. penso che il problema sia il left
> join. ma come posso fare a far girare questa maledetta query?
Trova l'ID  e usalo per il DELETE


title: query eliminazione con odbc

text:
"HjKlOp" <
lordl...@yahoo.com
> ha scritto nel messaggio
news:omgcb.112231$hE5.3...@news1.tin.it...
>
> > si č vero infatti l'asterisco non c'č. penso che il problema sia il left
> > join. ma come posso fare a far girare questa maledetta query?
>
Trova l'ID  e usalo per il DELETE
prova cosě..
DELETE *.residui_ante_90_cartelle
FROM residui_ante_90_cartelle, residui_ante_90_righe
WHERE residui_ante_90_cartelle.IdCartella = residui_ante_90_righe.IdCartella
AND (((residui_ante_90_righe.IdCartella) Is Null))


title: query eliminazione con odbc

text:
Scusa ho invertito...nella fretta č chiaramente:
residui_ante_90_cartelle.*


title: query eliminazione con odbc

text:
HjKlOp ha scritto:
> Scusa ho invertito...nella fretta è chiaramente:
> residui_ante_90_cartelle.*
non mirestituisce nessun record anche se non mi da più nessun errore.
se puoi fammi sapere. ciao e per ora grazie



title: query eliminazione con odbc

text:
> non mirestituisce nessun record anche se non mi da più nessun errore.
> se puoi fammi sapere. ciao e per ora grazie
Guarda che la tua è una query di ELIMINAZIONE !!!!
Non hai fatto una SELECT ma un DELETE !!!!


title: query eliminazione con odbc

text:
HjKlOp ha scritto:


si certo ma siccome non mi eliminava nulla ho provato a controllare cosa
selezionava e mi sono accorto che non selezionava nulla. cmq ho risolto or
ora il problema montando la versiona aggiornata del motore mysql 4.0.15.
questa accetta sembra problemi il delete con il left join. ti ringrazio
cmq del tuo interessamento e della tua cortesia. ciao e grazie



title: problema between

author: lolince

text:
Salve ragazzi dovrei creare una tabella usando il between , mi spiego
meglio vorrei in una tabella inzio , vorrei che con una query di
creazione tabella con l'unico criterio between #01/12/2007# and
#18/12/2007# mi creasse in tabella l'elenco date , il problema che in
scrittura mi dice virgola mancante o cose simili ... dove sbaglio?, o
come posso risolvere


title: problema between

author: Alessandro Baraldi

text:

Non ho ben capito... ma non puoi INSERIRE in una tabella le date
comprese... ti tocca scrivere una routine VBA che cicla dalla
DataInizio e con DateAdd si ricava le date succesisve e scrive nella
tabella....!
@Alex


title: problema between

text:

grazie alessandro , ma come posso fare?


title: problema between

text:

La domanda suona come: "Scrivimi il codice..."
Mi sono ripromesso di non scrivere più una sola riga di codice nel NG
quindi ti suggerisco la strada poi tu ci studi sopra...!
Definita la tabella che devi creare a mano... devi popolare il Campo
data con la progressione di 1gg nell'intervallo tra 2 date.
Per aprire la tabella al fine di scriverci hai bisogno di un Recordset
che aprirai usando il metodo OpenRecordset(documentato con esempi
nell'Help) basato sulla Tabella in questione.
Ora dovrai eseguire un Loop che parte dalla DataInizio con la Funzione
DateAdd(anch'essa documentata nell'Help) selezionando i parametri
corretti hai modo di sommare 1gg quindi il Loop continuerà finchè la
data non sarà uguale alla dataFinale.
All'interno del Loop dovrai effettuare l'aggiunta di un record che si
effettua con il metodo AddNew sull'Oggetto Recordset aperto prima,
assegnerai al Campo definito Data il Valore della Data attuale del
Ciclo e salverai con il metodo Update...!
la cosa è chiarissima, ora leggiti l'Help per le cose che non conosci,
prova a scrivere tu il codice e insieme vediamo di correggerlo se non
funziona.
@Alex


title: problema between

text:

> @Alex- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
troppo complicato , vediamo se e piu facile una soluzione di questo
tipo e come poter fare , ho gia una tabella con le date dal 01/12/2007
al 17/12/2007 , l'unico problema nel sistema gia fatto e che mi
possono saltare delle date tipo mi manda la data 16/12/2007 come posso
far fare un confronto logico per farmi dire manca questa data e
aggiungerla poi nella tabella?


title: problema between

text:

INSERT INTO Dateprog (DataIncr)
SELECT cdate(dummy.myAtom)+val(decimale.myatom & decimale_1.myatom)
FROM Dummy, Decimale, Decimale AS Decimale_1
where cdate(dummy.myAtom)+val(decimale.myatom & decimale_1.myatom)
between #15/02/2007# and #15/03/2007# ;
Decimale contiene 10 righe con valore da 0 a 9
Dummy Contiene la data iniziale (1 riga 1 attributo) (*)
In questo modo genera un max di 99 date, joinando decimale per la terza
volta si arriva  a 999 date diverse.
(*) Sta tabella di "servizio" ormai la metto, come il prezzemolo,
dappertutto
--
ac
y-1=x


title: problema between

text:
Alessandro Cara wrote:
P.S. Ho eliminato la "Dummy"
INSERT INTO Dateprog (DataIncr)
SELECT cdate("10/02/2007")+val(decimale.myatom & decimale_1.myatom)
FROM Decimale, Decimale AS Decimale_1
where cdate("10/02/2007")+val(decimale.myatom & decimale_1.myatom)
between #15/02/2007# and #15/03/2007# ;
--
ac
y-1=x


title: problema between

text:
On 17 Dic, 12:27, Alessandro Cara <
alessandro.c...@ay-1asistemi.it
>
wrote:

Ciao alessandro, sto provando a fare quella query di accodamento
indicata da te ma cosa dovrei ottenere?
ho creato la tabella dataprog con campo dataincr ma anche variando le
date non accoda nulla
.help


title: problema between

text:
lolince wrote:
> On 17 Dic, 12:27, Alessandro Cara <
alessandro.c...@ay-1asistemi.it
>
> wrote:
>> Alessandro Cara wrote:
>>
>> P.S. Ho eliminato la "Dummy"
>>
>> INSERT INTO Dateprog (DataIncr)
>> SELECT cdate("10/02/2007")+val(decimale.myatom & decimale_1.myatom)
>> FROM Decimale, Decimale AS Decimale_1
>> where cdate("10/02/2007")+val(decimale.myatom & decimale_1.myatom)
>> between #15/02/2007# and #15/03/2007# ;
>>
>> --
>> ac
>> y-1=x
>
> Ciao alessandro, sto provando a fare quella query di accodamento
> indicata da te ma cosa dovrei ottenere?
con quella trenta righe con le date che vanno dal 15/02 al 15/03 del 2007?
> ho creato la tabella dataprog con campo dataincr ma anche variando le
> date non accoda nulla
Non so cosa tu possa avere fatto.
Hai bisogno della tabelle target (che mi dici di aver fatto)
ed una tabella, che io ho chiamato "decimale, che contenga dieci righe
con valori che vanno da 0 a 9.
Dalla data fissa impostata (in questo caso "15/02/2007") vengono
esaminate 99 date e scritte le righe che rispettano la condizione
--
ac
y-1=x


title: problema between

text:
On 17 Dic, 14:05, Alessandro Cara <
alessandro.c...@ay-1asistemi.it
>
wrote:

> y-1=x- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
uhm , a me non funziona anche seguendo le tue indicazioni , cmq
leggendo cio che fa non è la risposta al mio problema , ma ti
ringrazio lo stesos per l'interessamento.
Sto cercando semplicemente di creare una tabella di date partendo da
un between (esp. 01/12/2007 and 17/12/2007)
ora sto cercando di studiare cio che mi ha detto alex, ma non ci
capisco nulla , per noi inesperti , spesso ci sono problemi immensi su
qualcosa che per chi ne capisci di piu e una cavolata pazzesca.


title: problema between

text:

E di grazia perche' non dovrebbe farlo? Magari dovrai soltanto girare le
date e metterle nel formato americano (mm/dd/yyyy)
i.e.
INSERT INTO Dateprog ( DataIncr )
SELECT cdate("01/01/2007")+val(decimale.myatom & dec1.myatom & dec2.myatom)
FROM Decimale, Decimale AS Dec1, Decimale as dec2
WHERE cdate("01/01/2007")+val(decimale.myatom & dec1.myatom &
dec2.myAtom) Between #12/01/2007# And #12/17/2007#;
Io devo avere un access "abarth".
INSERT INTO Dateprog ( DataIncr )
SELECT cdate("01/01/2007")+val(decimale.myatom & dec1.myatom & dec2.myatom)
FROM Decimale, Decimale AS Dec1, Decimale as dec2
WHERE ((cdate("01/01/2007")+val(decimale.myatom & dec1.myatom &
dec2.myAtom) Between #12/01/2007# And #12/17/2007#)
or  (cdate("01/01/2007")+val(decimale.myatom & dec1.myatom &
dec2.myAtom) Between #11/01/2007# And #11/17/2007#)
or  (cdate("01/01/2007")+val(decimale.myatom & dec1.myatom &
dec2.myAtom) Between #10/01/2007# And #10/17/2007#))
and weekday(cdate("01/01/2007")+val(decimale.myatom & dec1.myatom &
dec2.myAtom))  Between 2 And 6;
  Questa riesce a farmi i primi 17 giorni del mese per Ott. Nov. e Dic.
2007 e mi scarta anche Dom. e Sab.
--
ac
y-1=x


title: problema between

text:
On 17 Dic, 14:45, Alessandro Cara <
alessandro.c...@ay-1asistemi.it
>

come suggerito da alex@ tra leggermi un po' l'ng e l'help mi è uscito
fuori sto codice ma non funziona ancora
Private Sub Comando4_Click()
    Dim DataInizio As Date
    Dim DataFine As Date
    CurrentDb.Execute "DELETE * FROM tabellalData;"
    Dim rs As DAO.Recordset
    Set rs = CurrentDb.Openrecordset("tabellaData", dbopentable)
    DataInizio = CDate(Me.DataDal)
    DataFine = DateAdd("d", 1, CDate(Me.dataAl))
        rs.AddNew
        rs!Data = DataInizio
        rs.Update
        DataInizio = DateAdd("g", 1, DataInizio)
     Loop
End Sub
(nb tutto viene lanciato da una maschera con data inizio (datadal) e
una data fine (dataal) ma mi si blocca lo stesso, e dovrebbe
aggiornare la tabelladata con l'unico campo data.


title: problema between

author: ALESSANDRO Baraldi

text:
come suggerito da alex@ tra leggermi un po' l'ng e l'help mi č uscito
fuori sto codice ma non funziona ancora
cut
(nb tutto viene lanciato da una maschera con data inizio (datadal) e
una data fine (dataal) ma mi si blocca lo stesso, e dovrebbe
aggiornare la tabelladata con l'unico campo data.
Io scriverei cosě:
Private Sub Comando4_Click()
    Dim DataInizio As Date
    Dim DataFine As Date
    CurrentDb.Execute "DELETE * FROM tabellalData;"
    Dim rs As DAO.Recordset
    Set rs = CurrentDb.Openrecordset("tabellaData", dbopentable)
    DataInizio = CDate(Me.DataDal)
    DataFine = CDate(Me.dataAl)
    Do until DataInizio > DataFine
        rs.AddNew
        rs!Data = DataInizio
        rs.Update
        DataInizio = DateAdd("g", 1, DataInizio)
     Loop
End Sub
Come vedi non era poi cosě complicato... ma la pigrizia e la voglia di avere
la pappa pronta
molte volte....
Bravo
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------


title: problema between

text:
On 17 Dic, 18:33, "ALESSANDRO Baraldi" <
ik2...@libero.it
> wrote:
> come suggerito da alex@ tra leggermi un po' l'ng e l'help mi è uscito
> fuori sto codice ma non funziona ancora
>
> cut
>
> (nb tutto viene lanciato da una maschera con data inizio (datadal) e
> una data fine (dataal) ma mi si blocca lo stesso, e dovrebbe
> aggiornare la tabelladata con l'unico campo data.
>
> Io scriverei così:
>
> Private Sub Comando4_Click()
>
>     Dim DataInizio As Date
>     Dim DataFine As Date
>
>     CurrentDb.Execute "DELETE * FROM tabellalData;"
>     Dim rs As DAO.Recordset
>     Set rs = CurrentDb.Openrecordset("tabellaData", dbopentable)
>     DataInizio = CDate(Me.DataDal)
>     DataFine = CDate(Me.dataAl)
>     Do until DataInizio > DataFine
>         rs.AddNew
>         rs!Data = DataInizio
>         rs.Update
>         DataInizio = DateAdd("g", 1, DataInizio)
>      Loop
> End Sub
>
> Come vedi non era poi così complicato... ma la pigrizia e la voglia di avere
> la pappa pronta
> molte volte....
>
> Bravo
> --
> @Alex (Alessandro Baraldi)
> ---------------------------------------------------------------------------
http://www.sitocomune.com/http://www.alessandrobaraldi.it
> ---------------------------------------------------------------------------
Alessandro due cose , prima non funziona lo stesso , secondo non sono
un tipo che vuole la pappa pronta ma un imput per poi partire , ora
detto che sono un mezzo scansa fatiche perche non funziona?


title: problema between

text:

> detto che sono un mezzo scansa fatiche perche non funziona?- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
quando la mando in esecuzione mi dice "Tipo definito dall'utente non
definito" mi si apre il modulo evidenziandomi
la stringa Dim rs As DAO.Recordset


title: problema between

text:
Alessandro due cose , prima non funziona lo stesso , secondo non sono
un tipo che vuole la pappa pronta ma un imput per poi partire , ora
detto che sono un mezzo scansa fatiche perche non funziona?
L'osservazione era generalizzata non sentirti puntato... visto che
all'inizio hai esordito con
"TROPPO COMPLICATA"....
In ogni caso funziona se metti la definizione corretta nella funzione
DateAdd... hai messo "g" che è
in ITALANO e si usa solo nelle QUERY nelle funzioni da VBA si usa la
versione INGLESE "d"
DataInizio = DateAdd("d", 1, DataInizio)
Ciao



title: problema between

text:

no fa la stessa cosa anche con la "d", visto che diventa davvero
complicato? :-)
, cmq apparte gli scherzi non funziona lo stesso eppure il codice che
ho scritto e sattamente come questo postato


title: problema between

text:
no fa la stessa cosa anche con la "d", visto che diventa davvero
complicato? :-)
, cmq apparte gli scherzi non funziona lo stesso eppure il codice che
ho scritto e sattamente come questo postato
Provato da me con una tabella di prova e funziona perfettamente.
Ovviamente da me ho controllato:
RIFERIMENTI DAO
DEFINITO LE VARIABILI DataInizio/DataFine come Date
Non sò che dirti se non di fare il Debug e capire perchè non funziona...!



title: problema between

author: Alessandro Cara

text:

DAO o ADO questo e' il dilemma.
--
ac
y-1=x


title: problema between

text:
On 17 Dic, 19:10, Alessandro Cara <
alessandro.c...@ay-1asistemi.it
>
wrote:

> y-1=x- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
ok , non importa come detto troppo complicato , io pero mi sono
impegnato , grazie ancora


title: problema between

text:
ok , non importa come detto troppo complicato , io pero mi sono
impegnato , grazie ancora
Bene... meno un'altro...!
ACCESS 1
LoLince  0
Speriamo che i futuri programmatori abbiano un pň piů di mordente...
;-)



title: problema between

text:

> impegnato , grazie ancora- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
Ultima curiosita e possibile che mi mandi il tuo database di prova con
i comandi sopra descritti per vedere se da me funziona? magari lo
scarito dal tuo sito , e l'ultima prova che voglio fare , visto che ci
sto sbattendo da stamattina .


title: problema between

text:
> ok , non importa come detto troppo complicato , io pero mi sono
> impegnato , grazie ancora- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
Ultima curiosita e possibile che mi mandi il tuo database di prova con
i comandi sopra descritti per vedere se da me funziona? magari lo
scarito dal tuo sito , e l'ultima prova che voglio fare , visto che ci
sto sbattendo da stamattina .
No lascia stare come hai detto tu non importa....
;-)



title: problema between

text:

ok Grazie lo stesso era solo dopo aver studiato un'intera giornata
capire dove stava l'intoppo , Tengo a precisare che cmq non e discorso
di pappa pronta visto che cmq il lavoro e ricerca svolta è abbastanza
evidente che e stato fatto , era solo per capire il perche a te
funzionava e a me no , tutto qui  .....
Lolince = 0
accesso= 2


title: problema between

author: geppo

text:

Editor VBA vai in menu strumenti>riferimenti vedi se è presente/selezionata
la voce Microsoft DAo 3.6 Object Library.
dai che a sto giro....
Lolince = 1
Access= 2
--
Ciao
Geppo


title: problema between

text:

> Geppo- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
Grazie geppo , nel pc dell'ufficio funziona perfettamente in quello di
casa no , dovro aggiornare forse o mi manchera quella libreria .
Un passo avanti :-)


title: problema between

text:
On 17 Dic, 21:40, "geppo" <c...@tin.it.invalid> wrote:

> Geppo- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
Grazie geppo , in effetti dall'ufficio mi funziona da casa no :-),
dovrò aggiornare ils istema di casa :-) grazie ancora


title: problema between

text:

Ma hai trovato il riferimento su quello di casa?
se la risposta è positiva, prova a spostarlo piu' in alto possibile.
--
Ciao
Geppo


title: problema between

text:
On 17 Dic, 21:40, "geppo" <c...@tin.it.invalid> wrote:

> Geppo- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
Grazie mille geppo , in effetti il problema era quello a casa mancava
invece in ufficio funzionava :-)


title: JOIN troppi record

author: rozilipo

text:
ciao a tutti,
avevo già fatto una cosa del genere ma non ricordo più dove e come.
TABELLE
- prodotti (ID, categoria, nome, etc)
1 record per ogni prodotto
- listini (ID, IDprodotto, qta_minima, prezzo0, prezzo1 etc)
più record per ogni prodotto (a seconda della qta_minima, cambiano i
prezzi), quindi più record
QUERY
SELECT prodotti.ID, prodotti.nome, LISTINI.prezzo0...
FROM prodotti INNER JOIN listini
ON prodotti.Id = listini.IDprodotto
WHERE categoria = ...
Ovviamente mi ritornano più record di ogni prodotto (causa listini).
Praticamente, dovrei ottenere i record WHERE listini.qta_minima è il
valore più alto PER QUEL prodotto (IDprodotto).
Spero di essermi spiegato.


title: JOIN troppi record

text:
"rozilipo" <
r.zi...@cleverinteractive.it
> ha scritto nel messaggio
news:MPG.183c49e11...@news.tin.it...

Non sono proprio sicuro di aver capito ciò che ti serve, ma se vuoi
visualizzare tutti i prodotti con a fianco, per ognuno, il valore massimo
contenuto nel campo qta_minima  ed il relativo valore contenuto nel campo
prezzo0, prova con una query che abbia il seguente codice SQL:
SELECT prodotti.ID, prodotti.nome, Val(DMax("qta_minima", "listini",
"IDProdotto=" & [ID])) AS QMinima, CCur(DLookUp("prezzo0", "listini",
"IDProdotto=" & [ID] & " And qta_minima=" & [QMinima])) AS Prezzo
FROM prodotti;
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: report - gruppo di opzioni

author: ^luigi^

text:
in una maschera ho un gruppo di opzioni  che mi memorizza nel campo "tipo"
i valori 1, 2, 3  e che corrispondono a:
1 = pingo
2 = pongo
3 = pallino
adesso, in un report voglio fare la lista del campo "tipo" che,
normalmente mi esce una colonna :
1
2
3
1
2
1
1
ecc.
io vorrei che la colonna fosse:
pingo
pongo
pallino
pingo
pongo
pingo
pingo
ecc
come converto nel report i numeri del campo "tipo" nei corrispondenti
valori descrittivi?
l.
grazie!
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: report - gruppo di opzioni

author: Karl Donaubauer

text:

Come origine controllo di una casella di testo che deve avere un nome
diverso del campo p.e. "txtTipo":
=Choose([tipo];"pingo";"pongo";"pallino")
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: report - gruppo di opzioni

text:
Karl Donaubauer ha scritto:



don Karl! TANKESCEN!!
Funziona alla grande!  grazie!
l.



title: inserimento nomi in una tabella presi da un'altra tabella

author: mimì

text:
Salve a tutti, ho visto qualcosa di simile nei precendenti post, ma
non sono in grado di fare ciò che vorrei.
La necessità è questa:
- ho una tabella Atleti, dove sono inseriti tutte le generalità gli
atleti, che aggiorno da maschera Atleti;
- ho una tabella Allenamenti, dove ci sono i seguenti campi:
ID
IdAtleta (campo collegato con il cognome dell'atleta preso dalla
tabella Atleti)
Allenamento
Data Allenamento
Data gara.
Il problema stà che un gruppo di atleti si allena in una data, un
altro gruppo in un altra data, etc...
Quello che vorrei fare io dalla maschera Allenamenti è la seguente
cosa:
1) selezionare da una combobox (collegata al campo Cognome della
tabella Atleti) tutti i Cognomi del gruppo che si è allenato quel
giorno ed inserirli automaticamente nella tabella Allenamenti;
2) inserire in un campo della maschera la data dell'allenamento e con
un comando aggiornare il campo Data Allenamento nella tabella
Allenamenti contemporaneamente a tutti gli atleti di quel gruppo;
3) ripetere queste operazioni per ogni gruppo ad ogni allenamento e/o
gara.
Come posso fare?
Sicuro che qualche guru di access e codice vba mi potrà aiutare, vi
ringrazio anticipatamente.
Mimi


author: Popi - TheBadHabits

text:

Invece di una ComboBox (che permette di selezionare un solo cognome
per volta) nella maschera Allenamenti metti una ListBox (multiselect),
insieme alle TextBox per gli altri dati che andranno caricati nella
tabella Allenamenti.
Aggiungi quindi un pulsante "Salva" e nel suo evento Click fai ciclare
tutti gli item della ListBox per inserire quelli selezionati (completi
dei dati nelle TextBox) nella tabella Allenamenti.
HTH
Popi
Poi ti crei una


text:

> Poi ti crei una- Nascondi testo citato
>
> - Mostra testo citato -
Scusami come si mette una listbox multiselect?


text:

> Scusami come si mette una listbox multiselect?- Nascondi testo citato
>
> - Mostra testo citato -
OK ho trovato come rendere la listbox multiselect ora cerco di andare
avanti
Grazie


text:
On 15 Lug, 13:29, mimì <
dgamb...@libero.it
> wrote:
> Scusami come si mette una listbox multiselect?
E' un controllo "Casella di riepilogo" la cui proprietà MultiSelect è
impostata a 1 o 2.
Guarda la guida cosa dice di questo tipo di controllo e delle sue
proprietà.
Popi


text:

> Grazie- Nascondi testo citato
>
> - Mostra testo citato -
Scusa come dovrei fare per far ciò:
"Aggiungi quindi un pulsante "Salva" e nel suo evento Click fai
ciclare
tutti gli item della ListBox per inserire quelli selezionati
(completi
dei dati nelle TextBox) nella tabella Allenamenti."
mi puoi dare il codice vba?
Grazie


text:

L'Ho fatta diventare multiselect impostando la voce selezione multipla
su: Semplice.
Penso sia la stessa cosa.
Ma mi puoi dare il codice vba per far funzionare il pulsante
"Inserisci Dati", dopo aver selezionato i nomi?
Grazie
Mimi
Mimi


text:
On 15 Lug, 14:19, mimì <
dgamb...@libero.it
> wrote:
> On 15 Lug, 14:08, Popi - TheBadHabits <
rlu...@yahoo.com
> wrote:
>
> > On 15 Lug, 13:29, mimì <
dgamb...@libero.it
> wrote:
>
> > > Scusami come si mette una listbox multiselect?
>
> > E' un controllo "Casella di riepilogo" la cui proprietà MultiSelect è
> > impostata a 1 o 2.
>
> > Guarda la guida cosa dice di questo tipo di controllo e delle sue
> > proprietà.
>
> L'Ho fatta diventare multiselect impostando la voce selezione multipla
> su: Semplice.
> Penso sia la stessa cosa.
>
> Ma mi puoi dare il codice vba per far funzionare il pulsante
> "Inserisci Dati", dopo aver selezionato i nomi?
Usa il codice sotto come riferimento per scrivere quello che realmente
ti serve.
For IndiceRiga =1 to me.ListBoxCognomi.ItemsSelected.count
    rsAllenamenti.addnew

rsAllenamenti.fields("IdAtleta")=me.listboxcognomi.itemsselected(indiceriga)
    rsAllenamenti.fields("Allenamento")=me.TextBoxAllenamento
    rsAllenamenti.fields("Data Allenamento")=me.TextBoxDataAllenamento
    rsAllenamenti.fields("Data gara")=me.TextBoxDataGara
    rsAllenamenti.update
Next
Per spiegazioni sui metodi e proprietà coinvolti (DAO l'hai già
incontrato in passato) fai riferimento alla guida.
Popi


text:
On 15 Lug, 14:39, Popi - TheBadHabits <
rlu...@yahoo.com
> wrote:
> On 15 Lug, 14:19, mimì <
dgamb...@libero.it
> wrote:
>
>
>
>
>
> > On 15 Lug, 14:08, Popi - TheBadHabits <
rlu...@yahoo.com
> wrote:
>
> > > On 15 Lug, 13:29, mimì <
dgamb...@libero.it
> wrote:
>
> > > > Scusami come si mette una listbox multiselect?
>
> > > E' un controllo "Casella di riepilogo" la cui proprietà MultiSelect è
> > > impostata a 1 o 2.
>
> > > Guarda la guida cosa dice di questo tipo di controllo e delle sue
> > > proprietà.
>
> > L'Ho fatta diventare multiselect impostando la voce selezione multipla
> > su: Semplice.
> > Penso sia la stessa cosa.
>
> > Ma mi puoi dare il codice vba per far funzionare il pulsante
> > "Inserisci Dati", dopo aver selezionato i nomi?
>
> Usa il codice sotto come riferimento per scrivere quello che realmente
> ti serve.
>
> For IndiceRiga =1 to me.ListBoxCognomi.ItemsSelected.count
>     rsAllenamenti.addnew
>
> rsAllenamenti.fields("IdAtleta")=me.listboxcognomi.itemsselected(indiceriga)
>     rsAllenamenti.fields("Allenamento")=me.TextBoxAllenamento
>     rsAllenamenti.fields("Data Allenamento")=me.TextBoxDataAllenamento
>     rsAllenamenti.fields("Data gara")=me.TextBoxDataGara
>     rsAllenamenti.update
> Next
>
> Per spiegazioni sui metodi e proprietà coinvolti (DAO l'hai già
> incontrato in passato) fai riferimento alla guida.
>
> Popi- Nascondi testo citato
>
> - Mostra testo citato -
Ora ci provo grazie
Mimi


text:

> Mimi- Nascondi testo citato
>
> - Mostra testo citato -
Non funziona... me lo guardo un pò, poi magari lunedi ti faccio
sapere.
Grazie e buon weekend
Mimi


text:

Ciao Popi,
ho inserito il codice che mi hai dato, ma non funziona... nella
descrizione errori mi dice "necessario oggetto".
mi puoi o potete aiutare?
Grazie!


text:

Ciao Mimì.
Quel codice era solo una *traccia*, non l'hai inserito paro-paro,
vero?
Posta il codice che hai usato segnalando la riga in cui ti va in
errore e poi vediamo.
Popi


text:

Qui sotto c'è il codice completo del pulsante "SALVA", che in realtà
si chiama Comando16:
Private Sub Comando16_Click()
On Error GoTo Err_Comando16_Click
For IndiceRiga = 1 To Me.ListBoxCognomi.ItemsSelected.Count
    rsAllenamenti.AddNew
rsAllenamenti.Fields("IdAtleta") =
Me.ListBoxCognomi.ItemsSelected(indiceriga)
    rsAllenamenti.Fields("Allenamento") = Me.TextBoxAllenamento
    rsAllenamenti.Fields("Data Allenamento") =
Me.TextBoxDataAllenamento
    rsAllenamenti.Fields("Data gara") = Me.TextBoxDataGara
    rsAllenamenti.Update
Next
Exit_Comando16_Click:
    Exit Sub
Err_Comando16_Click:
    MsgBox Err.Description
    Resume Exit_Comando16_Click
End Sub
Grazie
Mimi


text:

Mimì ... partendo dal presupposto che non hai copiato paro paro la mia
traccia ... rsAllenamenti l'hai definito a livello di modulo e l'hai
aperto in un'altra sub, vero?
Sostituisci quel codice con questo qua sotto, poi lancia il programma
e dimmi dove va in errore e che messaggio segnala.
Private Sub Comando16_Click()
For IndiceRiga = 1 To Me.ListBoxCognomi.ItemsSelected.Count
     rsAllenamenti.AddNew
     rsAllenamenti.Fields("IdAtleta") =
Me.ListBoxCognomi.ItemsSelected(indiceriga)
     rsAllenamenti.Fields("Allenamento") = Me.TextBoxAllenamento
     rsAllenamenti.Fields("Data Allenamento") =
Me.TextBoxDataAllenamento
     rsAllenamenti.Fields("Data gara") = Me.TextBoxDataGara
     rsAllenamenti.Update
Next
End Sub
Popi


text:

Scusa la mia grande ignoranza, mi puoi chiarire quanto segue:
1.  "rsAllenamenti l'hai definito a livello di modulo e l'hai aperto
in un'altra sub", di cosa parliamo? Io non ho creato moduli e non
saprei cosa scriverci nel modulo;
2. ho riscritto il tuo codice e mi da lo stesso msg "necessario
oggetto". Forse perche manca il famoso modulo?
Mi fai sapere, grazie!!!
Mimi


text:

Un modulo è costituito da un insieme di righe di codice.
Esistono due tipi di modulo: quelli in cui inserisci funzioni e
subroutine (solitamente) pubbliche che puoi richiamare da qualsiasi
parte del progetto e quelli che contengono il codice riferito ad una
form o report.
Quando assegni un evento ad una form o ad un suo controllo, il codice
che scrivi viene inserito nel modulo di quella form.
Detto questo, quando ho finito di scrivere del codice controllo sempre
di non aver commesso errori grossolani: nella finestra di VBE (quella
in cui si scrive il codice) attivo la voce di menu Debug/Compila.
Per impostazione predefinita (AFAIK!) Access mette sempre questa riga.
Option Compare Database
A me piace inserire anche questa, che mi obbliga a definire sempre una
variabile prima di poterla utilizzare.
Option Explicit
Così facendo, la compilazione mi segnala errore se non ho definito una
variabile.
Quindi, dopo averla definita, mi segnala errore se la sto usando in
maniera "non corretta".
Venendo al tuo caso, si scopre quindi che la variabile rsAllenamenti
dovrà essere definita, e sarà di tipo DAO.RecordSet (dovrai aggiungere
i riferimenti a DAO).
Dopo averla definita dovrai inizializzarla (prima del ciclo che ti ho
suggerito) con qualcosa del tipo
Set rsAllenamenti=CurrentDb.OpenRecordset("Allenamenti")
Inoltre, dopo il ciclo, dovrai chiudere il recordset con
rsAllenamenti.Close
Set rsAllenamenti = Nothing
Giunti a questo punto, altri errori potrebbero venirti fuori (ad
esempio!) se i controlli che hai messo sulla maschera non hanno i nomi
che hai messo nel codice.
HTH
Popi
P.s.: che ne diresti, prima di lanciarti in certe avventure, di
leggerti un po' di teoria degli oggetti di Access? La guida potrebbe
esserti *molto* d'aiuto.


text:

> esserti *molto* d'aiuto.- Nascondi testo citato
>
> - Mostra testo citato -
Scusami ancora, ma non sono esperto di codice vba e continuando così
penso di non andare molto lontano.
Se mi dai un indirizzo email, ti mando il file access in allegato e
cosi lo puoi vedere personalmente cosa manca e cosa e sbagliato e
magari inserire ciò che manca per farlo funzionare.
La cosa che ho capito e che mancano le variabili e quando dò il
comando salva, non salva il cognome nel campo IdAtleta e quindi non va
avanti.
che ne dici?
Mimi


text:

Dico che anche il viaggio più lungo comincia con un piccolo passo :)
E dico che uno solo (così dicono le Scritture) è "nato imparato" ...
noartri ce tocca partorì co''r'sangue, magna' co'r'sudore d'a'fronte,
e studia'.
Intanto hai capito che mancano le variabili, e già questo è un passo
avanti.
Se fai come ti ho detto (debug e guida) vedrai che ne farai altri.
Popi


text:

Grazie mille


author: sv

text:
[cut]
Ti invito a leggere:
http://lnx.accessgroup.it/community/howto/traduzioni-ms-access-2000.html
Per i Recordset vai al capitolo 6
--
sv
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:

Scusa, quale articolo dovrei leggere?


text:
mimě ha scritto:


Apri l'allegato e vedi cosa c'č sotto.
--
sv
--
questo articolo e` stato inviato via web dal servizio gratuito



text:
On 20 Lug, 12:15,
salv...@accessgroup.it
 (sv) wrote:
> mimì ha scritto:
>
> > On 19 Lug, 16:36,
salv...@accessgroup.it
 (sv) wrote:
> > > [cut]
>
> > > Ti invito a leggere:
>
> > >
http://lnx.accessgroup.it/community/howto/traduzioni-ms-access-2000.html
>
> > > Per i Recordset vai al capitolo 6
>
> > > --
> > > sv
>
> > > --
>
> > > questo articolo e` stato inviato via web dal servizio
>
> gratuitohttp://
www.newsland.it/newssegnalagli
 abusi ad
ab...@newsland.it
>
> > Scusa, quale articolo dovrei leggere?
>
> Apri l'allegato e vedi cosa c'è sotto.
>
> --
> sv
>
> --
>
> questo articolo e` stato inviato via web dal servizio gratuitohttp://
www.newsland.it/newssegnala
 gli abusi ad
ab...@newsland.it
Grazie leggerò


title: Per piacere AIUTO! ACCESS Runtime XP e associazione file mde/mdb...

author: Ren

text:
Si ma come faccio ? Il catalogo lo deve distribuire l'azienda un pò per
tutta l'europa ?
Non mi sembra poi così pofessionale come soluzione...
altre idee ?
cmq il problema di fondo è che è distribuito su CD, e se lo devono
installare da soli il pacchetto e visualizzarlo,
ergo le cose devono avvenire automaticamente... il che vuol dire
riconoscere subito se sul computer nel quale và installato il pacchetot è
presente una qualche versione di Access
e nel caso agire di conseguenza.
Se non c'è Access nesusn problema.. viene installato il Runtime
Se esiste Access in versioni precedenti.. devo poter installare il runtime,
ma mantenere le associazion di file per Access Full, in modo che il runtime
venga usato solamente dal mio database, il che vuol dire che runtime non si
deve automaticamente rubare le associazioni di file.
Se esiste Access 2002 allora non installa il runtime e avvia il database
usando la versione full in modalità runtime.
Ergo: Esiste un modo perchè tutto questo accada senza combinare casini ? O
alal microsoft hanno davvero fatto un pessimo lavoro e ho buttato i soldi
dalal finestra ? vabè chen on sono soldi miei ma dell'azienza... però il
posto di lavoro è mio e ci tengo...
Grazie :)
> Se si abituano ad aprire Full Access e da isso caricare i DB che
desiderano
> il problema non sussiste.
> Se invece sono imbranati gli crei una stringa d'avvio per i DB di
precedenti
> realese:
>
> C:\programmi\office97\msaccess.exe "C:\database\miodb.mdb"
>
> Ciao, warp
>
>


author: stwe

text:
"Ren" <
p...@nospam.it
> ha scritto nel messaggio
news:5pX78.24485$5M4.7...@twister2.libero.it...

hai già avuto la risposta da warp, alla quale mi associo, eventualmente
aggiungi una nota nella guida in linea, o meglio il collegamento al sito
microsoft se da qualche parte ne parla, in ogni caso ricorda chi utilizza
access e per cosa, se è un utente "medio" non gli frega nulla di questo
problema, in quanto non utilizza access per creare applicazioni, credo
comunque che se fai una copia del registro prima e poi la verifichi con
quella dopo che hai installato il rt scopri la chiave ed eventualmente la
modifichi tramite codice.
Posso chiederti una cosa: la versione xp ha ancora i problemi di
compatibilità della versione 2000 rispetto ai sistemi operativi, ovvero hai
provato ad installarla su macchine senza win xp/2000? in quanto la versione
2000 se crei il rt/setup su win2000 non funziona su win 98/me... e
viceversa.
grazie
by
stwe


text:
Tranquillo, almeno per quello, ho creato il paccehtto con office XP sotto
Win2000,
e installato su tali configurazioni senza problemi
Win95 senza Access
Win98 senza Access
Win98 Olandese senza Access
Windows 2000 senza Acces
Windows XP senza e con Access
solo su Windows NT Server 4 Inglese non ne vuoel sapere di installarsi...
Per il resto vi chiedo è possibile creare un codice che alla chiusura del DB
in Access RunTime,
ripristini l'associazione di file ad Access se presente ?
Se si pensavo di creare due pacchetti, uno che va instalalto se Access non è
presente sul computer,
e l'altro che si installa se esiste una qualsiasi versione di Access, con
appunto la modifica di cui sopra al
codice del DB.
Naturalmente poi devo creare un piccolo applicatino in Visual Basic 6 che mi
determini se sul pc è installato o meno Access, e quindi decida quale setup
lanciare.
Potrebbe funzionare ?
Qualcuno mi può dare informazioni sul codice per ricercare se access è
presente o meno nel pc ?
Grazie mille!



author: warp

text:
"Ren" >
> Win95 senza Access
Strano che vada!
> Win98 senza Access
> Win98 Olandese senza Access
> Windows 2000 senza Acces
> Windows XP senza e con Access
>
> solo su Windows NT Server 4 Inglese non ne vuoel sapere di installarsi...
E' installato almeno il service pack 6?
> Per il resto vi chiedo è possibile creare un codice che alla chiusura del
DB
> in Access RunTime,
> ripristini l'associazione di file ad Access se presente ?
Prova questo:
http://support.microsoft.com/default.aspx?scid=kb;en-us;Q183143
Ciao, warp


title: problema con raggruppamenti

text:
Ho realizzato una stampa dove i campi coinvolti sono unità di misura,
quantità e importo.
La stampa prevede parecchi raggruppamenti e i totali del gruppi sono
nelle intestazioni e non nei piè di pagina.
Vorrei nascondere le somme di quantità e unità di misura nei totali di
gruppo quando le unità di misura non sono omogenee; in pratica se nei
dettagli ho q.ta in kg e q.ta in metri non scrivo le q.ta nei totali.
Il mio problema nasce dal fatto che le somme sono in cima ai gruppi e
non nel fondo. Quando stampo la somma, non so ancora se le quantità
sono omogenee o meno perchè non ho ancora trattato i dettagli.
Ho provato una soluzione che preconteggia con SQL i record raggruppati
per U.M., funziona ma è troppo onerosa in termini di tempo; l'archivio
contiene più di 100.000 record.
Avete qualche idea???
Grazie per le eventuali risposte
Roberto


title: problema con raggruppamenti

author: Sergio MAZZA

text:
<
abc...@gmail.com
> ha scritto nel messaggio
news:e290a55b-aba3-4ffa...@v28g2000hsv.googlegroups.com...


Avete qualche idea???

Roberto
[risposta]
Prova così.
Crea una tabella temporanea, con la struttura che ti servirà per il report;
con una query di accodamento, che eseguirà tutti i calcoli possibili (anche
i raggruppamenti), inserisci i record. Al report non rimarrà che i calcoli
dei totali per i raggruppamenti.
Un modo più veloce, per mettere in atto questa prova, è quello di utilizzare
la query sopra descritta non di tipo accodamento ma di creazione tabella.
Se vuoi evitare che l'mdb lieviti (svuota/riempi elimina/crea) utilizza un
altro mdb con la sola tabella temporanea, collega quest'ultima al tuo mdb
principale...
Ciao.
--
Sergio MAZZA


title: campo autoincrementato

author: tekram

text:
Come posso incrementare un campo di una tabella nel momento in
cui aggiungo un nuovo record (ad es. A001,A002,...)?


title: campo autoincrementato

author: Roberto dalla campagna

text:
tekram <
tek...@excite.it
> wrote in message b8vtnb$5i9$1...@gossip.excite.it...
>
> Come posso incrementare un campo di una tabella nel momento in
> cui aggiungo un nuovo record (ad es. A001,A002,...)?
Vai sul Sito Comune (link qui sotto) e nella Sezione General prova a leggere
la FAQ di   Davide La Mantia (Sib) intitolata "Numerazione crescente per
fatture ed altro".
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: forms e report in anteprima...

author: Frankkk

text:
Ho un paio di quesiti per il Ng...
1. In un form con proprietą Pop-Up attivata devo chiamare l'anteprima di un
report che ovviamente si apre correttamente ma in Background (sotto il
form)...per evitare/risolvere il problema....
2. Quando apro lo stesso report vorrei che la finestra che ospita
l'anteprima avesse delle dimensioni predefinite da me impostate.
Idee, soluzioni ?????
Grazie a tutti
Frankkk


title: forms e report in anteprima...

author: Roberto da casa

text:
"Frankkk" <
frank...@libero.it
> ha scritto nel messaggio
news:k6YK5.49530$3K3.1...@news.infostrada.it...

Per il primo quesito, per quello che so io, essendo una maschera Pop-Up non
ti resta che renderla non visibile o minimizzarla.
Per il secondo problema non so risponderti.
--
Roberto
---------------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------


title: forms e report in anteprima...

text:
Frankkk ha scritto:
> 1. In un form con proprietą Pop-Up attivata devo chiamare l'anteprima di un
> report che ovviamente si apre correttamente ma in Background (sotto il
> form)...per evitare/risolvere il problema....
Ti ha gia risposto Roberto. Niente altro possibile.
> 2. Quando apro lo stesso report vorrei che la finestra che ospita
> l'anteprima avesse delle dimensioni predefinite da me impostate.
> Idee, soluzioni ?????
Vedi nel online help al metodo MoveSize.
Puoi usarlo in una maschera chiamando il report come p.e.
DoCmd.OpenReport "foo", acViewPreview
DoCmd.MoveSize 100, 200, 5000, 5000
--
HTH
Karl
*********
Scusate il mio malissimo Italiano. Faccio solo esercizi qui.
Access-FAQ (Tedesco):
http://www.donkarl.com


title: forms e report in anteprima...

text:
Cosa hai deciso, sei con noi a Roma il 4/11?
Spero di si.
Ciao
Roberto


title: forms e report in anteprima...

text:
Roberto da casa ha scritto:
>
> Cosa hai deciso, sei con noi a Roma il 4/11?
> Spero di si.
Mi dispiace molto ma non posso venire.
Oggi abbiamo provato per l'ultima volta di trovare un volo.
Ma non c'é una offerta acquistabile.
Roma sembra essere esaurito da lungo - forse é l'Anno Santo
e di più la prossimità di Ognissanti...
--
:-(



title: forms e report in anteprima...

author: Roberto dal portatile

text:
"Karl Donaubauer" <
ad...@donkarl.com
> ha scritto nel messaggio
news:CdiL5.120398$mL4.6...@news.chello.at...
> Roberto da casa ha scritto:
> >
> > Cosa hai deciso, sei con noi a Roma il 4/11?
> > Spero di si.
>
> Mi dispiace molto ma non posso venire.
> Oggi abbiamo provato per l'ultima volta di trovare un volo.
> Ma non c'é una offerta acquistabile.
> Roma sembra essere esaurito da lungo - forse é l'Anno Santo
> e di più la prossimità di Ognissanti...
>
> --
> :-(
> Karl
E' un vero peccato :-(
Bisognerebbe organizzare un raduno europeo a Vienna....  ;-)
Ciao
Roberto


title: overflow

author: Pivo

text:
access2000 su winNT:
vai:
Set rs = CurrentDb.OpenRecordset("TESSERE")
On Error GoTo errore
For i = Me.txt_ini To Me.txt_fine
     rs.AddNew
     rs![N_Tessera] = i
     rs![Prezzo_tessera_acquisto] = Me.txt_prezzo_acquisto
     rs![Prezzo_tessera_vendita] = Me.txt_prezzo_vendita
     rs![anno_tessera] = Me.txt_anno_tessera
     rs![Tipo_Tessera] = Me.txt_tipo_tessera
     rs.Update
Next i
rs.Close
Set rs = Nothing
Me![Tessere disponibili].Requery
questo codice mi da errore "Overflow" errore di Runtime '6' quando valorizzo
ad esempio txt_ini a 315616 e txt_fine 315700 fermandosi all'inizio del
ciclo For alla riga "For i = Me.txt_ini To Me.txt_fine"
Leggo dalla guida che "Un overflow può essere il risultato di
un'assegnazione superiore al valore massimo previsto" ma non capisco se si
riferisce ai campi della tabella oppure al formato in maschera (ho provato
sia con Standard che numero generico) e non credo ai campi della tabella
perchè il controllo dovrebbe avvenire successivamente.
Mi sapete aiutare?


title: overflow

text:
dimenticavo; ho provato anche ad aggiungere
Dim txt_ini_lungo  As Long
Dim txt_fine_lungo As Long
txt_ini_lungo = Me.txt_ini
txt_fine_lungo = Me.txt_fine
ma niente da fare......


title: overflow

author: Federico Luciani

text:

manca una informazione importante, e cioe' la variabile i
come e' stata dichiarata?
prova a dichiararla Long e riprova.
--
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------


title: overflow

author: bobbit

text:
Pivo <
hge...@tiscalinet.it
> wrote in message
8tv08v$394u$1...@stargate1.inet.it...

i come l'hai dichiarato?
Ciao, Bobbit


title: overflow

text:
ahhhhhhhhhhhhh
Dim i As Integer
ho sistemato con dim i as long e tutto risolto; siete grandi, grandi come il
newsgroup
grazie


title: Evento Report_Page

text:
Ciao a tutti,
avrei bisogno di un aiuto su questo problema che mi sta facendo
dannare... anche se sembra banale...
In un report, che può essere di n pagine, ho inserito nel "Piè di
pagina pagina" l'etichetta "Firma".
Vorrei che tale etichetta fosse visibile solo nell'ultima pagina del
report (cioè sulla prima se il report è di una sola pagina e sulla
pagina n se formato da n pagine).
Premetto che non vorrei inserire l'etichetta "Firma" nel "Piè di
pagina report" poichè vorrei che l'etichetta fosse sempre nella parte
bassa del foglio.
Ho provato così ma non capisco dove sbaglio... procedendo passo passo
sembra che le condizioni siano corrette, ma il risultato è
invertito ...
Private Sub Report_Page()
  Dim Pages As Integer
  Dim Current_Page As Integer
    Pages = Me.Pages
    Current_Page = Me.Page
    If Current_Page <> Pages Then
        Me![Firma].Visible = False
    Else
        Me![Firma].Visible = True
    End If
End Sub
Grazie a tutti coloro che vorranno aiutarmi.
Francesco


title: Evento Report_Page

author: MA

text:

Private sub corpo_format()
firma.visible = me.pages then
end sub
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: Evento Report_Page

author: CIDI

text:
"FrancescoG75" <
francesc...@gmail.com
> ha scritto nel messaggio
news:a4f64b4d-6efe-4ab8...@s19g2000prg.googlegroups.com...




    End If
End Sub

Ciao Francesco
la proprietà dell'etichetta deve essere non visibile.
su stampa del Piè Di Pagina Pagina
If Me.Page = Me.Pages Then
me.etichettafirma.visible = true
else
me.etichettafirma.visible = false
Daniele


title: query con maschere popup

author: Daniela

text:
Gestisco un'agenzia immobiliare.
Vorrei creare una query (da cui generare un report) che mi restituisca i
contatti avuti per un dato immobile.
Visto che gli immobili sono diversi, piuttosto che creare un aquery per
ciascun immobile, vorrei che mi si aprisse una maschera popup con gli
immobili da cui io possa selezionare quello che mi interessa.
Si può fare?
Grazie a chi vorrà darmi una mano.
Daniela


title: query con maschere popup

text:
"Daniela" <
danielapi...@libero.it
> ha scritto nel messaggio
news:Kqbc7.19730$1c2.2...@news.infostrada.it...
> Gestisco un'agenzia immobiliare.
> Vorrei creare una query (da cui generare un report) che mi restituisca i
> contatti avuti per un dato immobile.
> Visto che gli immobili sono diversi, piuttosto che creare un aquery per
> ciascun immobile, vorrei che mi si aprisse una maschera popup con gli
> immobili da cui io possa selezionare quello che mi interessa.
> Si puň fare?
>
> Grazie a chi vorrŕ darmi una mano.
>
> Daniela
Si puň fare ma credo che faresti prima ad indicarci dove trovi problemi...
Ciao.


title: query con maschere popup

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:9krgpm$2kg$1...@canarie.caspur.it...
>
> Si può fare ma credo che faresti prima ad indicarci dove trovi problemi...
Il problema è semplicemente che non so farlo da sola.
Se voglio i contatti per l'immobile PIPPO, devo creare una query ad hoc.
Vorrei, invece che sia la query a chiedermi di quale immobile deve
restituirmi i contatti, evitando, quindi, di creare una query per ciascun
immobile.
Spero di essere riuscita a farmi capire.
Grazie per la tempestività.
Daniela