author: Scaccianoce Vincenzo

text:
"Carla B." <
carlabeltr...@libero.it
> wrote in message
news:6UOS5.16685$FV2.4...@news.infostrada.it...
> Elaboro con access dei file .dbf che aggiorno settimanalmente, tutte le
> volte importo di nuovo la tabella (quindi devo cancellare le relazioni e
> rifarle) sarebbe più comodo fare "collega tabella" invece che "importa
> tabella" ma collegando la tabella mi è capitato di cambiare
> involontariamente i dati nel file di origine, (1 giorno e mezzo x
sistemare
> il malestro....... avendo appena letto il messaggio sulla netiquette Vi
> risparmio i commenti che ho sulla punta delle dita)
> c'è un modo per dirgli di non modificare i dati di origine?
> Grazie e ciao.
> Carla
> Dimenticavo gli incriminati sono : Access 2000 + Windows 98 + i file di
> origine penso siano in DBV (cioè se dico ad access che sono DBV non fa
> storie mi pare però che il programmino sia stato fatto con DBD32 o DBE32)
>
Carla (e chiunque legga), io ho il problema opposto:
Ho Access2000 SR1 - WinNT 4.0 6a, vorrei aggiornare dei file .dbf (gestiti
da dbase IV) utilizzando il collegamento alla tabella, ma Access mi dice:
"Il modulo di gestione di database Microsoft Jet non e' in grado di aprire
il file 'd:\....................\....dbf'. Il file e' gia' aperto con
accesso esclusivo da un altro utente o e' necessario disporre
dell'autorizzazione per visualizzare i dati."
Considerato che da Access97 ci riesco tranquillamente chiedo: dove sbaglio?
ho dimenticato qualcosa?
Preciso che in entrambi i casi l'applicazione dbase e' attiva.
Se chiudo l'applicazione dbase (cosa che vorrei assolutamente evitare....)
Access2000 visualizza i dati, ma mi dice: "Recordset non aggiornabile" e,
per fare le modifiche, debbo ................... tornare ad Access97
:-((((((((
Ringrazio anticipatamente chi mi fornira' spiegazioni su quanto accade.
                                                                Vincenzo


title: Riempimento ComboBox

author: Ferdinand Lessaux

text:
Il mio problema è molto semplice, ma non sono ancora riuscito trovare una
soluzione:
Ho due combobox, la prima prende i dati da una tabella con due campi di cui
il primo viene memorizzato (cod materiale).
Io vorrei, se è possibile, selezionare un determinato codice e riempire
direttamente l'altra combobox con l'unico valore che è associato a quel
codice(secondo campo della tabella:materiale). In pratica la seconda combo
ha come origine dati una query che mi prende il materiale associato a quel
codice materiale, ma per farlo vedere devo premere la freccetta nella combo
e vorrei che venisse fatto in automatico. Il tutto senza creare
sottomaschere anche perchè lavorando su una maschera continua e non posso
neanche farlo!
Spero di essermi spiegato bene!
Ciao a tutti e grazie!


title: Riempimento ComboBox

author: Roberto dal portatile

text:
"Ferdinand Lessaux" <
sarc...@infinito.it
> ha scritto nel messaggio
news:8o52jd$1j4$1...@nslave1.tin.it...

Perchè non trasformi la seconda combobox in una casella di riepilogo?
Roberto


title: Riempimento ComboBox

author: Sib

text:
"Ferdinand Lessaux" dice
> Ho due combobox, la prima prende i dati da una tabella con due campi di
cui
> il primo viene memorizzato (cod materiale).
> Io vorrei, se č possibile, selezionare un determinato codice e riempire
> direttamente l'altra combobox con l'unico valore che č associato a quel
> codice(secondo campo della tabella:materiale). In pratica la seconda combo
> ha come origine dati una query che mi prende il materiale associato a quel
> codice materiale, ma per farlo vedere devo premere la freccetta nella
combo
> e vorrei che venisse fatto in automatico. Il tutto senza creare
> sottomaschere anche perchč lavorando su una maschera continua e non posso
> neanche farlo!
In questi casi, normalmente, non si inseriscono due combo, ma una sola a due
colonne.
Tutt'al piů si puo' inserire una casella di testo dove visualizzare
separatamente i dati relativi alla descrizione.
Quindi ti suggerisco di creare una combo a due colonne e togliere il resto.
Ad ogni modo e' sufficiente impostare , nell'evento DopoAggiornamento della
prima combo, Me.MiaSecondoControllo=Me.Descrizione.
Ciao, Sib


title: Riempimento ComboBox

text:
Perchè lavorando su una maschera continua quando mi posiziono sul codice
materiale (facciamo l'esempio che abbia inserito 4 record del tipo
[cod-->materiale] e mi posizioni sul 4°), automaticamente tutte le caselle
materiale cambiano valore a seconda del codice selezionato (in questo caso
quello della quarta riga)!


title: Riempimento ComboBox

text:
"Ferdinand Lessaux" <
sarc...@infinito.it
> ha scritto nel messaggio
news:8o5du7$dr6$1...@nslave1.tin.it...

Il fatto che tu lavori a maschere continue è un fatto di mera
visualizzzione, ovvero vedi contemporaneamente più di un record; resta però
il fatto che il record corrente, prescindendo dal tipo di visualizzazione,
resta uno e uno solo ed è in base ai dati di questo che Access effettua le
sue elaborazioni.
Se i controlli che devi riempire sono non associati, magari puoi risolvere
mettendo una formula nell'origine controllo, nel tuo caso potrebbe magari
andare bene una funzione DLookup.
Roberto


title: Riempimento ComboBox

author: SABINA CAMERIN

text:
Ferdinand Lessaux <
sarc...@infinito.it
> wrote in message
8o52jd$1j4$1...@nslave1.tin.it...

Non vorrei aver capito male, ma la soluzione è semplice:
Crea due combo, tutte e due devono avere come origine lo stesso campo.
Come origine della prima combo ci metti una query che prende dall'altra
tabella Cod. e Descr.
Come origine della seconda combo ci metti una query che prende dall'altra
tabella Descr. e Cod.
Nel numero colonne di entrambe ci metti 2.
Nella colonna associata della prima ci metti 1 e nella colonna associata
della seconda ci metti 2.
Nella larghezza colonne ci metti quello che preferisci a seconda se vuoi
vedere solo il codice o la descrizione o entrambe, io preferirei entrambe,
vedi tu.   Ciao.  Spero tanto di aver capito il tuo problema e di esserti
utile.


title: Riempimento ComboBox

text:
Ferdinand Lessaux <
sarc...@infinito.it
> wrote in message
8o52jd$1j4$1...@nslave1.tin.it...




title: Riempimento ComboBox

text:
Ferdinand Lessaux <
sarc...@infinito.it
> wrote in message
8o52jd$1j4$1...@nslave1.tin.it...

Non vorrei aver capito male, ma la soluzione è semplice:
Crea due combo, tutte e due devono avere come origine lo stesso campo.
Come origine della prima combo ci metti una query che prende dall'altra
tabella Cod. e Descr.
Come origine della seconda combo ci metti una query che prende dall'altra
tabella Descr. e Cod.
Nel numero colonne di entrambe ci metti 2.
Nella colonna associata della prima ci metti 1 e nella colonna associata
della seconda ci metti 2.
Nella larghezza colonne ci metti quello che preferisci a seconda se vuoi
vedere solo il codice o la descrizione o entrambe, io preferirei entrambe,
vedi tu.   Ciao.  Spero tanto di aver capito il tuo problema e di esserti
utile.
>>>Non serve un martello per inchiodare Access<<<


title: Riempimento ComboBox

text:
"Roberto dal portatile" <
r.ma...@libero.it
> ha scritto nel messaggio
news:P%sp5.132717$dF5.2...@news.infostrada.it...

Poichè lavori con visualizzazione a Maschere continue, la soluzione è una
via di mezzo tra quello che ti ha indicato Sib e quello che ti ho indicato
io.
Ovvero crea la prima combo a due colonne e rendi visibile la prima (quella
che contiene il codice materiale) mettendo a zero la lunghezza della
seconda; quindi, al posto della seconda combo dichiarati una casella di
testo non associata e nell'origine controllo scrivi:
    =[NomePrimaCombo].Column (1)
Se invece lo fai tramite VBA nell'evento dopo aggiornamento della prima
combo, ti succede lo scherzetto che hai segnalato, ogni volta che selezioni
un codice nella prima combo, ti cambiano tutte le descrizioni, assumendo il
valore dell'ultimo materiale selezionato.
Roberto


title: Riempimento ComboBox

author: Pleiadi

text:
>Ciao.  Spero tanto di aver capito il tuo problema e di esserti
Accidenti, pensi che postando ben 5 (cinque) volte, la stessa risposta,
riesci a farti capire meglio?
Ciao :-)
Alfio


title: Riempimento ComboBox

text:
Purtroppo per quattro volte il server mi ha dato dei problemi di
collegamento, solamente al quinto tentativo è andato a buon fine.... subito
dopo ho scoperto il casino. Scusate non volevo essere così insistente. :-)
>>>> Non serve un martello per inchiodare Access <<<<
P.S. Anche Outlook si dà da fare per non essere da meno!!!
Pleiadi <
za...@libero.it
> wrote in message
qLwq5.150040$dF5.2...@news.infostrada.it...



title: Contratto software

text:
Chi può gentilmente allegarmi un modulo esemplificativo per redigere un
contratto per lo sviluppo di un applicativo basato su Access?
Grazie.


title: Contratto software

author: Francesco R.

text:
"Codice13" <
codi...@tiscali.it
> ha scritto nel messaggio
news:OQlab.114997$R32.3...@news2.tin.it...
> Chi può gentilmente allegarmi un modulo esemplificativo per redigere un
> contratto per lo sviluppo di un applicativo basato su Access?
> Grazie.
>
Il 15/9 Claudio ha iniziato un interessante thread su problematiche legate
agli aspetti legali circa la distribuzione commerciale di applicativi
Access.
Mi chiedo se questo post possa essere attinente a quello suddetto o meno.
Ciao.


title: Access2000-2003 e mysql5

author: aaa

text:
Salve a tutti,
Sto effettuando un porting di un database access 2000 a mysql 5. A parte
vari problemi legati alla tipologia di dati e altre cose sulle query volevo
sapere una cosa + importante. Su questo db access si appoggia un sito in
asp. Purtroppo i driver odbc mi generano troppi problemi e dovrei convertire
tutte le query contenute nelle pagine per farle digerire sia al driver che
poi al nuovo db(per il momento la precedura è troppo lunga). In alternativa
temporanea ho pensato di generare un database access2003 che contenga solo
il collegamento alle tabelle di mysql. Ho verificato e il sito non presenta
gli errori che riceve quando è direttamente connesso al db mysql. Volevo
però sapere la cosa principale. Un database access con tabelle collegate si
porta dietro il problema delle max dimensioni a 2GB? non esiste un modo
percui il db si svuota subito dopo che nella pagina asp l'oggetto ado si
sconnette?
Potrei trovare altre limitazioni?
Grazie.


title: Access2000-2003 e mysql5

author: Gaspare

text:
"aaa" <a...@aaa.aa> ha scritto nel messaggio
news:5zWfh.641$BR1...@tornado.fastwebnet.it...

Ciao,
prova a dare 1 occhiata ai seguenti links...
http://www.washington.edu/computing/web/publishing/mysql-access-3.5.html#1
http://www.aspitalia.com/ricerca/super.aspx?articoli=1&key=mysql
http://www.cached.it/blog/php/2006/08/21/convertire-un-database-da-access-a-mysql/
http://www.programmazione.it/index.php?entity=eitem&idItem=29748
http://database.html.it/articoli/leggi/787/da-access-a-mysql/1/
http://www.risorse.net/magazine/leggi.asp/id-105
Buon lavoro :-)


title: se programma esterno aperto settarne il focus altrimenti aprirlo

author: tmtube

text:
Dovrei capire se un programma di terze parte che ha un eseguibile per
esempio programma.exe

se è già aperto settarne il focus e massimizzarlo altrimenti aprirlo

qualcuno a quale idea?

Grazie.


text: Puoi usare le api oppure wmi certo se il sw è apribile in multiistanza dovresti ovviamente usare le api passando il caption name oltre al classname.


text:
>"@Alex"  ha scritto nel messaggio
>news:a897df0b-cb60-4a67...@googlegroups.com...

>Puoi usare le api oppure wmi certo se il sw è apribile in multiistanza
>dovresti ovviamente usare le api passando il caption name oltre al
>classname.

No il programma non è multiistanza se ne può aprire solo uno in quanto usa
una com e se ne aprono 2 il secondo và in errore per com già usata dalla
prima istanza

avete qualche esempio da segnalarmi in merito?


text:
Ti ho spiegato come agire... posta qualche tuo tentativo e se non funziona ti aiutiamo...!

Io userei le API:
http://allapi.mentalis.org/apilist/FindWindow.shtml

http://allapi.mentalis.org/apilist/SetActiveWindow.shtml

http://allapi.mentalis.org/apilist/SetFocus.shtml

Fai 1+1 e vedrai che fa 2...

@Alex


title: Casella di riepilogo INTESTAZIONE colorata

text:
Salve ragazzi, ho una casella di riepilogo, collegata ad una tabella. Nella
casella di riepilogo ho visualizzato le intesatazioni della tabella. Adesso
volevo chiedervi � possibile COLORARE oppure EVIDENZIARE solo le celle
dell'intestazione della casella di riepilogo?
Grazie mille


text:
On 18 Ott, 14:30, <
mazzacanepa...@libero.it
> wrote:
> Salve ragazzi, ho una casella di riepilogo, collegata ad una tabella. Nella
> casella di riepilogo ho visualizzato le intesatazioni della tabella. Adesso
> volevo chiedervi è possibile COLORARE oppure EVIDENZIARE solo le celle
> dell'intestazione della casella di riepilogo?
> Grazie mille
Non si può, ma se metti una o più label ben allineate e dimensionate
l'effetto è notevole.
Fantasia prima di tutto
@Alex


text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:62941354-10ae-410f...@t8g2000yqk.googlegroups.com...
On 18 Ott, 14:30, <
mazzacanepa...@libero.it
> wrote:
> Salve ragazzi, ho una casella di riepilogo, collegata ad una tabella.
> Nella
> casella di riepilogo ho visualizzato le intesatazioni della tabella.
> Adesso
> volevo chiedervi � possibile COLORARE oppure EVIDENZIARE solo le celle
> dell'intestazione della casella di riepilogo?
> Grazie mille
>Non si pu�, ma se metti una o pi� label ben allineate e dimensionate
>l'effetto � notevole.
>Fantasia prima di tutto
>@Alex
Grazie mille sicuramente utilizzero i label


title: Forse OT(aiutatemi lo stesso se potete)

text:
Salve a tutti gente scusate l'intrusione
Problema:
Come eliminare una macro da un foglio di Excel?
Grazie per le risposte.
Fabio
--
Posted from 195.110.113.244 by way of [212.141.54.112]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Forse OT(aiutatemi lo stesso se potete)

author: CarloCos

text:
<
jackf...@inwind.it
> ha scritto nel messaggio
news:GIGM6O$I8VHMv8a96LKkyOnJ5vW9KfD...@inwind.it...
Salve a tutti gente scusate l'intrusione
Problema:
Come eliminare una macro da un foglio di Excel?
Grazie per le risposte.
Dal menů strumenti...Macro...Macro selezioni la macro che ti interessa e
premi su Elimina.
Va bene se la macro non č stata precedentemente protetta.
Ciao, Carlo


title: contatore

author: tore

text:
Ciao a tutti
Come faccio ad azzerare il Campo Contatore Di access
Grazie


title: contatore

author: Napoleone

text:
"tore" <
in...@molisso.it
> ha scritto nel messaggio
news:gohhe.1382194$35.51...@news4.tin.it...
> Ciao a tutti
> Come faccio ad azzerare il Campo Contatore Di access
> Grazie
>
>
Compatta il database.
Napoleone


title: contatore

text:
cioč che vuol dire compatta il database
scusa non ho campito come fare
grazie
"Napoleone" <
Napol...@libero.it
> ha scritto nel messaggio
news:5phhe.7045$795.1...@twister1.libero.it...



title: contatore

text:
"tore" <
in...@molisso.it
> ha scritto nel messaggio
news:K8ihe.1382305$35.51...@news4.tin.it...

Intanto, quando rispondi, scrivi quello che devi scrivere, nella parte bassa
del tread,
vale a dire dopo il quoting.
..
Vai in Strumenti>Utilitą Database>Compatta e ripristina DAtabase
Napoleone


title: Come applicare tariffe diverse in un intervallo di data?

author: MB

text:
Provo a ripostare un quesito gia posto circa 20 giorni fa ancora insoluto.
Sergio Mazza diceva che il problema è risolvibile con VBA e Recordset, ed io
da allora ci sto studiando, ma non riesco a venirne fuori.
Il problema e' che non trovo un algoritmo logico da applicare per poi
ricavarne il codice VBA.
Qualcuno può aiutarmi?
E' davvero possibile farlo?
Mi conviene chiedere aiuto per l'algoritmo in un altro newsgroup?
Grazie
Maurizio
Riposto:
Ho necessita' di risolvere un "piccolo" problema in ACCESS
Ho un DB con 2 tabelle
La prima è composta da 2 campi data che rappresentano un intervallo
temporale in cui e' dovuto il pagamento di una tariffa
La seconda e' composta da 2 campi data ed un campo valuta che rappresentano
l'intervallo temporale in cui applicare la specifica tariffa giornaliera
indicata nel campo valuta.
Il numero di record nella seconda tabella non è costante ma soggetto ad
ulteriori inserimenti.
Ora io ho bisogno di determinare per l'intervallo della prima tabella la
tariffa complessiva applicando per ogni periodo temporale della seconda
tabella la relativa tariffa giornaliera
Cioe'
Tabella 1
01/01/1999   01/08/2005
01/01/2000   31/12/2005
07/04/1999   05/05/2005
....
....
Tabella 2
01/01/1998  31/12/1999   Euro 1,51
01/01/2000  31/05/2004   Euro 2,15
01/06/2005  31/12/2006   Euro 3,24
....
....
Ora io devo calcolare il totale della tariffa ad esempio nel periodo
01/01/1999 01/08/2005 applicando le tariffe della tabella 2 quindi Euro 1,51
al giorno nell'intervallo 01/01/1999 - 31/12/1999, Euro 2,15 al giorno
nell'intervallo 01/01/2000 - 31/05/2004 e Euro 3,24 al giorno
nell'intervallo 01/06/2005 - 01/08/2005.
Come faccio??
Grazie dell'aiuto...
Maurizio


author: Cinzia

text:
"MB" <
x...@nomail.it
> ha scritto nel messaggio
news:44d6ea8d$0$35081$4faf...@reader4.news.tin.it...

Ciao Maurizio,
vedi un po'  se un algoritmo  del genere può andare bene, come vedi è un
algoritmo scritto in pseudo-VB
lascio a te mettere a posto sintatticamente il tutto!
Apri il recordset su tabella1
While not rs.eof
    dataInizio = rs.Fields(0)
    Datafine = rs.Fields(1)
    curdata=DataInizio
    TariffaTotale=0
    While curdata<DataFine
            TariffaTotale=GetTariffa(curdata)
            curdata=Curdata+1
   Wend
rs.movenext
wend
Chiudi il recordsdset
Function GetTariffa(data as date ) as Currency
    dim rs as Dao.recordset
    rs.Open ("Select Tariffa Form Tabella2 where " & data &  " Between
DataInizioTariffa AND DataFineTariffa")
    if not rs.eof then
        GetTariffa=rs.fields(0)
   else
        GetTariffa=0
    end if
end Function
--
Cinzia
---------------------------------------
|
http://www.riolab.org
  |
--------------------------------------->


author: mb

text:
"Cinzia" <
cinziapagani_...@tiscali.it
> ha scritto nel messaggio
news:44d6ee52$0$999$5fc...@news.tiscali.it...

Grazie Cinzia
Sei stata davvero esauriente e rapida nella risposta
Quando torno dalle ferie cerco di "aggiustare" il codice e spero che
funzioni
Grazie ancora
Ciao
Maurizio


text:
"Cinzia" <
cinziapagani_...@tiscali.it
> ha scritto nel messaggio
news:44d6ee52$0$999$5fc...@news.tiscali.it...
>
> Apri il recordset su tabella1
> While not rs.eof
>    dataInizio = rs.Fields(0)
>    Datafine = rs.Fields(1)
>    curdata=DataInizio
>    TariffaTotale=0
>    While curdata<DataFine
>            TariffaTotale=GetTariffa(curdata)
>            curdata=Curdata+1
>   Wend
> rs.movenext
> wend
> Chiudi il recordsdset
>
Ok per questa parte non ci sono problemi
> Function GetTariffa(data as date ) as Currency
>    dim rs as Dao.recordset
>    rs.Open ("Select Tariffa Form Tabella2 where " & data &  " Between
> DataInizioTariffa AND DataFineTariffa")
>    if not rs.eof then
>        GetTariffa=rs.fields(0)
>   else
>        GetTariffa=0
>    end if
> end Function
questa funzione non riesco a crearla, non riesco a capire come deve
funzionare
il fatto č che non sono bravo in programmazione vba ma ho sempre errori
oppure non funziona come dovrebbeů
un aiuto??
Grazie Maurizio


text:
"mb" <
m...@nomail.it
> ha scritto nel messaggio
news:44da1945$0$988$5fc...@news.tiscali.it...

Caio Maurizio,
posta quello che hai fatto e descrivi l'errore che ottieni
Ciao



text:
"Cinzia" <
cinziapagani_...@tiscali.it
> ha scritto nel messaggio
news:44da5765$0$1004$5fc...@news.tiscali.it...
>
>
> Caio Maurizio,
> posta quello che hai fatto e descrivi l'errore che ottieni
>
> Ciao
> --
> Cinzia
> ---------------------------------------
> |
http://www.riolab.org
  |
> --------------------------------------->
>
Io ho fatto in questo modo,
ma il risultato non è incoraggiante
ciao e grazie dell'aiuto
Maurizio
Nome Database db1
Tabella1
campo1 = DataArrivo
campo2 = DataPartenza
campo3 = TariffaTotale
Tabella2
campo1 = DataInizioTariffa
campo2 = DataFineTariffa
campo3 = Tariffa
Dim DataInizioTariffa As Date
   Dim DataFineTariffa As Date
   Dim dbscurrent As Database
   Dim rs As DAO.Recordset
   Dim Tariffa As Currency
   Dim datacorrente As Date
   Set rs = CurrentDb.OpenRecordset("Tabella1")
While rs.EOF = False
    DataArrivo = rs.Fields(0)
    DataPartenza = rs.Fields(1)
    Tariffa = rs.Fields(2)
    datacorrente = DataArrivo
    TariffaTotale = 0
       While datacorrente < DataPartenza
       TariffaTotale = GetTariffa(datacorrente)
       datacorrente = datacorrente + 1
       Wend
    rs.MoveNext
Wend
    rs.Close
   End Sub
Function GetTariffa(datas As Date) As Currency
    Dim rs As Recordset
    Dim DataInizioTariffa As Date
    Dim DataFineTariffa As Date
    Dim Tariffa As Currency
    rs.OpenRecordset "Select Tariffa FROM Tabella2 WHERE" & datas & "BETWEEN
DataInizioTariffa AND DataFineTariffa"
    If Not rs.EOF Then
        GetTariffa = rs.Fields(2)
    Else
        GetTariffa = 0
    End If
End Function
in questo modo ho sempre errore in
    rs.OpenRecordset "Select Tariffa FROM Tabella2 WHERE" & datas & "BETWEEN
DataInizioTariffa AND DataFineTariffa"
che tra l'altro è la parte che non riesco a capire come funziona
bye


text:
> >
> Io ho fatto in questo modo,
> ma il risultato non č incoraggiante

> che tra l'altro č la parte che non riesco a capire come funziona
>
>
> bye
>
Ciao MAurizio
inizia a provare cosě e fammi sapere
Function GetTariffa(datas As Date) As Currency
>>>>     Dim rs As new Dao.Recordset
>     Dim DataInizioTariffa As Date
>     Dim DataFineTariffa As Date
>     Dim Tariffa As Currency
>
>>>>    set  rs = CurrentDb.OpenRecordset( "Select Tariffa FROM Tabella2
WHERE " & datas & " BETWEEN  DataInizioTariffa AND DataFineTariffa",
dbOpenSnapShot, dbReadonly)
>>>>>Attenzione agli spazi dopo WHERE e prima di Between
>
>     If Not rs.EOF Then
>>>>>        GetTariffa = rs.Fields(0)      'Il campo 2 non esiste se nella
select metti solo Tariffa
>     Else
>         GetTariffa = 0
>     End If
    rs.close()
    set rs = nothing
> End Function


text:
"Cinzia" <
cinziapagani_...@tiscali.it
> ha scritto nel messaggio
news:44db65ac$0$996$5fc...@news.tiscali.it...
>
>> >mAurizio
> inizia a provare cosě e fammi sapere
>
> Function GetTariffa(datas As Date) As Currency
>>>>>     Dim rs As new Dao.Recordset
Questo mi da errore; ho eliminato new
>>     Dim DataInizioTariffa As Date
>>     Dim DataFineTariffa As Date
>>     Dim Tariffa As Currency
>>
>>>>>    set  rs = CurrentDb.OpenRecordset( "Select Tariffa FROM Tabella2
> WHERE " & datas & " BETWEEN  DataInizioTariffa AND DataFineTariffa",
> dbOpenSnapShot, dbReadonly)
>
>>>>>>Attenzione agli spazi dopo WHERE e prima di Between
>
>>
>>     If Not rs.EOF Then
>>>>>>        GetTariffa = rs.Fields(0)      'Il campo 2 non esiste se nella
> select metti solo Tariffa
>>     Else
>>         GetTariffa = 0
>>     End If
>    rs.close()
>    set rs = nothing
>> End Function
>
Ciao Cinzia
Purtroppo ancora non va:
Alla esecuzione della routine i campi della tabella1 DataArrivo e
DataPartenza si modificano e si azzerano all'anno 1900
ma di determinare la tariffa non se ne parla.
Ciao e grazie dell'interessamento..
Maurizio


text:
"MB" <
nom...@nomail.it
> ha scritto nel messaggio
news:44db8e8f$0$35084$4faf...@reader4.news.tin.it...

Ciao Maurizio,
ehmmm  c'č qualcosa da sistemare anche nella prima parte
   Dim DataInizio as date
Dim dataFine as Date
   Dim rs As DAO.Recordset
   Dim Tariffa As Currency
   Dim datacorrente As Date
   Set rs = CurrentDb.OpenRecordset("Tabella1")
While not rs.EOF
    DataInizio = rs.Fields(0)
    DataFine = rs.Fields(1)
    datacorrente = DataInizio
   TariffaTotale = 0
       While datacorrente < DataFine
           TariffaTotale = TariffaTotale + GetTariffa(datacorrente)
           datacorrente = datacorrente + 1
       Wend
    rs.Fields(2) = tariffaTotale
    rs.Update
    rs.MoveNext
Wend
    rs.Close
   End Sub
vedi di seguire con il debug  (F9 sulla riga dove vuoi interrombere e poi F8
per seguire passo passo) cosa succede per capire eventualmente dove si
pianta o dov'č l'errore



text:
"Cinzia" <
cinziapagani_...@tiscali.it
> ha scritto nel messaggio
news:44dbabe3$0$993$5fc...@news.tiscali.it...
>
>
>
> vedi di seguire con il debug  (F9 sulla riga dove vuoi interrombere e poi
> F8
> per seguire passo passo) cosa succede per capire eventualmente dove si
> pianta o dov'è l'errore
>
> --
> Cinzia
> ---------------------------------------
> |
http://www.riolab.org
  |
> ---------------------------------------
>
Ciao Cinzia,
Ho riscritto (come tu dicevi) così le due routine
Dim DataInizio As Date
Dim DataFine As Date
Dim rs As DAO.Recordset
Dim Tariffa As Currency
Dim DataCorrente As Date
Set rs = CurrentDb.OpenRecordset("Tabella1")
While Not rs.EOF
    DataInizio = rs.Fields(0)
    DataFine = rs.Fields(1)
    DataCorrente = DataInizio
    Tariffa = 0
**       While DataCorrente < DataFine
       Tariffa = Tariffa + GetTariffa(DataCorrente)
       DataCorrente = DataCorrente + 1
       Wend
    rs.Edit
    rs.Fields(2) = Tariffa
    rs.Update
    rs.MoveNext
Wend
    rs.Close
    Set rs = Nothing
   End Sub
Function GetTariffa(datas As Date) As Currency
    Dim rs As Recordset
    Dim DataInizioTariffa As Date
    Dim DataFineTariffa As Date
    Dim Tariffa As Currency
    Set rs = CurrentDb.OpenRecordset("Select Tariffa FROM Tabella2 WHERE " &
datas & " BETWEEN  DataInizioTariffa AND DataFineTariffa", dbOpenSnapshot,
dbReadOnly)
    If Not rs.EOF Then
        GetTariffa = rs.Fields(0)
    Else
        GetTariffa = 0
    End If
    rs.Close
    Set rs = Nothing
End Function
Ora Le routine scorrono regolarmente e senza errori ma il campo Tariffa
resta sempre uguale a zero.
Ciao e grazie dell'aiuto e della disponibilità che mi stai offrendo
ciao Maurizio


text:
>
> Ora Le routine scorrono regolarmente e senza errori ma il campo Tariffa
> resta sempre uguale a zero.
>
> Ciao e grazie dell'aiuto e della disponibilitą che mi stai offrendo
>
> ciao Maurizio
>
Il problema č nella funzione perchč dopo l'esecuzione di:
Set rs = CurrentDb.OpenRecordset("Select Tariffa FROM Tabella2 WHERE " &
datas & " BETWEEN  DataInizioTariffa AND DataFineTariffa", dbOpenSnapshot,
dbReadOnly)
il recordset non si apre e nella If Else Thenviene esguita sempre
l'istruzione Else GetTariffa=0
    If Not rs.EOF Then
        GetTariffa = rs.Fields(0)
    Else
        GetTariffa = 0  (Viene sempre eseguita questa funzione)


text:
"MB" <
nom...@nomail.it
> ha scritto nel messaggio
news:44dc931b$0$35074$4faf...@reader4.news.tin.it...
>
> >
> > Ora Le routine scorrono regolarmente e senza errori ma il campo Tariffa
> > resta sempre uguale a zero.
> >
> > Ciao e grazie dell'aiuto e della disponibilità che mi stai offrendo
> >
> > ciao Maurizio
> >
> Il problema è nella funzione perchè dopo l'esecuzione di:
>
> Set rs = CurrentDb.OpenRecordset("Select Tariffa FROM Tabella2 WHERE " &
> datas & " BETWEEN  DataInizioTariffa AND DataFineTariffa", dbOpenSnapshot,
> dbReadOnly)
>
> il recordset non si apre e nella If Else Thenviene esguita sempre
> l'istruzione Else GetTariffa=0
>
>     If Not rs.EOF Then
>         GetTariffa = rs.Fields(0)
>     Else
>         GetTariffa = 0  (Viene sempre eseguita questa funzione)
>
Ciao Maurizio,
bene iniziamo a circoscrivere il problema...
iniziamo a vedere se la query restituisce quello che vogliamo
vai nelle query nuova query e in visualizza SQL incolli  la select
Select Tariffa FROM Tabella2 WHERE   [datas ]   BETWEEN  DataInizioTariffa
AND DataFineTariffa
ed esegui quando ti chiede il parametro metti la data che vuoi controllare e
vediamo cosa ottieni se ottieni un valore corretto siamo a cavallo...
Tieni presente che le date devono essere passate nel formato "yyyy/mm/dd"
per cui il problema potrebbe essere questo che la data non viene
interpretatata correttamente, eventualmente prova a cambiare così nel
codice:
Set rs = CurrentDb.OpenRecordset("Select Tariffa FROM Tabella2 WHERE #" &
  Format(datas, "yyyy/mm/dd")  & "#  BETWEEN  DataInizioTariffa AND
DataFineTariffa", dbOpenSnapshot,
  dbReadOnly)
--



text:
"Cinzia" <
cinziapagani_...@tiscali.it
> ha scritto nel messaggio
news:44dcaf28$0$984$5fc...@news.tiscali.it...
>
>
> Ciao Maurizio,
> bene iniziamo a circoscrivere il problema...
> iniziamo a vedere se la query restituisce quello che vogliamo
> vai nelle query nuova query e in visualizza SQL incolli  la select
> Select Tariffa FROM Tabella2 WHERE   [datas ]   BETWEEN  DataInizioTariffa
> AND DataFineTariffa
> ed esegui quando ti chiede il parametro metti la data che vuoi controllare
> e
> vediamo cosa ottieni se ottieni un valore corretto siamo a cavallo...
>
> Tieni presente che le date devono essere passate nel formato "yyyy/mm/dd"
> per cui il problema potrebbe essere questo che la data non viene
> interpretatata correttamente, eventualmente prova a cambiare così nel
> codice:
>
> Set rs = CurrentDb.OpenRecordset("Select Tariffa FROM Tabella2 WHERE #" &
>  Format(datas, "yyyy/mm/dd")  & "#  BETWEEN  DataInizioTariffa AND
> DataFineTariffa", dbOpenSnapshot,
>  dbReadOnly)
>
>
>
> --
> Cinzia
> ---------------------------------------
!!!!!!!!!!!!!!!!!!! FUNZIONA   !!!!!!!!!!!!!!!!
Grazie Cinzia
Funziona perfettamente non ci credo ma nelle prove finora fatte va
perfettamente
Ti ringrazio moltissimo per il tempo perso "appresso" a me sei davvero bravo
anche a spiegare perche' tutto il codice ora l'ho anche capito.
ciao e grazie ancora
Alla fine è cosi'
Nome Database db1
Tabella1
campo1 = DataArrivo
campo2 = DataPartenza
campo3 = TariffaTotale
Tabella2
campo1 = DataInizioTariffa
campo2 = DataFineTariffa
campo3 = Tariffa
Dim DataInizio As Date
Dim DataFine As Date
Dim rs As DAO.Recordset
Dim Tariffa As Currency
Dim DataCorrente As Date
Set rs = CurrentDb.OpenRecordset("Tabella1")
While Not rs.EOF
    DataInizio = rs.Fields(0)
    DataFine = rs.Fields(1)
    DataCorrente = DataInizio
    Tariffa = 0
       While DataCorrente < DataFine
       Tariffa = Tariffa + GetTariffa(DataCorrente)
       DataCorrente = DataCorrente + 1
       Wend
    rs.Edit
    rs.Fields(2) = Tariffa
    rs.Update
    rs.MoveNext
Wend
    rs.Close
    Set rs = Nothing
   End Sub
Function GetTariffa(datas As Date) As Currency
    Dim rs As Recordset
    Dim DataInizioTariffa As Date
    Dim DataFineTariffa As Date
    Dim Tariffa As Currency
   Set rs = CurrentDb.OpenRecordset("Select Tariffa FROM Tabella2 WHERE #" &
Format(datas, "yyyy/mm/dd") & "#  BETWEEN  DataInizioTariffa AND
DataFineTariffa", dbOpenSnapshot, dbReadOnly)
    If Not rs.EOF Then
        GetTariffa = rs.Fields(0)
    Else
        GetTariffa = 0



text:

Ciao  Maurizio,
ci abbiamo messo un po' ma alla fine ce l'abbiamo fatta!
Grazie del feedbak.



title: operazioni matematiche su campi valuta

author: Maria Rossi

text:
ho 3 campi : importoA, importoB, importoC su cui vorrei eseguire delle
operazioni mail prg non fa niente !
ecco quello ke mi piacerebbe realizzare !
if importoA > 100 then
     importoB = importoA - 100
         (l'importoB è dato dalla differenza tra importoA e 100)
     importoC = 100
         (l'importoC visualizzerà il valore 100)
   else
     importoC = 100
         (l'importoC visualizzerà il valore 100)
alla fine sul video avrò tre risultati
importoA -  importoB - importoC
non è ke x caso mi date una dritta?
tutti e tre i campi sono caselle di testo - valuta con 2 decimali.

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


title: operazioni matematiche su campi valuta

author: The-real-Isaac

text:
"Maria Rossi" <
gelso...@alfemminile.com
> ha scritto nel messaggio
news:0fbc3904ea021689a97...@mygate.mailgate.org...

Sembra strano...
tu questo codice l'hai inserito all'interno dell'evento 'Dopo aggiornamento'
della casella di testo 'importoA', vero?
Ciao
--
Alberto


title: FILE *.MDB INDIPENDENTI?

author: MM

text:
E' possibile aprire una tabella per inserire dei dati in un file mdb senza
avere installato sul proprio pc Access??


title: FILE *.MDB INDIPENDENTI?

author: Maurizio Borrelli

text:
> "MM" <
portor...@hotmail.com
> ha scritto nel messaggio
> news:itEZ9.97986$0v.28...@news1.tin.it...
> E' possibile aprire una tabella per inserire dei dati in un file mdb senza
> avere installato sul proprio pc Access??
    Si'. Per mezzo di un qualsiasi programma applicativo (Excel, Word, ...),
ambiente/linguaggio di sviluppo (Visual Basic, Delphi, ...) o programma per
la gestione di database (SQLServer, MySQL, ...) che lo consenta.
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


title: FILE *.MDB INDIPENDENTI?

text:
Purtroppo ho sbagliato a formulare la domanda.
Volevo sapere se con Access si puo' costruire un programmino di inserimento
dati che funzioni poi in modo autonomo su un qualsiasi PC senza aver
necessariamente installato Access.
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:b17foq$103nco$1...@ID-52090.news.dfncis.de...



title: FILE *.MDB INDIPENDENTI?

author: Roberto da casa

text:
"MM" <
portor...@hotmail.com
> ha scritto nel messaggio
news:h6QZ9.134860$AA2.5...@news2.tin.it...
> Purtroppo ho sbagliato a formulare la domanda.
> Volevo sapere se con Access si puo' costruire un programmino di
inserimento
> dati che funzioni poi in modo autonomo su un qualsiasi PC senza aver
> necessariamente installato Access.
>
Quando rispondi scrivi DOPO e non prima del testo dei messaggi precedenti.
Puoi farlo solo se tu possiedi la versione Developer di Access con la quale
produrrai la versione run-time del tuo database che così potrà essere
eseguito su un PC che non abbia installato Access.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: FILE *.MDB INDIPENDENTI?

text:
> > Purtroppo ho sbagliato a formulare la domanda.
> > Volevo sapere se con Access si puo' costruire un programmino di
> inserimento
> > dati che funzioni poi in modo autonomo su un qualsiasi PC senza aver
> > necessariamente installato Access.
> >
>
> Quando rispondi scrivi DOPO e non prima del testo dei messaggi precedenti.
>
> Puoi farlo solo se tu possiedi la versione Developer di Access con la
quale
> produrrai la versione run-time del tuo database che così potrà essere
> eseguito su un PC che non abbia installato Access.
Scusami ancora, questa versione developer e' un programma a parte oppure e'
una funzione di Access nascosta in qualche sottomenu? In parole povere dove
trovo developer?
mauro



title: FILE *.MDB INDIPENDENTI?

text:
"MM" <
portor...@hotmail.com
> ha scritto nel messaggio
news:rU9_9.104231$0v.30...@news1.tin.it...
[CUT]
>
> Scusami ancora, questa versione developer e' un programma a parte oppure
e'
> una funzione di Access nascosta in qualche sottomenu?
Developer è una versione particolare di Access che ti permette anche di
produrre il runtime di un database che sarà il grado di essere eseguito
anche in PC nei quali non è installato Access.
> In parole povere dove trovo developer?
Lo trovi presso il tuo rivenditore di software che sarà lieto di cedertelo
in cambio di tanti soldini. ;-)



title: Imprtare file di testo...

author: Romeo

text:
Salve a tutti,
vorrei sapere se qualcuno mi può aiutare visto che ho un file di testo che
devo trasformare in tabella access!!! Mi spiego: questo file ha circa 10.000
righe e su una riga è scritto qualcosa tutto attaccato, il mio problema è
interrompere quando dico io e riprendere quando dico io da una certa
posizione. Es.
File di testo:
provacontrotuttiperquestadifficoltàassurdapago10000euro
allora il mio risultato dovrà essere:
prova (in un campo) contro (in un campo) tutti (in un campo) etc.etc.
e poi ancora lo stesso con le righe sotto.
Grazie non so proprio come fare !!


title: Imprtare file di testo...

author: SR

text:
On Tue, 24 Feb 2004 21:09:20 GMT, Romeo wrote:
> Salve a tutti,
> vorrei sapere se qualcuno mi può aiutare visto che ho un file di testo che
> devo trasformare in tabella access!!! Mi spiego: questo file ha circa 10.000
> righe e su una riga è scritto qualcosa tutto attaccato, il mio problema è
> interrompere quando dico io e riprendere quando dico io da una certa
> posizione. Es.
>
>
> File di testo:
>
> provacontrotuttiperquestadifficoltàassurdapago10000euro
>
Ma il file è a larghezza fissa? Cioé il campo prova occupa5 spazi, se
scrivo prov devo mettere uno spazio prima del campo successivo, se scrivo
pro due? Altrimenti con quale criterio capisci quando passare al campo
successivo?
P.S.: Mi bastano 9000 euro


title: Imprtare file di testo...

text:
"Romeo" <
romeo.tr...@tin.it
> ha scritto nel messaggio
news:44P_b.23810$IT2.7...@news4.tin.it...
> Salve a tutti,
> vorrei sapere se qualcuno mi può aiutare visto che ho un file di testo che
> devo trasformare in tabella access!!! Mi spiego: questo file ha circa
10.000
> righe e su una riga è scritto qualcosa tutto attaccato, il mio problema è
> interrompere quando dico io e riprendere quando dico io da una certa
> posizione. Es.
>
>
> File di testo:
>
> provacontrotuttiperquestadifficoltàassurdapago10000euro
>
senza separatori o larghezza fissa la vedo difficile, a meno che tu non
abbia una tabella contenenti tutte le parole possibili che possano capitare
in quel testo, e poi partendo la primo carattere vai a trovare una
corrispondenza in quella tabella "dizionario".
trovata la corrispondenza, sai esattamente la lunghezza della parola trovata
e perciò il punto di partenza per rintracciare la seconda parola.. e poi
sempre così..
Così l'importazione da file di testo risulta essere molto semplice... ma la
codifica è INCAZZATA da fare...
io con 8000 faccio ;)


title: Funzione DateAdd

author: cidi

text:
Ciao a tutti
Nell'origine record di una casella di testo ho inserito: =DateAdd("d", 30,
[DataScarico])che viene trasformato in: =DateAdd("\d";30;[DataScarico])
...risultato #Errore perchč? eppure la sintassi sembra giusta visto l'help e
la montagna di post su google
Cosa Sbaglio? uso A2k sp1
grazie
Daniele


title: Funzione DateAdd

author: Karl Donaubauer

text:
cidi ha scritto:
> Nell'origine record di una casella di testo ho inserito: =DateAdd("d", 30,
> [DataScarico])che viene trasformato in: =DateAdd("\d";30;[DataScarico])
> ...risultato #Errore perchè? eppure la sintassi sembra giusta visto l'help
e
> la montagna di post su google
> Cosa Sbaglio? uso A2k sp1
Siamo tutti italiani qui. Di solito anche la versione di Access. Quindi:
=DateAdd("g";30;[DataScarico])
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


title: Funzione DateAdd

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:bnd879$v3fv4$3...@ID-46617.news.uni-berlin.de...
> cidi ha scritto:
> > Nell'origine record di una casella di testo ho inserito: =DateAdd("d",
30,
> > [DataScarico])che viene trasformato in: =DateAdd("\d";30;[DataScarico])
> > ...risultato #Errore perchč? eppure la sintassi sembra giusta visto
l'help
> e
> > la montagna di post su google
> > Cosa Sbaglio? uso A2k sp1
>
> Siamo tutti italiani qui. Di solito anche la versione di Access. Quindi:
> =DateAdd("g";30;[DataScarico])
>
> --
> HTH
> Karl
> *********
> Access-FAQ (tedesco):
http://www.donkarl.com
>
Grazie Karl
Ti devo un petroJolly da spendere nel prossimo raduno del NG :-))))
Daniele


title: Importa su word

author: Mary

text:
Perchè quando faccio una importazione su word di un report i rettangoli non
vengono disegnati. Cosa devo fare per farli diegnare automaticamente?
Grazie Alessandro


title: Importa su word

text:
"Mary" <
miss...@hotmail.com
> ha scritto nel messaggio
news:hFTj7.84336$TS4.6...@news2.tin.it...

Purtroppo è impossibile.
Unica strada il viever dei report di Access. Anche chi li guarda deve avere
il viever.
Ciao, Carlo


title: sottoreport consecutivi

text:
Ciao,
in un report di access 2007 ho 2 sottoreport

dettagliomateriale1
dettagliomateriale2

mettendoli uno sotto l' altro quando non è presente un record in dettagliomateriale1 mi rimane uno spazio vuoto,

ma c'è la possibilità di visualizzare in modo consecutivo i record dei due sottoreport.

campi di dettagliomateriale1  "materiale"  "prezzo"  "quantita"  "totale"
campi di dettagliomateriale2  "materiale2"  "prezzo"  "quantita"  "totale"

grazie ciccio


title: sottoreport consecutivi

text:
mb0...@gmail.com
 wrote:
> in un report di access 2007 ho 2 sottoreport
>
> dettagliomateriale1
> dettagliomateriale2
>
> mettendoli uno sotto l' altro quando non � presente un record in
> dettagliomateriale1 mi rimane uno spazio vuoto,
>
> ma c'� la possibilit� di visualizzare in modo consecutivo i record
> dei due sottoreport.
>
> campi di dettagliomateriale1  "materiale"  "prezzo"  "quantita"
> "totale"
> campi di dettagliomateriale2  "materiale2"  "prezzo"  "quantita"
> "totale"

Forse ti basta impostare la propriet� "Riducibile" del controllo
sottomaschera
e della sezione nella quale si trova a "S�".

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


title: ancora elenco record

author: Simone

text:
Ciao  a tutti,
ho provato ad utilizzare comi mi avete consigliato il seguente codice:
Set EleCli = WinTra.OpenRecordset("SELECT DISTINCT [TRASPORTI
EFFETTUATI].IDCOMMITTENTE FROM [TRASPORTI EFFETTUATI] GROUP BY [TRASPORTI
EFFETTUATI].IDCOMMITTENTE, [TRASPORTI EFFETTUATI].DATA HAVING (((([TRASPORTI
EFFETTUATI].DATA)>= " & Converti(Forms![EMET_FATT]![PER_DAL]) & ")) AND
((([TRASPORTI EFFETTUATI].DATA)<= " & Converti(Forms![EMET_FATT]![PER_DAL])
& ")));")
EleCli.MoveFirst
dove converti è una funzione per rendere le date in formato americano
quando eseguo il codice mi visualizza un messaggio d'errore del tipo: nessun
record corrente
perchè


title: ancora elenco record

author: Ste

text:
Converti(Forms![EMET_FATT]![PER_DAL]
prova a definire la data come una stringa, cioč:
dim data, data2 as date
data=Converti(Forms![EMET_FATT]![PER_DAL])
data2 = "#" & moth(data) & "/" & day(data) & "/" & year(data) & "#"
..... HAVING (((([TRASPORTI > EFFETTUATI].DATA)>= " & data & "))
"Simone" <
simon...@tin.it
> ha scritto nel messaggio
news:QLVH7.77946$sq5.3...@news.infostrada.it...
> Ciao  a tutti,
> ho provato ad utilizzare comi mi avete consigliato il seguente codice:
> Set EleCli = WinTra.OpenRecordset("SELECT DISTINCT [TRASPORTI
> EFFETTUATI].IDCOMMITTENTE FROM [TRASPORTI EFFETTUATI] GROUP BY [TRASPORTI
> EFFETTUATI].IDCOMMITTENTE, [TRASPORTI EFFETTUATI].DATA HAVING
(((([TRASPORTI
> EFFETTUATI].DATA)>= " & Converti(Forms![EMET_FATT]![PER_DAL]) & ")) AND
> ((([TRASPORTI EFFETTUATI].DATA)<= " &
Converti(Forms![EMET_FATT]![PER_DAL])
> & ")));")
> EleCli.MoveFirst
>
> dove converti č una funzione per rendere le date in formato americano
> quando eseguo il codice mi visualizza un messaggio d'errore del tipo:
nessun
> record corrente
> perchč
>
>


title: ancora elenco record

author: Antonio Biso

text:
Simone <
simon...@tin.it
> wrote in message
QLVH7.77946$sq5.3...@news.infostrada.it...



title: ancora elenco record

text:
Simone <
simon...@tin.it
> wrote in message
QLVH7.77946$sq5.3...@news.infostrada.it...

Perchè evidentemente il recordset che hai aperto non contiene record. Visto
che hai messo un criterio forse nessun record soddisfa il criterio della
data inserito.
Antonio


title: ancora elenco record

text:
Simone <
simon...@tin.it
> wrote in message
QLVH7.77946$sq5.3...@news.infostrada.it...

Perchè evidentemente il recordset che hai aperto non contiene record. Visto



title: ancora elenco record


title: Contenuto di una directory in tabella

author: Old-Jack

text:
Salve a tutti,
vorrei inserire in una tabella di access il contenuto di una directory.....
ovvero in un campo testo di una tabella deve essere inserito il nome di un
file presente in
una tabella, naturalmente ogni record della tabella deve contenere il nome
di un file.
Chi sa aiutarmi?
Grazie.
Old-Jack.


title: Contenuto di una directory in tabella

author: Alessandro

text:
"Old-Jack" <
spi...@libero.it
> wrote in message
news:hsMI8.21957$
8x3.4...@twister1.libero.it

Il tutto è tratto dal DEMO "VIEWER" pubblicato sul S.C. da S.Savoldi
Function FillTable(TblName as string, PathName as string)
       Dim Rst as Dao.Recordset
       Dim i as Integer
       Set Rst = CurrentDb.OpenRecordset(TblName)
          With Application.FileSearch
              .NewSearch
              .LookIn = PathName
              ' La seguente costante, introdotta per aggirare un bug di
Win ME,
              ' è una cortesia di Sergio Mazza e Roberto Massoni :-)
              .FileType = msoFileTypeAllFiles
              ' Sostituisce  .FileName = "*.*"
              '
              If .Execute > 0 Then
                  For I = 1 To .FoundFiles.Count
                      'Memorizza i percorsi degli oggetti nell'archivio
come
                      'collegamenti ipertestuali nel formato:
NomeLink#<Percorso link>#
                      'in tal modo verrà visualizzato solo il NOME del
collegamento
                      Rst.AddNew
                      Rst!Path = Dir(.FoundFiles(I)) & "#" &
.FoundFiles(I) & "#"
                      Rst.Update
                  Next I
              Else
                  MsgBox "La cartella è vuota", vbCritical, ""
              End If
          End With
       Set Rst = Nothing
End Function
Alessandro.@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Contenuto di una directory in tabella

text:
"Alessandro" <
ik2...@libero.it
> wrote in message
news:6495edb8a50bf6373b...@mygate.mailgate.org...

Grazie tante Alessandro, ora mi metto a provarlo.
Ciao
  Old-Jack.


title: Programmazione produzione

author: Sfabbri

text:
Sono un responsabile amministrativo in un' Azienda industriale, che esegue
stampaggio
di materie plastiche. Avendo l' Azienda problemi di programmazione della
produzione,
ho pensato di creare un piccolo programmino con Access 2000 per 'l'
inserimento ordini,
l' assegnazione a uqesti di priorità, la visualizzazione di questi su un
diagramma di GANTT.
Secondo Voi può funzionare, oppure, vista la gran quantità di dati da
gestire, sarebbe opportuno affidarsi ad u gestionale completo ?
Grazie e complimenti per la completezza e la chiarezza del NG


title: Programmazione produzione

author: Massimo

text:
"Sfabbri" <
sfa...@supereva.it
> ha scritto nel messaggio
news:3be25...@news.dada.it...

Secondo me, access è uno dei migliori gestionali attualmente sul commercio,
poi sicuramente ognuno pesa con la sua bilancia, io personalmente utilizzo
DB con 40.000 record e non fa assolutamente una piega, avendo risultati
eccellenti.
Max


title: Programmazione produzione

author: Sergio MAZZA

text:
"Sfabbri" <
sfa...@supereva.it
> ha scritto nel messaggio
news:3be25...@news.dada.it...

Un'altra qualità di access, forse passata inosservata, è il tempo ridotto
per lo sviluppo/manutenzione di applicazioni (ben progettate)...
Ciao.


title: Programmazione produzione

author: Alfredo Persivale

text:
"Sfabbri" <
sfa...@supereva.it
> wrote in message
> di materie plastiche. Avendo l' Azienda problemi di programmazione della
> produzione,
> ho pensato di creare un piccolo programmino con Access 2000 per 'l'
> inserimento ordini,
> l' assegnazione a uqesti di priorità, la visualizzazione di questi su un
> diagramma di GANTT.
> Secondo Voi può funzionare, oppure, vista la gran quantità di dati da
> gestire, sarebbe opportuno affidarsi ad u gestionale completo ?
Il "piccolo programmino" puo' portarti via tutti i tuoi sabati e domeniche dei
prossimi due anni.
Mi sono trovato nella stessa situazione, devi valutare queste cose:
1) tempo
2) tempo
3) tempo
4) Se sul mercato esiste un verticale adatto alla tua realta', e' probabile che
molti dei problemi che tu scoprirai nel corso della programmazione dei prossimi
due anni siano gia' stati risolti.
L'esame dei programmi esistenti sul mercato riconduce ai punti 1, 2 e 3.
5) Sul mercato esiste un gestionale che risolve i tuoi problemi, ma costa
probabilmente di piu' di quello che fa risparmiare.
6) Se pensi di risparmiare dei soldi facendoti il programma da solo, significa
che la tua azienda ti paga troppo poco o non ha bisogno di te.
7) Access fa praticamente tutto quello che hai bisogno per gestire tutto quello
che vuoi per aziende di qualunque dimensione, tranne mostrare fancy icons sullo
schermo.
8) Se vuoi imparare a programmare perche' alla sera non c'e' niente in
televisione, benvenuto, ma se devi farlo per scrivere un gestionale che poi
userai, somma i problemi di cui ai punti 1, 2 e 3.
9) Con una certa fatica puoi trovare una softwarte house che ti segua nello
sviluppo, se il preventivo sembra interessante, raddoppia tranquillamente il
prezzo per il lavoro "finito" e customizzato.
10) Con maggior fatica puoi trovare un bravo programmatore con poco tempo
libero, puoi risparmiare dei soldi ma corri il rischio di vedere il lavoro
finito il giorno in cui la tua azienda guadagna talmente tanto da non
fregartene nulla di aumentare l'efficenza degli impianti o talmente poco da non
lasciarti tempo libero per fare altro che tribolare con le banche.
Insomma, non c'e' una soluzione magica, se quello che hai bisogno e' una
sciocchezza, dai una occhiata anche alle capacita' di programmazione di Excel,
ti stupira'.
Altrimenti valuta bene tempo e costi e fatti dare garanzie su questi due
termini.
--
Posted from
dial023.midbc.com
 [204.244.172.182]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Programmazione produzione

author: Govardo Libero

text:
"Sfabbri" <
sfa...@supereva.it
> ha scritto nel messaggio
news:3be25...@news.dada.it...

_________Massima fondamentale________
Con Access si può fare anchè il caffè, basta dedicargli molte ore, buscarsi
un più/meno grave esaurimento nervoso e trascurare qualsiasi altro lavoro
serio.
A proposito EKEKOSE' il diagramma di GANTT.
Una grigliata mista?
--
                     Angelo
------------------------------------------------------
Sito comune di it.comp.appl.access
http://www.sitocomune.com
------------------------------------------------------


title: Programmazione produzione

author: warp

text:
"Sfabbri" <
> Sono un responsabile amministrativo in un' Azienda industriale, che esegue
> stampaggio
> di materie plastiche. Avendo l' Azienda problemi di programmazione della
> produzione,
> ho pensato di creare un piccolo programmino con Access 2000 per 'l'
> inserimento ordini,
> l' assegnazione a uqesti di priorità, la visualizzazione di questi su un
> diagramma di GANTT.
> Secondo Voi può funzionare, oppure, vista la gran quantità di dati da
> gestire, sarebbe opportuno affidarsi ad u gestionale completo ?
Affidati a un gestionale completo :-)
Rimanendo in ambito Access prova a visitare questi links e vedere se trovi
quello che ti serve:
www.palomar.net
www.konsult.it
Ciao, warp


title: Programmazione produzione

text:
"Govardo Libero" <
gov...@libero.it
> ha scritto nel messaggio
news:5EAE7.285$sq5....@news.infostrada.it...

Dimenticavo tra chi fà questi lavoreti c'è un'altissima percentuale
di.....cornuti.



title: Programmazione produzione

text:
"warp
>
www.palomar.net
Mi correggo:
http://www.palomar.net/palomar2000/default.htm


title: Programmazione produzione

author: sdamy

text:
Sfabbri <
sfa...@supereva.it
> wrote in message 3be25...@news.dada.it...

Programmazione della produzione efficace deve avere:
1) Giacenze di magazzino corrette
2) Distinte Basi gestite bene
3) Piano FORECAST o ordini ben definiti
.................
................
...............
Occorre quindi avere un gestionale completo
che tocchi vari aspetti dell'azienda....
saluti
sdamy


title: URTGENTE: Trova carattere in una stringa SU REPORT

author: LUCA

text:
Ciao a tutti
Avrei la necessità di conoscere il nome di una funzione in ACCESS da
inserire in un casella di testo di un report dove posso capire se in un
particolare campo c'è un carattere ben preciso
In Excel la cosa si fa così:
=STRINGA.ESTRAI(A1;TROVA("°";A1;1);5)
In dettaglio Devo Estrarre dalla stinga A1 i 5 caratteri sucessivi alla
posizione data da "°"
Come posso scriverla in una casella di testo???
ciao
e grazie
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


author: Leo

text:
Devi scrivere : miastringa = mid(A1,Instr(1,A1,"°")+1,5)
Ciao



text:
"Leo" <
ch...@tiscali.it
> ha scritto nel messaggio
news:212Z154Z220Z198Y...@usenet.libero.it...
> Devi scrivere : miastringa = mid(A1,Instr(1,A1,"°")+1,5)
> Ciao
Ma soprattutto lo devi scrivere DOPO il quoting
Antonio


title: Backup database

author: Fabio

text:
Salve,
Tanto per cabiare chido un consiglio. La mia applicazione è qusi finita e,
per evitare perdite di dati, visto che il destinatario del db è uno alle
prime armi,ho pensato che sarebbe utile un salvataggio di un backup dei
dati, all'avvio o alla chiusura dell'applicazio. Voi cosa ne pensate e,
sopratutto come poterlo realizzare?
Fabio
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Backup database

author: Buonuomo

text:
"Fabio" <
fid...@katamail.com
> ha scritto nel messaggio
news:bcl6jk$855$1...@news.newsland.it...

Prova ad vedere FileCopy
Riesce a copiare un file anche se in uso.
Ciao, Buonuomo.


title: Backup database

author: Roberto da casa

text:
"Buonuomo" <
buon...@libero.it
> ha scritto nel messaggio
news:sLrHa.94241$Ny5.2...@twister2.libero.it...

Non è esatto ciò che dici: non si può usare l'istruzione FileCopy su un file
in uso.
Questo è ciò che si trova scritto sull'help in linea:
=========
<omissis>
Osservazioni
Se si cerca di utilizzare l'istruzione FileCopy per un file aperto, verrà
generato un errore.
<omissis>
=========
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: gestione contatti telefonici

author: spaziob

text:
Non sono un esperto.
Per una associazione di volontariato serve un database per gestire i
contatti telefonici.
Dove posso trovare qualcosa gratis?
grazie
spaziob


title: gestione contatti telefonici

author: MA

text:
"spaziob" <
spazio...@inwind.it
> ha scritto nel
messaggio
news:cd2mms$qp3$1...@newsreader.mailgate.org...

File-Nuovo- Gestione contatti.mdb
MAssimiliano


title: gestione contatti telefonici

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:7j5Jc.1923$B06...@news.edisontel.com...
>
>
> File-Nuovo- Gestione contatti.mdb
> MAssimiliano
>
Grazie


title: Report che non stampa

author: Polo

text:
Salve
Ho un maledetto report e solo quello che non riesco a stampare. Ossia a me
sembra che lo invii alla stampante ma fisicamente non lo stampa.
Dall'anteprima lancio stampa, mi esce la finestrella di creazione stampa,
sparisce e non succede piů niente, neanche un errore. Solo con questo report
(di una ventina). C'č per caso qualche evento che mi puň annullare la stampa
per qualche motivo o errore?
Grazie anticipato...


title: Report che non stampa

text:
"Polo" <
v.p...@alice.it
> ha scritto nel messaggio
news:46e13e9c$0$36445$4faf...@reader5.news.tin.it...

Ho scoperto che togliendo questo lo stampa:
Private Sub SezioneIntestazionePagina_Format(Cancel As Integer, FormatCount
As Integer)
If ConteggioQuery("TotaleRegDubbi") > 0 Then
    AvvisoTPR.Visible = True
    Dim stDocName As String
    stDocName = "Reg dubbi"
    DoCmd.OpenReport stDocName, acPreview, , , acIcon
Else
    AvvisoTPR.Visible = False
End If
differenzadata = DateSerial([Forms]![Scelte per stampa]![AnnoFinePeriodo] +
2004, 8, 20) - DMax("[Mese]", "Rapporti servizio")
If differenzadata > 0 Then
    AvvisoDatiIncompleti.Visible = True
Else
    AvvisoDatiIncompleti.Visible = False
End If
End Sub
Cosa c'č che non va?


title: Report che non stampa

author: NSantini

text:
"Polo" <
v.p...@alice.it
> ha scritto nel messaggio
news:46e141f1$0$36450$4faf...@reader5.news.tin.it...
>
> "Polo" <
v.p...@alice.it
> ha scritto nel messaggio
> news:46e13e9c$0$36445$4faf...@reader5.news.tin.it...
>> Salve
>> Ho un maledetto report e solo quello che non riesco a stampare. Ossia a
>> me sembra che lo invii alla stampante ma fisicamente non lo stampa.
>> Dall'anteprima lancio stampa, mi esce la finestrella di creazione stampa,
>> sparisce e non succede più niente, neanche un errore. Solo con questo
>> report (di una ventina). C'è per caso qualche evento che mi può annullare
>> la stampa per qualche motivo o errore?
>> Grazie anticipato...
>>
>
> Ho scoperto che togliendo questo lo stampa:
>
> Private Sub SezioneIntestazionePagina_Format(Cancel As Integer,
> FormatCount As Integer)
>
> If ConteggioQuery("TotaleRegDubbi") > 0 Then
>    AvvisoTPR.Visible = True
>    Dim stDocName As String
>    stDocName = "Reg dubbi"
>    DoCmd.OpenReport stDocName, acPreview, , , acIcon
a me (Access2003) non dà acPreview, ma acViewPreview
e poi dalla guida leggo: "acIcon Il report viene aperto ridotto a icona
sulla barra delle applicazioni di Windows"
quindi dovresti togliere acIcon
Ciao
NSAntini


title: Report che non stampa

text:
"NSantini" <
inf...@libero.it
> ha scritto nel messaggio
news:fbs7pv$sr3$1...@registered.motzarella.org...

Ho provato a mettere acViewPreview, ma non cambia niente. Quella acIcon
riguarda l'apertura di un altro report che conterrebbe dei dati da
controllare eventualmente prima della stampa del report principale. Comunque
sia anche togliendolo il problema non scompare. Se io invece tolgo il DoCmd,
apro quel report manualmente dalla finestra database e lo metto a icona, il
report principale si stampa. Sembrerebbe un buco. Oppure c'è qualcosa che
non riesco a capire. O la sub va scritta in altro modo. Che ne dite? Che
alternativa ci sarebbe per aprire automaticamente quel report da controllare
senza aver casini?
Grazie.


title: Report che non stampa

author: Access

text:
Ciao Polo,
"Polo" <
v.p...@alice.it
> ha scritto nel messaggio
news:46e2f764$0$37194$4faf...@reader3.news.tin.it...
---cut--
> Ho provato a mettere acViewPreview, ma non cambia niente. Quella acIcon
> riguarda l'apertura di un altro report che conterrebbe dei dati da
> controllare eventualmente prima della stampa del report principale.
cosa controlli?
Conteggioquery che cos'è?
forse il problema è li.
Metti dei break e vedi se tutto fila liscio.
>Comunque sia anche togliendolo il problema non scompare. Se io invece tolgo
>il DoCmd, apro quel report manualmente dalla finestra database e lo metto a
>icona, il report principale si stampa. Sembrerebbe un buco. Oppure c'è
>qualcosa che non riesco a capire. O la sub va scritta in altro modo. Che ne
>dite? Che alternativa ci sarebbe per aprire automaticamente quel report da
>controllare senza aver casini?
--
Ciao
Access


title: Report che non stampa

text:
"Access" <c...@tin.it.invalid> ha scritto nel messaggio
news:hBDEi.108710$U01.9...@twister1.libero.it...

Controllo alcuni dati che in pratica mi dicono se ha senso o no stampare il
report principale. ConteggioQuery è una funzione che ritorna il numero di
record di una query (in questo record ne calcolo un decina tutte con dei
parametri riferiti alla maschera "Scelte per stampa") per quel che riguarda
ciò funziona tutto perfettamente. Se io metto dei break, all'atto di
lanciare la stampa non me li vede perchè evidentemente non passa per questa
sub (che è sull'evento Formattazione). Ricapitolando: è solo una questione
nell'atto di stampa, perchè l'anteprima la vedo, è esatta, e non da nessun
errore! Ma non riesco a stamparla.... boh. Proverò a prendere qualche altra
strada. Se non ci sono altri consigli.... grazie comunque.


title: Report che non stampa

text:
Ciao Polo,
"Polo" <
v.p...@alice.it
> ha scritto nel messaggio
news:46e40f1a$0$4790$4faf...@reader4.news.tin.it...
>>
>
> Controllo alcuni dati che in pratica mi dicono se ha senso o no stampare
> il report principale. ConteggioQuery è una funzione che ritorna il numero
> di record di una query (in questo record ne calcolo un decina tutte con
> dei parametri riferiti alla maschera "Scelte per stampa") per quel che
> riguarda ciò funziona tutto perfettamente. Se io metto dei break, all'atto
> di lanciare la stampa non me li vede perchè evidentemente non passa per
> questa sub (che è sull'evento Formattazione). Ricapitolando: è solo una
> questione nell'atto di stampa, perchè l'anteprima la vedo, è esatta, e non
> da nessun errore! Ma non riesco a stamparla.... boh. Proverò a prendere
> qualche altra strada. Se non ci sono altri consigli.... grazie comunque.
un ultima cosa, nelle dichiarazioni generale subito dopo "option compare
database" hai messo "option explicit"?
Se non lo hai fatto, inseriscilo e prova ad avviare l'anteprima.
--
Ciao
Access


title: Data type mismatch

author: Porello

text:
Ciao a tutti
ho un problema su un database nell' esecuzione di una query di accodamento a
runtime sul pc di un mio cliente mi da un errore:Data type mismatch.
Premetto uso la stessa base dati.Non
succede nel mio pc con access installato. Uso A2000.
Help help


title: [XPOST] dll per pdf (non è la solita storia)

author: Samuele

text:
ciao a tutti,
riesco tramite access a stampare i report su pdf ed inviarli via email
il problema č che, siccome sono report fronte e retro, devo stampare prima
il fronte e poi il retro (che su access sono su report diversi) cosě ottendo
2 file .pdf distinti.
A questo punto vorrei riunirli in un unico file pdf da poter poi inviare via
email
Vorrei quindi sapere se esiste una dll o ocx capace di supplire alle
funzioni di acrobat tipo:
Inserisci pagine
Estrai pagine
sostituisci pagine
elimina pagine
ed, eventualmente anche creare i pdf
anche a pagamento
grazie
Samuele


title: Masterizzare con Nero

author: Sandrobi

text:
Qualcuno conosce il sistema per aprire Nero da Codice e lanciare la
masterizzazione dei file o cartelle che si desidera?
Ciao, Sandro


title: Masterizzare con Nero

text:
"Sandrobi" <
sand...@libero.it
> ha scritto nel messaggio
news:JxFFa.79726$Ny5.2...@twister2.libero.it...
> Qualcuno conosce il sistema per aprire Nero da Codice e lanciare la
> masterizzazione dei file o cartelle che si desidera?
> Ciao, Sandro
>
se hai installato InCD di Nero è sufficiente fare ad esempio copy *.*


title: Masterizzare con Nero

text:
"### CH v2.003 ###" <
news...@genio-af.it
> ha scritto nel messaggio
news:%sKFa.979$de....@news.edisontel.com...
>
> "Sandrobi" <
sand...@libero.it
> ha scritto nel messaggio
> news:JxFFa.79726$Ny5.2...@twister2.libero.it...
> > Qualcuno conosce il sistema per aprire Nero da Codice e lanciare la
> > masterizzazione dei file o cartelle che si desidera?
>
> se hai installato InCD di Nero è sufficiente fare ad esempio copy *.*
>
1) Io ho nero 5.5 ma InCD non sò cosa sia. Dove si trova?
2) copy *.* intendi che si può copiare su CD con un comando DOS come se
fosse un floppy?
Saluti, Sandro


title: Masterizzare con Nero

text:
"Sandrobi" <
sand...@libero.it
> ha scritto nel messaggio
news:Sh5Ga.84224$Ny5.2...@twister2.libero.it...
 [CUT]
> 1) Io ho nero 5.5 ma InCD non sò cosa sia. Dove si trova?
> 2) copy *.* intendi che si può copiare su CD con un comando DOS come se
> fosse un floppy?
1R) di solito qualdo lanci l'install  dovrebbe essere un applicazione a
parte da installare
2R) si esatto
ciao


title: cercare un record in sottomaschera da maschera

text:
ho una casellaombinata con una lista di valori che rappresentano i record
presenti in una sottomaschera
vorrei che su dopo aggiornamento cercasse il record scelto, il fatto è che
la casellacombinata è nella maschera principale e deve cercare e
posizionarsi sul record nella sottomaschera
ho provato cosi ma non funziona
    Forms![magazzino]![prodotti].SetFocus
    ' Trova il record corrispondente al controllo
    Dim rs As Object
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[Barcode] = '" & Me![CasellaCombinata12] & "'"
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
mi sapete aiutare? Grazie.


author: Alessandro Cara

text:
Simba883 ha scritto:

se metti recordsetclone (senza il punto e' meglio) il metodo clone e'
un'altra cosa
--
a.cara
togli qualcosa dall'email


text:
Alessandro Cara ha scritto:
[cut]
> se metti recordsetclone (senza il punto e' meglio) il metodo clone e'
> un'altra cosa
PS Ho letto di fretta. Mai farsi prendere dalla fretta. Non ho mai usato
il clone e quindi, forse, potresti anche aver fatto una cosa logicamente
giusta. Io ho sempre usato il recordsetclone e mi e' andata sempre bene



author: HjKlOp

text:
>     Forms![magazzino]![prodotti].SetFocus
>     ' Trova il record corrispondente al controllo
>     Dim rs As Object
>
>     Set rs = Me.Recordset.Clone
>     rs.FindFirst "[Barcode] = '" & Me![CasellaCombinata12] & "'"
>     If Not rs.EOF Then Me.Bookmark = rs.Bookmark
il Clone crea una copia identica al record origine
es:
Dim rsSource As Recordset
Dim rsDest As Recordset
Set rsDest = rsSource.Clone
' #################################
Veniamo al caso in questione:
Private Sub CasellaCombinata_Change()
Dim rs As DAO.Recordset
Set rs = Sottomaschera.Form.Recordset.Clone
rs.FindFirst "CampoDaCercare='" & CasellaCombinata.Text & "'"
Sottomaschera.Form.Recordset.Bookmark = rs.Bookmark
End Sub


title: numerare record a gruppi in una query

author: Antonio In The City Ewrwew

text:
Ho una query che mi restituisce i seguenti record
ID     campo1
1      A
1      B
1      C
2      A
2      B
3      D
ecc.
Vorrei creare un ulteriore "campo 2" che conti, partendo da 1, i valori
del "campo 1" in base all' ID cioč cosě:
ID     campo1     campo2
1      A           1
1      B           2
1      C           3
2      A           1
2      B           2
3      D           1
Come posso fare ?
Grazie mille
Antonio
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: numerare record a gruppi in una query

author: Antonio Biso

text:
"Antonio In The City Ewrwew" <
becci...@supereva.it
> ha scritto nel
messaggio news:c2ece80fd6a56913a9a...@mygate.mailgate.org...
> Ho una query che mi restituisce i seguenti record
>
> ID     campo1
> 1      A
> 1      B
> 1      C
> 2      A
> 2      B
> 3      D
>
> ecc.
>
> Vorrei creare un ulteriore "campo 2" che conti, partendo da 1, i valori
> del "campo 1" in base all' ID cioč cosě:
>
> ID     campo1     campo2
> 1      A           1
> 1      B           2
> 1      C           3
> 2      A           1
> 2      B           2
> 3      D           1
>
> Come posso fare ?
Ti serve per forza in una query o poi devi fare un report?
Antonio


title: numerare record a gruppi in una query

author: OneEDP

text:
"Antonio In The City Ewrwew" <
becci...@supereva.it
> ha scritto nel
messaggio news:c2ece80fd6a56913a9a...@mygate.mailgate.org...

Dipende a quale scopo devi destinare la query
Se mi spieghi a cosa ti serve troviamo la soluzione
Ciao


title: numerare record a gruppi in una query

author: Giorgio Prx

text:
"Antonio In The City Ewrwew" <
becci...@supereva.it
> ha scritto nel
messaggio news:c2ece80fd6a56913a9a...@mygate.mailgate.org...

Ciao Antonio
Basta contare in una subquery quanti record ci sono per lo stesso Id e per
Campo1<=Campo1
--------------------------
SELECT
    Id,
   Campo1 ,
   (Select
         COUNT(1)
    FROM
         Tabella AS T1
   WHERE
        T1.Id=Tabella.Id AND
        T1.Campo1<=Tabella.Campo1
   ) AS Campo2
FROM
    Tabella
ORDER BY
    Id,Campo1
-------------------------
Ciao Giorgio


title: numerare record a gruppi in una query

text:
> Ciao Antonio
> Basta contare in una subquery quanti record ci sono per lo stesso Id e per
> Campo1<=Campo1
> --------------------------
> SELECT
>     Id,
>    Campo1 ,
>    (Select
>          COUNT(1)
>     FROM
>          Tabella AS T1
>    WHERE
>         T1.Id=Tabella.Id AND
>         T1.Campo1<=Tabella.Campo1
>    ) AS Campo2
> FROM
>     Tabella
> ORDER BY
>     Id,Campo1
> -------------------------
> Ciao Giorgio
Non ci devo creare un report.
Il valore del conteggio sul "campo2" mi serve solo per creare una terza
chiave poichč devo poi
accodare i dati ad una tabella con 3 chiavi primarie.
Cioč devo ottenere:
ID   campo1    campo2
1      A         1
1      A         2
1      B         3
2      A         1
2      A         2
2      B         3
2      B         4
2      B         5
La soluzione di giorgio mi restituisce invece
ID   campo1    campo2
1      A         2
1      A         2
1      B         1
2      A         2
2      A         2
2      B         3
2      B         3
2      B         3
Spero di essere stato piů chiaro, grazie



title: numerare record a gruppi in una query

text:
"Antonio In The City Ewrwew" <
becci...@supereva.it
> ha scritto nel
messaggio news:9cb2ae7e0e4f46ccf9b...@mygate.mailgate.org...

Ciao Antonio
Se provi la mia soluzione con i dati che hai postato in origine ti
accorgerai che funziona perfettamente.
Con i nuovo dati che hai postato non č possibile ottenere (con una query)
ciň che richiedi a meno di non avere un campo contatore per i record.
ID_Rec  ID   campo1    campo2
1             1      A         2
2             1      A         2
3             1      B         1
4             2      A         2
5             2      A         2
6             2      B         3
7             2      B         3
8             2      B         3
Ciao Giorgio.


title: numerare record a gruppi in una query

text:
...cut
> ID_Rec  ID   campo1    campo2
> 1             1      A         2
> 2             1      A         2
> 3             1      B         1
> 4             2      A         2
> 5             2      A         2
> 6             2      B         3
> 7             2      B         3
> 8             2      B         3
> Ciao Giorgio.
Sě, forse avevo sbagliato il primo messaggio ! Il problema č che il
contatore non deve contare tutti
i record di seguito, ma raggruppandoli per ID, cioč quando cambia l'ID
deve iniziare nuovamente da 1.
Quindi non c'č soluzione ?
Grazie



title: numerare record a gruppi in una query

text:
"Antonio In The City Ewrwew" <
becci...@supereva.it
> ha scritto nel
messaggio news:fa0168c35c769c7376a...@mygate.mailgate.org...

Vedo che i miei suggerimenti non vengono sempre accolti.
Se la query ti serve per un report la soluzione č piů semplice.
Se ti serve per una maschera č un'altra storia.
Se ti server per altre ragioni....
facci sapere altrimenti metti in moto complicazioni inutili
Ciao


title: numerare record a gruppi in una query

text:
> > Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG
> Vedo che i miei suggerimenti non vengono sempre accolti.
> Se la query ti serve per un report la soluzione è più semplice.
> Se ti serve per una maschera è un'altra storia.
> Se ti server per altre ragioni....
> facci sapere altrimenti metti in moto complicazioni inutili
> Ciao
Scusami ma l'avevo scritto nel messaggio precedente (scrivo dalle pagine
di mailgate e quindi devo fare dei cut sui messaggi altrimenti non me li
spedisce).
Come dicevo prima il tutto mi serve non in un report (che sarebbe la
cosa più semplice)
Mi serve in una query. Creare il famoso "campo2" mi permette infatti do
ottemere la chiave per accodare poi i dati in una tabella successiva Che
ha 3 chiavi primarie,
ID, Campo1 e campo2). logicamente se non creo il campo2 non posso
accodare i dati per violazione di chiave.
Ripeto che il campo2 dovrebbe contare i record per ogni ID e ripartire
da 1 ogni volta
cioè
ID   campo1    Canpo2
1     A          1
1     A          2
1     A          3
1     B          4
2     A          1
2     A          2
2     B          3



title: numerare record a gruppi in una query

text:
"Antonio In The City Ewrwew" <
becci...@supereva.it
> ha scritto nel
messaggio news:fa0168c35c769c7376a...@mygate.mailgate.org...
> ...cut
>
> Sì, forse avevo sbagliato il primo messaggio ! Il problema è che il
> contatore non deve contare tutti
> i record di seguito, ma raggruppandoli per ID, cioè quando cambia l'ID
> deve iniziare nuovamente da 1.
> Quindi non c'è soluzione ?
> Grazie
> Antonio
>
>
> --
> Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG
Ciao Antonio
Vediamo di capirci ...
Tu hai una tabella o una query che rende il seguente recordset
-----------------
ID   campo1
 1      A
 1      A
 1      B
 2      A
 2      A
 2      B
 2      B
 2      B
 3     A
---------------
Vorresti ottenere questo risultato
-----------------
ID   campo1   Campo2
 1      A                1
 1      A                2
 1      B                3
 2      A                1
 2      A                2
 2      B                3
 2      B                4
 2      B                5
 3      A               1
---------------
Per risolvere la query è necessario avere un campo (tipo contatore vedi
struttura tabella) che identifica in modo univoco i record della tabella o
query di origine, se non hai questo campo tieni presente che basta
aggiungerlo alla tabella di origine.
Esempio di tabella o query di origine con campo ID_Record che identifica in
modo univoco un record. Normalmente in fase di progettazione del database si
utilizza sempre un campo di questo tipo.
-----------------
ID_Record    ID   campo1
 1250             1      A
 125               1      A
 256               1      B
 787               2      A
 989               2      A
1280              2      B
126                2      B
2541              2      B
367                3      A
---------------
A questo punto è possibile risolvere il tuo problema in altro caso devi
ricorrere a VBA .
Ciao Giorgio.


title: numerare record a gruppi in una query

text:
"Antonio In The City Ewrwew" <
becci...@supereva.it
> ha scritto nel
messaggio news:5481c6514be50398e56...@mygate.mailgate.org...

Proviamo con i recordset (ADO)?
Private Sub Numerazione()
On Error Goto Err_Handler
Dim rst As ADODB.Recordset
Dim lngCount As long
    set rst = new ADODB.Recordset
    'la tabella tblMy deve avere il Campo2 impostato a long
    rst.Open _
        "tblMy", _
        CurrentProject.Connection, _
        adOpenKeyset, _
        adLockOptimistic, _
        adCmdTableDirect
    rst.Sort "ID Asc, Campo1 Asc"
    lngCount = 0
    lngPreviousID = -1 'impostato a un campo minore del più piccolo ID della
tabella
    with rst
       while not .EOF
            if lngPreviousID <> .Fields("ID") then lngCount = 0
            lngCount = lngCount + 1
            .Fields("Campo2") = lngCount
            .Update
            lngPreviousID = .Fields("ID)
            .MoveNext
        wend
    end with
Exit_Sub:
    On error Resume Next
    rst.Close
    set rst = Noting
    exit sub
Err_Handler:
    MsgBox "Sono cavoli amari:" & err.description
    resume Exit_Sub
Ok?
Ciao.
Daniele


title: numerare record a gruppi in una query

text:
...cut
> -----------------
> ID_Record    ID   campo1
>  1250             1      A
>  125               1      A
>  256               1      B
>  787               2      A
>  989               2      A
> 1280              2      B
> 126                2      B
> A questo punto è possibile risolvere il tuo problema in altro caso devi
> ricorrere a VBA .
Scusate per la confusione dei messaggi precedenti.
Ok, ora ci siamo! Il recordset era da query quindi ho creato una tabella
da questo recordset e ci ho aggiunto
un campo contatore come dicevi tu. Fin qi tutto ok. Come potrei poi
procedere ?



title: numerare record a gruppi in una query

text:
"Antonio In The City Ewrwew" <
becci...@supereva.it
> wrote in message
news:95545df0cd3dc1cf9dd...@mygate.mailgate.org
> ...cut
> > -----------------
> > ID_Record    ID   campo1
> >  1250             1      A
> >  125               1      A
> >  256               1      B
> >  787               2      A
> >  989               2      A
> > 1280              2      B
> > 126                2      B
> > A questo punto è possibile risolvere il tuo problema in altro caso devi
> > ricorrere a VBA .
>
Ho risolto sommando IDREC+1000 poi con una query trovo il valore minimo
per ogni ID
creao un altro campo e calcolo la differenza tra il minimo + 1 e IDREC !
Ho dovuto creare
delle tabelle perchè con le query non mi riusciva l'aggiornamento ma
alla fine ce l'ho fatta!!!!!
Grazie a tutti



title: numerare record a gruppi in una query

text:
"Antonio In The City Ewrwew" <
becci...@supereva.it
> ha scritto nel
messaggio news:df8d04c936988cde531...@mygate.mailgate.org...
> "Antonio In The City Ewrwew" <
becci...@supereva.it
> wrote in message
>
news:95545df0cd3dc1cf9dd...@mygate.mailgate.org
>
> > ...cut
> > > -----------------
> > > ID_Record    ID   campo1
> > >  1250             1      A
> > >  125               1      A
> > >  256               1      B
> > >  787               2      A
> > >  989               2      A
> > > 1280              2      B
> > > 126                2      B
> > > A questo punto č possibile risolvere il tuo problema in altro caso
devi
> > > ricorrere a VBA .
> >
>
> Ho risolto sommando IDREC+1000 poi con una query trovo il valore minimo
> per ogni ID
> creao un altro campo e calcolo la differenza tra il minimo + 1 e IDREC !
> Ho dovuto creare
> delle tabelle perchč con le query non mi riusciva l'aggiornamento ma
> alla fine ce l'ho fatta!!!!!
>
> Grazie a tutti
>
> Antonio
>
>
> --
> Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG
Hai pensato a cosa ti succederebbe se ID non č sequenziale senza soluzioni
di continuitą?
Daniele


title: numerare record a gruppi in una query

text:
"Antonio In The City Ewrwew" <
becci...@supereva.it
> ha scritto nel
messaggio news:c2ece80fd6a56913a9a...@mygate.mailgate.org...
> Ho una query che mi restituisce i seguenti record
>
> ID     campo1
> 1      A
> 1      B
> 1      C
> 2      A
> 2      B
> 3      D
>
> ecc.
>
> Vorrei creare un ulteriore "campo 2" che conti, partendo da 1, i valori
> del "campo 1" in base all' ID cioč cosě:
>
> ID     campo1     campo2
> 1      A           1
> 1      B           2
> 1      C           3
> 2      A           1
> 2      B           2
> 3      D           1
>
> Come posso fare ?
>
> Grazie mille
>
> Antonio
Se la tabella che contiene i dati si chiama Tabella e contiene i campi ID e
campo1.
Nel modulo del tuo database registra quanto segue:
Option Compare Database
Option Explicit
Public rval As Integer
Public Pippo As String
Public Function Progressione(Valore As String) As Integer
If Valore = "Azzera" Or Pippo <> Valore Then
    rval = 0
Else
    rval = rval + 1
End If
Pippo = Valore
Progressione = rval
End Function
quindi creati una query che abbia il seguente codice SQL:
SELECT ID, campo1, Progressione((ID)) + 1 AS campo2
FROM Tabella
WHERE (((Progressione("Azzera"))=0))
ORDER BY ID, campo1;
Questa soluzione č una versione riveduta e corretta di ciň che trovi sul
Sito Comune (link qui sotto), nella Sezione General, nella FAQ di Stefano
Bettini intitolata "Come posso inserire nella mia query un campo
progressivo?"; per maggiori ragguagli sul funzionamento di quanto sopra, fai
riferimento a tale FAQ.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Aprire form solo x inserimento nuovi record

author: Eradicator

text:
Ciao,
Ho 2 form, il primo chiamato "Registrazioni" e il secondo chiamato
"Archivio Promemoria"
In entrambi i form ho 2 campi chiamati [CodCliente]
Nel form "Registrazioni" ho inserito un pulsante per aprire il form
"Archivio Promemoria"
Ora io vorrei che tale form mi venga aperto solo in modalitą inserimento
nuovo record e che tramite VBA il campo [CodCliente] di "Archivio
promemoria" assuma il valore del campo [CodCliente] del form
"Registrazioni"
Grazie.
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


author: Carlo Costarella

text:
"Eradicator" <
nonl...@nessuno.it
> ha scritto nel messaggio
news:base57$4rr$1...@news.newsland.it...
> Ciao,
>
> Ho 2 form, il primo chiamato "Registrazioni" e il secondo chiamato
> "Archivio Promemoria"
>
> In entrambi i form ho 2 campi chiamati [CodCliente]
>
> Nel form "Registrazioni" ho inserito un pulsante per aprire il form
> "Archivio Promemoria"
>
> Ora io vorrei che tale form mi venga aperto solo in modalitą inserimento
> nuovo record e che tramite VBA il campo [CodCliente] di "Archivio
> promemoria" assuma il valore del campo [CodCliente] del form
> "Registrazioni"
>
>
> Grazie.
>
> --
DoCmd.OpenForm "Archivio Promemoria", acNormal, , , acFormAdd, acDialog
Docmd.selectObject AcForm, "Archivio Promemoria"
Forms![Archivio Promemoria]![CodCliente].setfocus
Forms![Archivio Promemoria]![CodCliente] = Me.[CodCliente]
oppure:
Forms![Archivio Promemoria]![CodCliente] =
Forms![Registrazioni]![CodCliente]
Ciao, Carlo


text:
Ho fatto cosě in quanto il secondo form puň essere aperto sia passando gli
argomenti(quindi aprendolo dal form "Registrazioni" che senza passare gli
argomenti (quindi aprendolo direttamente.
If VarType(Me.OpenArgs) <> vbNull Then Me.CodCliente = Str(Me.OpenArgs)
Il problema č che mi da errore su:
"Impossibile assegnare un valore all'oggetto." e poi mi evidenzia
me.CodCliente
Passando il mouse sopra me.CodCliente mi dice che č nullo



text:
"Eradicator" <
nonl...@nessuno.it
> ha scritto nel messaggio
news:basgu3$1jt$1...@news.newsland.it...
> Ho fatto così in quanto il secondo form può essere aperto sia passando gli
> argomenti(quindi aprendolo dal form "Registrazioni" che senza passare gli
> argomenti (quindi aprendolo direttamente.
>
> If VarType(Me.OpenArgs) <> vbNull Then Me.CodCliente = Str(Me.OpenArgs)
>
>
> Il problema è che mi da errore su:
> "Impossibile assegnare un valore all'oggetto." e poi mi evidenzia
> me.CodCliente
> Passando il mouse sopra me.CodCliente mi dice che è nullo
>
>
> Grazie.
>
> --
>
Chiariamo un fatto: se esegui il codice da maschera "Registrazioni" i
riferimenti a "Archivio Promemoria" devono essere espliciti: Forms![Archivio
Promemoria]...ecc.
La maschera "Archivio Promemoria" non deve essere bloccata in scrittura o
nell'aggiunta di nuovi record. Il controllo "CodCliente" sulla maschera
"Archivio Promemoria" deve chiamarsi proprio così (controlla).
Quando esponi un quesito cerca di dire bene quello che vuoi fare e con tutti
i passaggi. Per esempio il passare degli argomenti cambia, sia pur di poco,
il codice che ti ho postato.
Il prefisso Me si riferisce sempre alla maschera che esegue il codice e mai
ad una seconda maschera anche se questa esegue del codice all'apertura con
il prefisso Me.
Esegui il codice passo passo e vedi il risultato di ogni singola istruzione.
Potrai capire da solo dove stà l'inghippo.
Ricorda che puoi anche usare la proprietà TAG della maschera per passare dei
valori.
Ciao, Carlo


text:
Grazie 1000 per i tuoi chiarimenti!
Ciao



title: numerazione pagine in un report

author: francesco

text:
Con Access 97 sono riuscito facilmente a reimpostare i numeri di pagina ad
ogni sezione (copiazzando un pochino negli esempi), quello che non riesco a
fare e scrivere il numero totale pagine della suddetta.
Cerco di spiegarmi meglio.
Ho un report suddiviso e raggruppato in base ad un campo, ho la mia bella
intestazione e il piè di pagina relativi al campo, il salto pagina mi
consente di suddividere il report secondo il raggruppamento impostato, mi
servirebbe far comparire la numerazione tipo: Pag 1 di 6, dove 6 non deve
essere il numero totale delle pagine del report ma quello della sezione.
Mi potete aiutare?
Francesco


title: numerazione pagine in un report

author: Sergio MAZZA

text:
"francesco" <
franc...@pippo.it
> ha scritto nel messaggio
news:9v7qku$4gc$1...@lisa.galactica.it...

Fai riferimento a [Pages];
Es.
"pagina n." & [Page] & " di " & [Pages]
E' un esempio che puoi trovare se attivi il generatore del''origine dati del
controllo e lo cerchi nelle "funzioni - comuni"...
Ciao.


title: numerazione pagine in un report

text:
Forse non sono riuscito a spiegare il probema e mi scuso per questo.
Il pagina n." & [Page] & " di " & [Pages] norisolve il problema
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:9vck41$n0i$1...@canarie.caspur.it...



title: numerazione pagine in un report

text:
"francesco" <
franc...@pippo.it
> ha scritto nel messaggio
news:9vl5d2$3ci$1...@lisa.galactica.it...
> Forse non sono riuscito a spiegare il probema e mi scuso per questo.
> Il pagina n." & [Page] & " di " & [Pages] norisolve il problema
>
Per favore scrivi la tua risposta dopo il messaggio precedente; coma faccio
io. Grazie.
Scusa ma non avevo letto bene il tuo messaggio; in effetti sembra che non ci
sia una soluzione "automatica", almeno con acc'97.
Per risolvere un problema simile ho dovuto:
- impostare un numero massimo di righe per pagina
- creare una routine che legge i record e scrive i numeri delle pagine ogni
break di gruppo
Ciao.


title: numerazione pagine in un report

author: Emyr

text:


Questa è una vera chicca per me e me l'ha passata uno che di access sa
poco...
questa fa ripartire il conteggio di page da 1 ad ogni gruppo,
vedi se provando variazioni sul tema riesci ad ottenere qualcosa!
Private Sub IntestazioneGruppo0_Format(Cancel As Integer, FormatCount
As Integer)
Page = 1
End Sub


title: numerazione pagine in un report

text:
"Emyr" <
fan...@lavoro.com
> ha scritto nel messaggio
news:kka32uku70tiamte6...@4ax.com...

A chi hai risposto?
Ciao.
--
Sergio MAZZA


title: numerazione pagine in un report

text:
On Thu, 20 Dec 2001 13:49:18 +0100, Emyr <
fan...@lavoro.com
> wrote:
>On Tue, 18 Dec 2001 09:27:10 +0100, "Sergio MAZZA"
><
sergi...@tiscalinet.it
> wrote:
>
>>
>>"francesco" <
franc...@pippo.it
> ha scritto nel messaggio
>>news:9vl5d2$3ci$1...@lisa.galactica.it...
>>> Forse non sono riuscito a spiegare il probema e mi scuso per questo.
>>> Il pagina n." & [Page] & " di " & [Pages] norisolve il problema
>>>
>>
>>Per favore scrivi la tua risposta dopo il messaggio precedente; coma faccio
>>io. Grazie.
>>
>>Scusa ma non avevo letto bene il tuo messaggio; in effetti sembra che non ci
>>sia una soluzione "automatica", almeno con acc'97.
>>Per risolvere un problema simile ho dovuto:
>>- impostare un numero massimo di righe per pagina
>>- creare una routine che legge i record e scrive i numeri delle pagine ogni
>>break di gruppo
>>
>>Ciao.
>>
>
>Questa è una vera chicca per me e me l'ha passata uno che di access sa
>poco...
non che io ne sappia molto....



title: numerazione pagine in un report

text:
On Thu, 20 Dec 2001 16:48:28 +0100, "Sergio MAZZA"
<
sergi...@tiscalinet.it
> wrote:
>
>A chi hai risposto?
 a Francesco
Ciao Emanuele


title: numerazione pagine in un report

text:
"Emyr" <
fan...@lavoro.com
> ha scritto nel messaggio
news:8kh42u8rsjhsv8vd5...@4ax.com...
>
>  a Francesco
>
> Ciao Emanuele
Allora posizionati nel posto giusto, altrimenti non si capisce nulla e
Francesco potrebbe non leggere la tua risposta...
Ciao.
--
Sergio MAZZA


title: numerazione pagine in un report

text:


scusa, non sono ancora molto pratico delle news...
Ciao.


title: numerazione pagine in un report

text:
> >
>
> Questa è una vera chicca per me e me l'ha passata uno che di access sa
> poco...
> questa fa ripartire il conteggio di page da 1 ad ogni gruppo,
> vedi se provando variazioni sul tema riesci ad ottenere qualcosa!
>
> Private Sub IntestazioneGruppo0_Format(Cancel As Integer, FormatCount
> As Integer)
> Page = 1
> End Sub
ti ringrazio, ma far ripartire la numerazione ad ogni gruppo non è un gran
problema, quello che ancora non ho risolto è indicare il numero di pagine di
ogni gruppo.
es pag. 1 di 5


title: numerazione pagine in un report

text:
On Fri, 28 Dec 2001 11:18:43 +0100, "francesco" <
franc...@pippo.it
>
wrote:
CUT
>
>ti ringrazio, ma far ripartire la numerazione ad ogni gruppo non è un gran
>problema, quello che ancora non ho risolto è indicare il numero di pagine di
>ogni gruppo.
>es pag. 1 di 5
>
>
>
Vedo cosa riesco a trovare
Saluti.
Emanuele.


title: numerazione pagine in un report

text:
On Fri, 28 Dec 2001 21:08:08 +0100, Emyr <
fan...@lavoro.com
> wrote:
>On Fri, 28 Dec 2001 11:18:43 +0100, "francesco" <
franc...@pippo.it
>
>wrote:
>
>CUT
>
>>
>>ti ringrazio, ma far ripartire la numerazione ad ogni gruppo non č un gran
>>problema, quello che ancora non ho risolto č indicare il numero di pagine di
>>ogni gruppo.
>>es pag. 1 di 5
>>
>>
>>
>
>
>
>Vedo cosa riesco a trovare
>Saluti.
>Emanuele.
la maniera forse piů comoda che mi č venuta in mente anche se poco
elengante ed efficiente e di inviare separatamente in stampa i vari
gruppi e utilizzare quindi pages senza problemi...
quindi....
apri un recordset sulla stessa SQL del Report, scorri i vari gruppi e
invii man mano la stampa del report con condizione WHERE il gruppo
settato al gruppo corrente...
... come dicevo non bello ma funzionante....
ci sono anche altre variazioni sul tema oppure il classico conteggio
dei record prima di inviare la stampa o le varie tabelle di appoggio
putroppo non mi viene in mente altro
Saluti.
Emanuele.


title: SendMail (Carlo Costarella) Errore -2147467259

author: Roberto da Parma

text:
Ciao a tutti,
ho provato ad usare la faq di Carlo...anzitutto bella!!
Funziona a me...con installato OFFICE OUTLOOK2003, ma inspiegabilmente (alla
mia mente) se si utilizza un'altro client di posta (anche Express)
restituisce Errore -
2147467259
 ho provato a trovare l'errore ma non  mi ha
portato a nulla...
Quindi eccomi qui...
Grazie
Roberto
P.s. Appunto per Carlo: io modificherei un attimo il codice bloccando la
finestra d'invio per un controllo e poi dando conferma manualmente... che
dici? Io ho risolto cosě:
Global Const MAPI_LOGON_UI = &H8


text:
"Roberto da Parma" <
aris...@libero.it
> ha scritto nel messaggio
news:4566ebaf$0$7628$4faf...@reader1.news.tin.it...

 Mi sembra una buona cosa anche se non sempre gli utenti amano i messaggi di
conferma, specie quando bisogna mandare un solo messaggio.
Quanto alla causa dell'errore -
2147467259
 (MAPI_E_LOGON_FAILED) questo
dipende dal fatto che non hai una sessione MAPI aperta o meglio un profilo
di default per inviare il messaggio. Per risolvere il problema bisogna prima
stabilire la versione del sistema operativo...
In questo link puoi trovare utili spiegazioni anche se qui si usa CDO (anche
questa potrebbe essere una alternativa valida):
http://support.microsoft.com/default.aspx?scid=kb;en-us;171422
Ciao, Carlo


text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:ek7434$6vu$1...@tdi.cu.mi.it...

Ho provato con CDO ma anche qui da un errore pressochč simile...
Con OE o Mozilla non si riesce a saltarci fuori...
Mentre tutto va perfettamente con Outlook....procaccia miseriaccia!
Se qualcuno ha suggerimenti...sono graditissimi!!
Ciao
Roberto


title: come sapere qual è il  file aperto con access ?

author: gerry

text:
come si fa a sapere il nome del file MDB correntemente aperto con access
2007 ?
Non lo vedo scritto da nessuna parte nella finestra del database, possibile
che una indicazione così importante manchi?
ciao


text:

Di cosa parli...?
Le indicazioni ci sono tutte, ma serve capire di cosa si parla... e
soprattutto come si usa la Guida in Linea.
Vedi se questo è quello che chiedi:
CurrentProject.Name
CurrentDb.Name
@Alex


text:
<<CurrentDb.Name
questo nome, dove lo si legge nella finestra del database?


text:
On 28 Apr, 12:13, "gerry" <
bibe...@gryr.it
> wrote:
> <<CurrentDb.Name
>
> questo nome, dove lo si legge nella finestra del database?
Cosa vuol dire questa domanda...???
@Alex


text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:242ab76b-5b69-4c1d...@x10g2000vbn.googlegroups.com...

quando apri un foglio di xls con excel  leggi in alto nella toolbar il nome
del foglio xls aperto.
Con access 2007 non c'è scritto da nessuna parte il nome del file aperto!
comunque non sforzarti a rispondere, la mia domanda era per gente competente
e motivata, quindi tu sei escluso de iure e de facto.


text:

Per la motivazione (attuale) non so ma per la competenza cadi male.
Access e Excel sono due prodotti diversi non si capisce perche'
dovrebbero comportarsi nello stesso modo.
Comunque in strumenti-->Avvio c'e' il nome che vuoi/vorresti assegnare
che potrebbe avere nulla a che fare con il nome del db.
E la prossima volta prima di nominare il nome di @Alex invano e
d'obbligo che ti faccia una mezz'oretta dietro la lavagna in ginocchio
sui ceci ;-{)
--
ac (x=y-1)


author: verty

text:
>
> quando apri un foglio di xls con excel  leggi in alto nella toolbar il
> nome del foglio xls aperto.
>
> Con access 2007 non c'č scritto da nessuna parte il nome del file aperto!
in effetti con access 2000 il nome del database aperto ti compare nella
barra del titolo (quella blu in alto) , in access 2007 non compare piů .....
La segnalazione a me pare sensata, fa parte di quelle features che microsoft
toglie senza un perchč


text:
...
>
> quando apri un foglio di xls con excel  leggi in alto nella toolbar il nome
> del foglio xls aperto.
>
> Con access 2007 non c'è scritto da nessuna parte il nome del file aperto!
>
> comunque non sforzarti a rispondere, la mia domanda era per gente competente
> e motivata, quindi tu sei escluso de iure e de facto.
La competenza di solito è BILATERALE altrimenti è come un muto che
parla al sordo...
Tu in 2 parole hai dimostrato la tua incompetenza, non mi sforzo a
spiegarti perchè..., ma su questo non ci sarebbe nulla di chè...!
Tuttavia hai anche evidenziato un'ignoranza banale ed infantile.
@Alex


text:
....
> E la prossima volta prima di nominare il nome di @Alex invano e
> d'obbligo che ti faccia una mezz'oretta dietro la lavagna in ginocchio
> sui ceci ;-{)
Sono bambini, e come tali vanno edicati... poi Alessandro è il nome
più bello... ed è bene nominarlo...!
> ac (x=y-1)
per essere retta è retta, ma quel +1 proprio mi indispone...!
@Alex


author: Popi - TheBadHabits

text:
On 28 Apr, 23:49, "@Alex" <
ik2...@libero.it
> wrote:
> > comunque non sforzarti a rispondere, la mia domanda era per gente competente
> > e motivata, quindi tu sei escluso de iure e de facto.
>
> La competenza di solito è BILATERALE altrimenti è come un muto che
> parla al sordo...
>
> Tu in 2 parole hai dimostrato la tua incompetenza, non mi sforzo a
> spiegarti perchè..., ma su questo non ci sarebbe nulla di chè...!
> Tuttavia hai anche evidenziato un'ignoranza banale ed infantile.
Alex, prostergando il prologomeno delle concuminanze si ottiene il
subiettivismo della subcoscienza.
Tale concetto e' *matematicamente* collegato alla teoria del collo di
papero, ed a fronte di neanche tanto approfondite ricerche possiamo
giungere alla logica conclusione: dal bidone di acido ialuronico siamo
passati all'autobotte di benzina.
Serve un accendino?
Popi :)


text:
"Popi - TheBadHabits" <
rlu...@yahoo.com
> ha scritto nel messaggio
news:7d544cb4-5414-43b5...@w10g2000yqa.googlegroups.com...
On 28 Apr, 23:49, "@Alex" <
ik2...@libero.it
> wrote:
> > comunque non sforzarti a rispondere, la mia domanda era per gente
> > competente
> > e motivata, quindi tu sei escluso de iure e de facto.
>
> La competenza di solito č BILATERALE altrimenti č come un muto che
> parla al sordo...
>
> Tu in 2 parole hai dimostrato la tua incompetenza, non mi sforzo a
> spiegarti perchč..., ma su questo non ci sarebbe nulla di chč...!
> Tuttavia hai anche evidenziato un'ignoranza banale ed infantile.
Alex, prostergando il prologomeno delle concuminanze si ottiene il
subiettivismo della subcoscienza.
Tale concetto e' *matematicamente* collegato alla teoria del collo di
papero, ed a fronte di neanche tanto approfondite ricerche possiamo
giungere alla logica conclusione: dal bidone di acido ialuronico siamo
passati all'autobotte di benzina.
Serve un accendino?
Popi :)
E' che nelle feste comandate qualche cretino che deve passare il tempo in
modi alternativi spunta sempre fuori...
Antonio


text:
On 29 Apr, 12:07, "Antonio Biso" <
ab...@libero.it
> wrote:
> "Popi - TheBadHabits" <
rlu...@yahoo.com
> ha scritto nel messaggionews:7d544cb4-5414-43b5...@w10g2000yqa.googlegroups.com...
> Alex, prostergando il prologomeno delle concuminanze si ottiene il
> subiettivismo della subcoscienza.
>
> Tale concetto e' *matematicamente* collegato alla teoria del collo di
> papero, ed a fronte di neanche tanto approfondite ricerche possiamo
> giungere alla logica conclusione: dal bidone di acido ialuronico siamo
> passati all'autobotte di benzina.
>
> Serve un accendino?
>
> Popi :)
>
> E' che nelle feste comandate qualche cretino che deve passare il tempo in
> modi alternativi spunta sempre fuori...
>
> Antonio
Dici a me?
Eh?
Ce l'hai con me?
Sei solo chiacchere e distintivo! :))))))
Popi


text:
"Popi - TheBadHabits" <
rlu...@yahoo.com
> ha scritto nel messaggio
news:f5e3cd12-cdff-4a28...@d28g2000yqf.googlegroups.com...

Chiacchere????
se magnano?
MA, c'è robba da magnà qua...
Antonio


text:
On 29 Apr, 12:57, "Antonio Biso" <
ab...@libero.it
> wrote:
> "Popi - TheBadHabits" <
rlu...@yahoo.com
> ha scritto nel messaggionews:f5e3cd12-cdff-4a28...@d28g2000yqf.googlegroups.com...

'stardo ... son 2 anni che sono a dieta ... ed anche se i risultati si
vedono (120->93) se mi passa un cinghiale davanti faccio impallidire
anche Obelix!!! :))))
Popi


text:
"Popi - TheBadHabits" <
rlu...@yahoo.com
> ha scritto nel messaggio
news:6de62a5b-64f0-472e...@m40g2000vbt.googlegroups.com...
On 29 Apr, 12:57, "Antonio Biso" <
ab...@libero.it
> wrote:
> "Popi - TheBadHabits" <
rlu...@yahoo.com
> ha scritto nel
> messaggionews:f5e3cd12-cdff-4a28...@d28g2000yqf.googlegroups.com...
>
'stardo ... son 2 anni che sono a dieta ... ed anche se i risultati si
vedono (120->93) se mi passa un cinghiale davanti faccio impallidire
anche Obelix!!! :))))
Popi
miiii...
io negli ultimi due anni ho fatto
130->109->125
sigh...
Antonio


text:
On 29 Apr, 15:39, "Antonio Biso" <
ab...@libero.it
> wrote:
> "Popi - TheBadHabits" <
rlu...@yahoo.com
> ha scritto nel messaggionews:6de62a5b-64f0-472e...@m40g2000vbt.googlegroups.com...
> On 29 Apr, 12:57, "Antonio Biso" <
ab...@libero.it
> wrote:> "Popi - TheBadHabits" <
rlu...@yahoo.com
> ha scritto nel
> > messaggionews:f5e3cd12-cdff-4a28...@d28g2000yqf.googlegroups.com...
>
> 'stardo ... son 2 anni che sono a dieta ... ed anche se i risultati si
> vedono (120->93) se mi passa un cinghiale davanti faccio impallidire
> anche Obelix!!! :))))
>
> miiii...
>
> io negli ultimi due anni ho fatto
> 130->109->125
>
> sigh...
Su col morale: evidentemente te la sei goduta pie' e meglio di me ;)
Popi


text:
"Popi - TheBadHabits" <
rlu...@yahoo.com
> ha scritto nel messaggio
news:277f7ac1-02ac-44bd...@hg8g2000vbb.googlegroups.com...

Solo incazzature e fame nervosa...
Antonio


text:
On 29 Apr, 15:39, "Antonio Biso" <
ab...@libero.it
> wrote:
> "Popi - TheBadHabits" <
rlu...@yahoo.com
> ha scritto nel messaggionews:6de62a5b-64f0-472e...@m40g2000vbt.googlegroups.com...
> On 29 Apr, 12:57, "Antonio Biso" <
ab...@libero.it
> wrote:> "Popi - TheBadHabits" <
rlu...@yahoo.com
> ha scritto nel
> > messaggionews:f5e3cd12-cdff-4a28...@d28g2000yqf.googlegroups.com...
>
> 'stardo ... son 2 anni che sono a dieta ... ed anche se i risultati si
> vedono (120->93) se mi passa un cinghiale davanti faccio impallidire
> anche Obelix!!! :))))
>
> Popi
>
> miiii...
>
> io negli ultimi due anni ho fatto
> 130->109->125
>
> sigh...
>
> Antonio
Però bel vitellino... ;-)
Io normalmente sono 64Kg... sono ingrassato perchè operato ad una
spalla ho smesso attività sportiva per 6mesi... ed ero diventato
68Kg...!
Ora però ho ricominciato a nuotare e sono tornato a misura... in 1
mese.
Con tutto questo cosa volevo dire... nulla(provocare un pò di invidia)
e che con 1 Biso, escono 2 @Alex...
@Alex