title: Utilizzo di NotInList

text:
"Federico Luciani" <
fluc...@paperino.libero.it
> ha scritto nel messaggio
news:39B8BCC1...@paperino.libero.it...
> Sergio MAZZA wrote:
> > '-------------------------
> > Private Sub xNominativo_NotInList(NewData As String, Response As
Integer)
> > If MsgBox("Nominativo non in elenco, vuoi inserirlo?", vbYesNo,
"Inserimento
> > Nominativo") = vbYes Then
> >     Response = acDataErrAdded
> >     DoCmd.SetWarnings False
> >     DoCmd.RunSQL "INSERT INTO t_dipendenti ( Nominativo ) SELECT '" &
> > NewData & "' AS NuovoNominativo;"
> >     DoCmd.SetWarnings True
> > Else
> >     Response = acDataErrContinue
> > End If
> > End Sub
>
> Perfetto.
Eh, magari!
>
--------- omissis -------------
>
> Non mi e' chiaro se la combo e' legata ad un campo o la usi solo per
filtrare
> il recordset della form?
>
>
> --
> Federico
>
> --------------------------------------
> Sito Comune di it.comp.appl.access
>
http://members.xoom.it/it_db_access
> mailto:
it_db_...@usa.net
> --------------------------------------
> Tutte le richieste che mi arrivano
> in privato, vengono cestinate.
> --------------------------------------
> Rimuovi paperino. per e-mail
> --------------------------------------
La casella combinata (non legata a nessun campo) la utilizzo per inserire i



title: Utilizzo di NotInList

author: Federico Luciani

text:
Sergio MAZZA wrote:
> "Federico Luciani" <
fluc...@paperino.libero.it
> ha scritto nel messaggio
> [cut]
> La casella combinata (non legata a nessun campo) la utilizzo per inserire i
> nuovi nominativi e per "navigare" nei record (me!id.setfocus:
> docmd.findrecord me!nomecasellacombinata)...
> Ciao.
Prova ad inserire un me.requery nell'evento DopoAggiornamento della combo,
prima del findfirst.
Se funziona, ti consiglio di usare un flag per evitare di eseguire un requery
tutte le volte che fai una selezione.



title: Utilizzo di NotInList

author: Sergio MAZZA

text:
"Federico Luciani" <
fluc...@paperino.libero.it
> ha scritto nel messaggio
news:39BCDB2D...@paperino.libero.it...
>
> Prova ad inserire un me.requery nell'evento DopoAggiornamento della combo,
> prima del findfirst.
> Se funziona, ti consiglio di usare un flag per evitare di eseguire un
requery
> tutte le volte che fai una selezione.
>
> --
> Federico
>
> --------------------------------------
> Sito Comune di it.comp.appl.access
>
http://members.xoom.it/it_db_access
> mailto:
it_db_...@usa.net
> --------------------------------------
> Tutte le richieste che mi arrivano
> in privato, vengono cestinate.
> --------------------------------------
> Rimuovi paperino. per e-mail
> --------------------------------------
Sì funziona e credo che sarò "costretto" ad utilizzare il tuo consiglio del
flag perché il me.dirty mi ritorna sempre falso.
Grazie ad entrambi.
Ciao.


title: Utilizzo di NotInList

text:
Sergio MAZZA wrote:
> "Federico Luciani" <
fluc...@paperino.libero.it
> ha scritto nel messaggio
> > Prova ad inserire un me.requery nell'evento DopoAggiornamento della combo,
> > prima del findfirst.
> > Se funziona, ti consiglio di usare un flag per evitare di eseguire un
> requery
> > tutte le volte che fai una selezione.
> Sì funziona e credo che sarò "costretto" ad utilizzare il tuo consiglio del
> flag perché il me.dirty mi ritorna sempre falso.
sicuramente e' falso, visto che non e' in modifica :-)



title: Utilizzo di NotInList

text:
"Federico Luciani" <
fluc...@paperino.libero.it
> ha scritto nel messaggio
news:39BCE1CE...@paperino.libero.it...
>
> sicuramente e' falso, visto che non e' in modifica :-)
>
> --
> Federico
>
> --------------------------------------
> Sito Comune di it.comp.appl.access
>
http://members.xoom.it/it_db_access
> mailto:
it_db_...@usa.net
> --------------------------------------
> Tutte le richieste che mi arrivano
> in privato, vengono cestinate.
> --------------------------------------
> Rimuovi paperino. per e-mail
> --------------------------------------
Già, questo spiegherebbe anche il perché non funziona il me.refresh!?
Ma non spiega (o forse non lo capisco io) perché con il menù: record -
rimuovi filtro/ordina riesco a vedere il record aggiunto. Come se sulla
maschera è applicato un filtro e il record appena aggiunto (nella tabella)
non corrisponde a quei criteri e quindi non "raggiungibile"... Mah!
Ciao.


title: Dichiarazione Nome File

author: Stefano Ferrari

text:
Per aprire una connessione ho sempre usato questo sistema:
dim Nomefile
Nomefile="c:\pippo.mdb"
Connessione.Open "Provider=Microsoft.jet.oledb.4.0;data source=" & Nomefile
& ";"
.
.
Connessione.close
Dover dichiarare (soprattutto in questo modo)  il nome del file da aprire mi
sembra molto macchinoso, anche perchè il programma lo sto facendo a casa
(C:\pippo.mdb) mentre il file andrà poi a posizionarsi su una rete
(H:\pippo.mdb).
Esiste la possibilità di comunicare al programma che le tabelle e tutto
quello che gli serve sono contenute in se stesso????.. e quindi che la
connessione è con se stesso???
Grazie a tutti
Stefano


title: Dichiarazione Nome File

author: Alessandro Baraldi

text:
"Stefano Ferrari" <
stefa...@tele2.it
> wrote in message
news:RKW1e.38463$
Of5....@nntpserver.swip.net

Ho il sospetto che ci sia qualche anomalia espositiva
e/o qualche mia errata interpretazione....:
Con DAO:
  CurrentDb.Openrecordset(ad esempio)
Con ADO:
  ActiveConnection sull'oggetto Recordset ed associato
  alla CurrentProject.Connection
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: AFFRETTATEVI, NON C'E' TEMPO DA PERDERE

author: Luciano

text:
GoldenWeb ha scritto nel messaggio <8ei52n$srg$
4...@lacerta.tiscalinet.it
>...
>sta per essere attivato un servizio di connessione internet gratuita
>riservata ai primi 500.000 utenti che si iscrivono.
1) Di connessione Internet gratuite ce ne sono a iosa e senza necessita' di
affrettarsi.
2) "I primi 500 mila"sa tanto di presa per i culo....a quanto pensate di
arrivare, 10 milioni?
Saluti
Luciano


title: Intercettare messaggi di ritorno Query PT

author: nicoletta

text:
Ciao a tutti,
volevo sapere come intercettare i messaggi di ritorno di una query
Passthrough.
Non voglio che mi appaia un msgbox ma gestirli da codice per scriverli
in un file di log.
Nicoletta


author: OneEDP

text:

Currentdb.Execute "qry" � un primo passo


text:
OneEDP ha scritto:

> Currentdb.Execute "qry" ï¿œ un primo passo
>
>
Scusami OneEDP ma non ho capito come fare. "qry" cos'ï¿œ?
Nicky


author: giorgio rancati

text:
"nicoletta" <
frt...@virgilio.it
> ha scritto nel messaggio
news:4acf5624$0$1109$4faf...@reader2.news.tin.it...

Ciao Nicoletta,
Puoi definire cosa intendi con "messaggi di ritorno di una query" ??
Ciao
Giorgio Rancati


text:
giorgio rancati ha scritto:

scusami, mi spiego meglio; intendevo il numero di righe cancellate
quando eseguo una delete o il numero di righe aggiornate per un update
Nicky


text:
nicoletta wrote:
> OneEDP ha scritto:
>> nicoletta wrote:
>>> Ciao a tutti,
>>> volevo sapere come intercettare i messaggi di ritorno di una query
>>> Passthrough.
>>> Non voglio che mi appaia un msgbox ma gestirli da codice per
>>> scriverli in un file di log.
>>>
>>> Nicoletta
>>
>> Currentdb.Execute "qry" � un primo passo
>>
>>
> Scusami OneEDP ma non ho capito come fare. "qry" cos'�?
>
> Nicky
Ragazzaccia. Che centr il numero delle righe....
Ok.
    Set qdfTemp = CurrentDb.CreateQueryDef("", "qui ci metti lo statement
sql update o delete")
      qdfTemp.Execute
      Debug.Print _
         "RecordsAffected after executing query " & _
         "from QueryDef: " & qdfTemp.RecordsAffected
e se gestisci gli errori (come credevo) puoi anche intercettare eventuali
anomalie...
Ciao


text:
OneEDP ha scritto:
> nicoletta wrote:
>> OneEDP ha scritto:
>>> nicoletta wrote:
>>>> Ciao a tutti,
>>>> volevo sapere come intercettare i messaggi di ritorno di una query
>>>> Passthrough.
>>>> Non voglio che mi appaia un msgbox ma gestirli da codice per
>>>> scriverli in un file di log.
>>>>
>>>> Nicoletta
>>> Currentdb.Execute "qry" ï¿œ un primo passo
>>>
>>>
>> Scusami OneEDP ma non ho capito come fare. "qry" cos'ï¿œ?
>>
>> Nicky
>
> Ragazzaccia.
Magari!
  Che centr il numero delle righe....
> Ok.
>     Set qdfTemp = CurrentDb.CreateQueryDef("", "qui ci metti lo statement
> sql update o delete")
>       qdfTemp.Execute
>       Debug.Print _
>          "RecordsAffected after executing query " & _
>          "from QueryDef: " & qdfTemp.RecordsAffected
> e se gestisci gli errori (come credevo) puoi anche intercettare eventuali
> anomalie...
> Ciao
>
>
ok era recordsaffected che cercavo...
Perï¿œ non mi ritorna correttamente i valori
Forse perchï¿œ sono all'interno di una transazione?
In realtï¿œ se eseguo comandi di delete o update dagli interattivi ottengo
comunque messaggi di ritorno di records trattati. Al limite poi rollbecco
Nicky


text:
nicoletta wrote:
> OneEDP ha scritto:
>> nicoletta wrote:
>>> OneEDP ha scritto:
>>>> nicoletta wrote:
>>>>> Ciao a tutti,
>>>>> volevo sapere come intercettare i messaggi di ritorno di una query
>>>>> Passthrough.
>>>>> Non voglio che mi appaia un msgbox ma gestirli da codice per
>>>>> scriverli in un file di log.
>>>>>
>>>>> Nicoletta
>>>> Currentdb.Execute "qry" � un primo passo
>>>>
>>>>
>>> Scusami OneEDP ma non ho capito come fare. "qry" cos'�?
>>>
>>> Nicky
>>
>> Ragazzaccia.
>
> Magari!
>
>  Che centr il numero delle righe....
>> Ok.
>>     Set qdfTemp = CurrentDb.CreateQueryDef("", "qui ci metti lo
>> statement sql update o delete")
>>       qdfTemp.Execute
>>       Debug.Print _
>>          "RecordsAffected after executing query " & _
>>          "from QueryDef: " & qdfTemp.RecordsAffected
>> e se gestisci gli errori (come credevo) puoi anche intercettare
>> eventuali anomalie...
>> Ciao
>>
>>
>
> ok era recordsaffected che cercavo...
>
> Per� non mi ritorna correttamente i valori
> Forse perch� sono all'interno di una transazione?
> In realt� se eseguo comandi di delete o update dagli interattivi
> ottengo comunque messaggi di ritorno di records trattati. Al limite
> poi rollbecco
> Nicky
Guardati F1 ODBCDirect
Ciao
Daniele


text:
OneEDP ha scritto:
> nicoletta wrote:
>> OneEDP ha scritto:
>>> nicoletta wrote:
>>>> OneEDP ha scritto:
>>>>> nicoletta wrote:
>>>>>> Ciao a tutti,
>>>>>> volevo sapere come intercettare i messaggi di ritorno di una query
>>>>>> Passthrough.
>>>>>> Non voglio che mi appaia un msgbox ma gestirli da codice per
>>>>>> scriverli in un file di log.
>>>>>>
>>>>>> Nicoletta
>>>>> Currentdb.Execute "qry" ï¿œ un primo passo
>>>>>
>>>>>
>>>> Scusami OneEDP ma non ho capito come fare. "qry" cos'ï¿œ?
>>>>
>>>> Nicky
>>> Ragazzaccia.
>> Magari!
>>
>>  Che centr il numero delle righe....
>>> Ok.
>>>     Set qdfTemp = CurrentDb.CreateQueryDef("", "qui ci metti lo
>>> statement sql update o delete")
>>>       qdfTemp.Execute
>>>       Debug.Print _
>>>          "RecordsAffected after executing query " & _
>>>          "from QueryDef: " & qdfTemp.RecordsAffected
>>> e se gestisci gli errori (come credevo) puoi anche intercettare
>>> eventuali anomalie...
>>> Ciao
>>>
>>>
>> ok era recordsaffected che cercavo...
>>
>> Perï¿œ non mi ritorna correttamente i valori
>> Forse perchï¿œ sono all'interno di una transazione?
>> In realtï¿œ se eseguo comandi di delete o update dagli interattivi
>> ottengo comunque messaggi di ritorno di records trattati. Al limite
>> poi rollbecco
>> Nicky
> Guardati F1 ODBCDirect
> Ciao
> Daniele
>
>
Ma io non sto usando odbcdirect, sto usando query passthrough in area jet


text:
"nicoletta" <
frt...@virgilio.it
> ha scritto nel messaggio
news:4acf6cee$0$1105$4faf...@reader2.news.tin.it...
>
> ok era recordsaffected che cercavo...
>
> Per� non mi ritorna correttamente i valori
> Forse perch� sono all'interno di una transazione?
> In realt� se eseguo comandi di delete o update dagli interattivi ottengo
> comunque messaggi di ritorno di records trattati. Al limite poi rollbecco
Ciao Nicoletta,
se vuoi avere l'esatto numero di record modificati/cancellati puoi fare:
----
    StringaSql = "UPDATE dbo.Tabellai SET Campo = 'x' WHERE Id=1; SELECT
@@ROWCOUNT"
    Qdf.Connect = Connect_String
    Qdf.ReturnsRecords = True
    Qdf.SQL = StringaSql
    NumRecord = Qdf.OpenRecordset().Fields(0)
    Debug.Print Numrecord
----
Ciao
Giorgio Rancati


text:
"giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
messaggio news:4acf8499$0$695$5fc...@news.tiscali.it...
> se vuoi avere l'esatto numero di record modificati/cancellati puoi fare:
> ----
>    StringaSql = "UPDATE dbo.Tabellai SET Campo = 'x' WHERE Id=1; SELECT
> @@ROWCOUNT"
>
>    Qdf.Connect = Connect_String
>    Qdf.ReturnsRecords = True
>    Qdf.SQL = StringaSql
>
>    NumRecord = Qdf.OpenRecordset().Fields(0)
>
>    Debug.Print Numrecord
> ----
piccola modifica alla StringaSql
----
StringaSql = "SET NOCOUNT ON;UPDATE dbo.Tabellai SET Campo = 'x' WHERE Id=1;
SELECT @@ROWCOUNT"
---
Ciao
Giorgio Rancati


text:
giorgio rancati ha scritto:

Scusami Giorgio, ma io ho:
     Set wrk = DBEngine.Workspaces(0)
     Set dbswrk = OpenDatabase("", False, False, Connect_String)
     'Inizia transazione esplicita
     wrk.BeginTrans
     'cancello ultima estrazione con stessa data consolidamento
      stringasql = "SET NOCOUNT ON;DELETE FROM SYSADM.GWENXRIPPAG
WHERE 	DATADIAPINIZIO=" & miovalore & ";SELECT @@ROWCOUNT"
     dbswrk.Execute stringasql, dbSeeChanges + dbSQLPassThrough
etc.
come integro il tuo suggerimento?
Non ho un oggetto querydef perchï¿œ la sintassi di questo flusso l'ho
presa dal documento di Alex e pensavo che si dovesse fare proprio in
questo modo per gestire le transazioni
Nicky


text:
"nicoletta" <
frt...@virgilio.it
> ha scritto nel messaggio
news:4acfa7d7$0$1101$4faf...@reader2.news.tin.it...
> Scusami Giorgio, ma io ho:
>
>     Set wrk = DBEngine.Workspaces(0)
>     Set dbswrk = OpenDatabase("", False, False, Connect_String)
>
>     'Inizia transazione esplicita
>     wrk.BeginTrans
>
>
>     'cancello ultima estrazione con stessa data consolidamento
>      stringasql = "SET NOCOUNT ON;DELETE FROM SYSADM.GWENXRIPPAG WHERE
> DATADIAPINIZIO=" & miovalore & ";SELECT @@ROWCOUNT"
>
>
>     dbswrk.Execute stringasql, dbSeeChanges + dbSQLPassThrough
>
> etc.
>
> come integro il tuo suggerimento?
usando un oggetto querydef
> Non ho un oggetto querydef perch� la sintassi di questo flusso l'ho presa
> dal documento di Alex e pensavo che si dovesse fare proprio in questo modo
> per gestire le transazioni
questo non significa che puoi fare la stessa cosa con un oggetto querydef
:-)
Giorgio Rancati


text:
nicoletta wrote:
> OneEDP ha scritto:
>> nicoletta wrote:
>>> OneEDP ha scritto:
>>>> nicoletta wrote:
>>>>> OneEDP ha scritto:
>>>>>> nicoletta wrote:
>>>>>>> Ciao a tutti,
>>>>>>> volevo sapere come intercettare i messaggi di ritorno di una
>>>>>>> query Passthrough.
>>>>>>> Non voglio che mi appaia un msgbox ma gestirli da codice per
>>>>>>> scriverli in un file di log.
>>>>>>>
>>>>>>> Nicoletta
>>>>>> Currentdb.Execute "qry" � un primo passo
>>>>>>
>>>>>>
>>>>> Scusami OneEDP ma non ho capito come fare. "qry" cos'�?
>>>>>
>>>>> Nicky
>>>> Ragazzaccia.
>>> Magari!
>>>
>>>  Che centr il numero delle righe....
>>>> Ok.
>>>>     Set qdfTemp = CurrentDb.CreateQueryDef("", "qui ci metti lo
>>>> statement sql update o delete")
>>>>       qdfTemp.Execute
>>>>       Debug.Print _
>>>>          "RecordsAffected after executing query " & _
>>>>          "from QueryDef: " & qdfTemp.RecordsAffected
>>>> e se gestisci gli errori (come credevo) puoi anche intercettare
>>>> eventuali anomalie...
>>>> Ciao
>>>>
>>>>
>>> ok era recordsaffected che cercavo...
>>>
>>> Per� non mi ritorna correttamente i valori
>>> Forse perch� sono all'interno di una transazione?
>>> In realt� se eseguo comandi di delete o update dagli interattivi
>>> ottengo comunque messaggi di ritorno di records trattati. Al limite
>>> poi rollbecco
>>> Nicky
>> Guardati F1 ODBCDirect
>> Ciao
>> Daniele
>>
>>
> Ma io non sto usando odbcdirect, sto usando query passthrough in area
> jet
A che ti serve la transazione per contare?
Ciao


text:
"giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
messaggio news:4acfad7a$0$711$5fc...@news.tiscali.it...
>> Non ho un oggetto querydef perch� la sintassi di questo flusso l'ho presa
>> dal documento di Alex e pensavo che si dovesse fare proprio in questo
>> modo per gestire le transazioni
>
> questo non significa che puoi fare la stessa cosa con un oggetto querydef
ahemm... si capisce poco niente!!
insomma... puoi fare tranquillamente la stessa cosa con un oggeto querydef
Giorgio Rancati


text:
OneEDP ha scritto:
> nicoletta wrote:
>> OneEDP ha scritto:
>>> nicoletta wrote:
>>>> OneEDP ha scritto:
>>>>> nicoletta wrote:
>>>>>> OneEDP ha scritto:
>>>>>>> nicoletta wrote:
>>>>>>>> Ciao a tutti,
>>>>>>>> volevo sapere come intercettare i messaggi di ritorno di una
>>>>>>>> query Passthrough.
>>>>>>>> Non voglio che mi appaia un msgbox ma gestirli da codice per
>>>>>>>> scriverli in un file di log.
>>>>>>>>
>>>>>>>> Nicoletta
>>>>>>> Currentdb.Execute "qry" ï¿œ un primo passo
>>>>>>>
>>>>>>>
>>>>>> Scusami OneEDP ma non ho capito come fare. "qry" cos'ï¿œ?
>>>>>>
>>>>>> Nicky
>>>>> Ragazzaccia.
>>>> Magari!
>>>>
>>>>  Che centr il numero delle righe....
>>>>> Ok.
>>>>>     Set qdfTemp = CurrentDb.CreateQueryDef("", "qui ci metti lo
>>>>> statement sql update o delete")
>>>>>       qdfTemp.Execute
>>>>>       Debug.Print _
>>>>>          "RecordsAffected after executing query " & _
>>>>>          "from QueryDef: " & qdfTemp.RecordsAffected
>>>>> e se gestisci gli errori (come credevo) puoi anche intercettare
>>>>> eventuali anomalie...
>>>>> Ciao
>>>>>
>>>>>
>>>> ok era recordsaffected che cercavo...
>>>>
>>>> Perï¿œ non mi ritorna correttamente i valori
>>>> Forse perchï¿œ sono all'interno di una transazione?
>>>> In realtï¿œ se eseguo comandi di delete o update dagli interattivi
>>>> ottengo comunque messaggi di ritorno di records trattati. Al limite
>>>> poi rollbecco
>>>> Nicky
>>> Guardati F1 ODBCDirect
>>> Ciao
>>> Daniele
>>>
>>>
>> Ma io non sto usando odbcdirect, sto usando query passthrough in area
>> jet
>
> A che ti serve la transazione per contare?
> Ciao
>
>
All'interno della transazione elimino i record da una tabella (vorrei
contarli) e in seguito riscrivo altri record (stavolta so quanti sono)
ed il tutto deve avvenire con una sola transazione per evitare
malfunzionamenti.
Nicky


author: robertolaforgia

text:
On 10 Ott, 14:22, nicoletta <
frt...@virgilio.it
> wrote:
> OneEDP ha scritto:
>
> > nicoletta wrote:
> >> OneEDP ha scritto:
> >>> nicoletta wrote:
> >>>> OneEDP ha scritto:
> >>>>> nicoletta wrote:
> >>>>>> OneEDP ha scritto:
> >>>>>>> nicoletta wrote:
> >>>>>>>> Ciao a tutti,
> >>>>>>>> volevo sapere come intercettare i messaggi di ritorno di una
> >>>>>>>> query Passthrough.
> >>>>>>>> Non voglio che mi appaia un msgbox ma gestirli da codice per
> >>>>>>>> scriverli in un file di log.
>
> >>>>>>>> Nicoletta
> >>>>>>> Currentdb.Execute "qry" è un primo passo
>
> >>>>>> Scusami OneEDP ma non ho capito come fare. "qry" cos'è?
>
> >>>>>> Nicky
> >>>>> Ragazzaccia.
> >>>> Magari!
>
> >>>>  Che centr il numero delle righe....
> >>>>> Ok.
> >>>>>     Set qdfTemp = CurrentDb.CreateQueryDef("", "qui ci metti lo
> >>>>> statement sql update o delete")
> >>>>>       qdfTemp.Execute
> >>>>>       Debug.Print _
> >>>>>          "RecordsAffected after executing query " & _
> >>>>>          "from QueryDef: " & qdfTemp.RecordsAffected
> >>>>> e se gestisci gli errori (come credevo) puoi anche intercettare
> >>>>> eventuali anomalie...
> >>>>> Ciao
>
> >>>> ok era recordsaffected che cercavo...
>
> >>>> Però non mi ritorna correttamente i valori
> >>>> Forse perché sono all'interno di una transazione?
> >>>> In realtà se eseguo comandi di delete o update dagli interattivi
> >>>> ottengo comunque messaggi di ritorno di records trattati. Al limite
> >>>> poi rollbecco
> >>>> Nicky
> >>> Guardati F1 ODBCDirect
> >>> Ciao
> >>> Daniele
>
> >> Ma io non sto usando odbcdirect, sto usando query passthrough in area
> >> jet
>
> > A che ti serve la transazione per contare?
> > Ciao
>
> All'interno della transazione elimino i record da una tabella (vorrei
> contarli) e in seguito riscrivo altri record (stavolta so quanti sono)
> ed il tutto deve avvenire con una sola transazione per evitare
> malfunzionamenti.
>
> Nicky
Scusami tanto, ma usare ADO ?


text:
robertolaforgia ha scritto:
> On 10 Ott, 14:22, nicoletta <
frt...@virgilio.it
> wrote:
>> OneEDP ha scritto:
>>
>>> nicoletta wrote:
>>>> OneEDP ha scritto:
>>>>> nicoletta wrote:
>>>>>> OneEDP ha scritto:
>>>>>>> nicoletta wrote:
>>>>>>>> OneEDP ha scritto:
>>>>>>>>> nicoletta wrote:
>>>>>>>>>> Ciao a tutti,
>>>>>>>>>> volevo sapere come intercettare i messaggi di ritorno di una
>>>>>>>>>> query Passthrough.
>>>>>>>>>> Non voglio che mi appaia un msgbox ma gestirli da codice per
>>>>>>>>>> scriverli in un file di log.
>>>>>>>>>> Nicoletta
>>>>>>>>> Currentdb.Execute "qry" � un primo passo
>>>>>>>> Scusami OneEDP ma non ho capito come fare. "qry" cos'�?
>>>>>>>> Nicky
>>>>>>> Ragazzaccia.
>>>>>> Magari!
>>>>>>  Che centr il numero delle righe....
>>>>>>> Ok.
>>>>>>>     Set qdfTemp = CurrentDb.CreateQueryDef("", "qui ci metti lo
>>>>>>> statement sql update o delete")
>>>>>>>       qdfTemp.Execute
>>>>>>>       Debug.Print _
>>>>>>>          "RecordsAffected after executing query " & _
>>>>>>>          "from QueryDef: " & qdfTemp.RecordsAffected
>>>>>>> e se gestisci gli errori (come credevo) puoi anche intercettare
>>>>>>> eventuali anomalie...
>>>>>>> Ciao
>>>>>> ok era recordsaffected che cercavo...
>>>>>> Per� non mi ritorna correttamente i valori
>>>>>> Forse perch� sono all'interno di una transazione?
>>>>>> In realt� se eseguo comandi di delete o update dagli interattivi
>>>>>> ottengo comunque messaggi di ritorno di records trattati. Al limite
>>>>>> poi rollbecco
>>>>>> Nicky
>>>>> Guardati F1 ODBCDirect
>>>>> Ciao
>>>>> Daniele
>>>> Ma io non sto usando odbcdirect, sto usando query passthrough in area
>>>> jet
>>> A che ti serve la transazione per contare?
>>> Ciao
>> All'interno della transazione elimino i record da una tabella (vorrei
>> contarli) e in seguito riscrivo altri record (stavolta so quanti sono)
>> ed il tutto deve avvenire con una sola transazione per evitare
>> malfunzionamenti.
>>
>> Nicky
>
> Scusami tanto, ma usare ADO ?
No, da quanto ne ho capito potrebbe non essere pi� supportato
Nicky


text:

Aspetto conferme in tal senso.
Comunque le transazioni le pui gestire tranquillamente con ado e il problema
del conteggio dei record, � davvero l'ultimo problema (con ADO)
CIao
>
> Nicky


author: Saqi

text:
Hi Guys,
I am using Microsoft Access 2002 SP1 and when I try to create report
using Microsoft Access 2002 SP1 I get the follwing error: The Wizard is
unable to create your report.
The above-mentioned error occurs when I set HP LaserJet 4100 PCL 6 as
my default printer.  But When I set KONICA MINOLTA IP-424 PS as my
default printer I can create reports without any problems.
Can anyone shed some light on this?
My system details are as follows:
MS Windows XP Version 5.1
Microsoft Access 2002 SP1


title: The Wizard is unable to create your report

author: MA

text:

The problem can be that the HP is not available.
Is it connected to your pc or it is in LAN, and if the printer is in LAN, is
it online?
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


text:
The HP printer is connected to the LAN and my PC can see it and printer
is in LAN.
Thanks for reply.


text:

So your printer is available?
Can you read "Ready" in the Printer folder?



title: Conversione di Date

author: Old-Jack

text:
Il problema è il seguente:
importo un file txt in un db di Access, questo file contiene varie
informazioni tra quale un campo numerico che corrisponde al valore di una
certa data. Esempio (2452467 = 11/08/2002)
C'è qualche funzione in Access che dato il valore numerico mi da la
corrispondente data in formato date?
Grazie
Old-Jack.


title: Conversione di Date

author: Il Gatto

text:
Old-Jack ha scritto:
> certa data. Esempio (2452467 = 11/08/2002)
Per curiosità, come funziona questa conversione? Io conosco solo di due
sistemi numerici di datazione: quello che usa Windows conta il numero di
secondi passati da una certa data (mi pare l' 1/1/1900, con azzeramento
del contatore a 32 bit nel 2035, per i fanatici del millenium bug), ma
in questo caso 2452467 sarebbero poco più di 28 giorni dal giorno 0, e
poi c'è quello di Visual Basic, che conta i giorni che sono passati dal
30/12/1899, (infatti se fai CDate(1) ottieni 31/12/1899) e qui 2452467 =
16/8/8614...
--
       ^    ^
oOo (Il Gatto) oOo


title: Conversione di Date

text:
"Il Gatto" <
no...@nowhere.no
> wrote in message
news:3D2D7717...@nowhere.no...

Onestamente non so come funziona, se non erro si chiama data in formato
giuliano
e dovrebbe essere gestita su DB di Oracle.
Ciao.


title: Conversione di Date

author: luca

text:
"Old-Jack" <
spi...@libero.it
> ha scritto nel messaggio
news:aVeX8.23955$7N3.5...@twister2.libero.it...



 Ciao.
se non vado errato la data in formato giuliano è aaaammgg così facendo fuoi
inserirla in un campo numerico e ordinarla crescente / decrescente
La si usa molto su as400
Luca


title: Conversione di Date

author: SimonenomiS

text:
> ...
> se non vado errato la data in formato giuliano è aaaammgg così facendo
> fuoi inserirla in un campo numerico e ordinarla crescente /
> decrescente La si usa molto su as400
URL:
http://www.sitocomune.com/
SECTION:  General
TITLE: Convertire una data in data giuliana.
AUTHOR: Giacomo Siliotti
La data giuliana e' formata da una stringa di 6 caratteri:
i primi 3 sono l'anno (anno della data da considerare - 1900)
i 3 seguenti sono il progressivo del giorno nell'anno.
Quindi:
Public Function data_giuliana(data As Date) As String
   Dim anno
   anno = Year(data)
   data_giuliana = Right("0" & ((anno - 1900) * 1000) + (DateValue(data) -
DateValue("01/01/" & anno) + 1), 6)
End Function
Ciao.
-----------------------------------------
http://digilander.iol.it/winses/


title: Conversione di Date

text:
"luca" <
luca....@tiscali.it
> wrote in message
news:agjunu$sed$1...@newsreader.mailgate.org...
[CUT]
> se non vado errato la data in formato giuliano è aaaammgg così facendo
fuoi
> inserirla in un campo numerico e ordinarla crescente / decrescente
> La si usa molto su as400
> Luca
L'unica cosa che mi hanno saputo dire è che dovrebbe essere un contatore di
giorni.....
Ovverro sono passati 2452467 giorni dal 01/01/1 al 11/08/2002)
Sempre se non ho capito male.
Ciao.


title: Conversione di Date

text:
"SimonenomiS" <Si...@nomiS.it> wrote in message
news:Xns92489853BB060...@193.70.192.192...

Ma per fare il contrario?
Da data giuliana in date?
Ciao.


title: Conversione di Date

text:
Old-Jack ha scritto:
> Ovverro sono passati 2452467 giorni dal 01/01/1 al 11/08/2002)
> Sempre se non ho capito male.
2.452.467 giorni sono 6719 anni, quindi qualcosa non torna sulla data 0,
che dovrebbe essere nel 4700errotti a.c.
Non credo neanche che sia una data giuliana, perchè se come ha detto
SimomenomiS è di 6 cifre qui ne abbiamo 7...



title: Salto tabulazione durante inserimento.

text:
Ciao a tutti. In una form ho una serie di caselle di testo, una
decina, che non sempre devono essere compilate durante l'inserimento,
sono praticamente dati aggiuntivi che riguardano solo alcuni
inserimenti. Queste caselle seguono l'ordine di tabulazione e, per i
record che non ne richiedono la compilazione, il percorrerli con il
tab mi rallenta l'inserimento. Volevo chiedere se c'era un modo, in
caso il primo di questi controlli ricevesse il focus senza essere
compilato, per saltare la tabulazione ad uno successivo (Es. dal
decimo al ventesimo nell'ordine di tabulazione)
Ho provato con il GotFocus del primo controllo (DescrizioneTipo) ma
non funziona.
If Me.DescrizioneTipo.OnLostFocus = Null Then
Me.Note.SetFocus
Mi spiegate la procedura corretta?
Grazie, Marco.


title: Salto tabulazione durante inserimento.

author: Cinzia

text:
"T_A_O" <
iln...@katamail.com
> ha scritto nel messaggio
news:1191661881....@w3g2000hsg.googlegroups.com...

Ciao MArco,
se ho ben capito devi mettere il l'istruzione di spostamento del focus
sull'evento uscita della prima textbox che potrebbe non essere
compilata.
Es:
Private Sub DescrizioneTipo_Exit(Cancel As Integer)
    if  isnull(me.descrizioneTipo) then Me.Note.SetFocus
End Sub
--
Cinzia [Office Access MVP]
_______________________

www.riolab.org
---------------------------------------->


title: Salto tabulazione durante inserimento.

text:
On 6 Ott, 15:51, "Cinzia" <
cinziapagani-no-spam_ple...@tiscali.it
>
wrote:
> "T_A_O" <
iln...@katamail.com
> ha scritto nel messaggionews:1191661881....@w3g2000hsg.googlegroups.com...

> ---------------------------------------->- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
Ciao Cinzia, scusa se non ti ho dato riscontro ma ho dovuto dedicarmi
ad altri problemi, ora provo subito la tua soluzione, grazie per la
risposta


title: Salto tabulazione durante inserimento.

text:

> risposta- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
E' ciò che mi serviva e ovviamente funziona :) Grazie ancora.


title: macro ripetuta 20 volte.....

author: Galvy

text:
Ciao a tutti vorrei sepere se esiste maniera (evitando di convertire le
macro in VBA) di creare una macro ricorsiva che però non mi dia errore se
viene ripetuta + di 20 volte........
Saluti Galvy


title: macro ripetuta 20 volte.....

text:
"Galvy" <
ga...@libero.it
> ha scritto nel messaggio
news:C0BW8.13279$K_4.3...@twister1.libero.it...

dim i
for i = 1 to 20
docmd.runmacro "nomemacro"
next i
dove nome macro è la tua macro creata .
fammi sapere.


title: macro ripetuta 20 volte.....

text:
"@----- Pinco --@-- Pallino -----@" <
tos...@libero.it
> ha scritto nel
messaggio news:bqSW8.18811$7N3.4...@twister2.libero.it...

Che bello............. le soluzioni più semplici sono sempre le
migliori(premetto che mi ero scordato di scrivere che la macro deve essere
eseguita 20 o + volte in base a quanti documenti genera automaticamente me)
Dim i,a
a=conteggio(id)
for i=1 to a
docmd.runmacro "nomemacro"
next i
mille grazioe soluzione semplice ed efficace


title: Access developer e macro di word

author: Marco

text:
Ciao a tutti
una domanda di tipo legale amministrativo, piuttosto che tecnica.
La mia applicazione Access (sì, proprio quella per cui vi sto rompendo i
cabasisi come dicono in Sicilia)
sfrutta una macro Word di sostituzione di caratteri.
Quando andrò a compilarla (si dice così?) con la developer lui mi "esporta"
(?) anche Word o quella parte di cui ha bisogno, oppure ci deve essere un
word preinstallato sulla macchina dove opererà  il mio Db????
Cioè, non potrebbe girare su un pc con solo il sistema operativo???
Grazie a tutti
Ciao
marco


title: Access developer e macro di word

author: Setec Astronomy

text:
Marco wrote:
> Ciao a tutti
> una domanda di tipo legale amministrativo, piuttosto che tecnica.
>
> La mia applicazione Access (sl, proprio quella per cui vi sto
> rompendo i cabasisi come dicono in Sicilia)
> sfrutta una macro Word di sostituzione di caratteri.
>
> Quando andrr a compilarla (si dice cosl?) con la developer lui mi
> "esporta" (?) anche Word o quella parte di cui ha bisogno, oppure ci
> deve essere un word preinstallato sulla macchina dove operer`  il mio
> Db????
E' necessario Word installato.
> Cioh, non potrebbe girare su un pc con solo il sistema operativo???
No. In alternativa pensa ad utilizzare RTF al posto di DOC.


title: Access developer e macro di word

text:
"Setec Astronomy" <setec@_NO_NOSPAM_freemail.it> ha scritto nel messaggio
news:HEOOa.157772$Ny5.4...@twister2.libero.it...

Il problema è proprio quello...
Ho un RFT che devo convertire in TXT per importarlo in Access e ho creato
una mascro di sostituzione (dove trova Numero: mi mette § che fa da
delimitatore di campo).
Per me sarebbe meglio far fare queste cose a Wordpad, ma non so se sia
programmabile o meno..


title: Access developer e macro di word

text:
Marco wrote:
>
> "Setec Astronomy" <setec@_NO_NOSPAM_freemail.it> ha scritto nel
> messaggio news:HEOOa.157772$Ny5.4...@twister2.libero.it...
> > Marco wrote:
[cut]
> > No. In alternativa pensa ad utilizzare RTF al posto di DOC.
>
> Il problema h proprio quello...
>
> Ho un RFT che devo convertire in TXT per importarlo in Access e ho
> creato una mascro di sostituzione (dove trova Numero: mi mette ' che
> fa da delimitatore di campo).
Scaricati il RICHTX32.OCX ed registralo.
Utilizza le funzioni Find per cercare e sostituire il contenuto del
file RTF.
Saluti.


title: Re: minimizzare access sulla system tray

author: Pablitomf

text:
Paolo ha scritto:
> come da oggetto.
> Mi sembrava d'aver letto un articolo da qualche parte ma non riesco più
> a trovarlo! Qualcuno puo' aiutarmi?
> Grazie a tutti
> Pao
C'è l'esempio nel sito di Alessandro (se non ricordo male)
--
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
----------------------------------
Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media.
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


author: Paolo


text:
ALESSANDRO Baraldi ha scritto:
> Non c'è.
> Forse Maurizio intendeva l'uso dell'Icona nella SySTray.
> Access non è un'applicazione che può andare in BackGround, quindi
> non si può fare.
> Quello che puoi fare è Minimizzare Access come task.
> Questo lo si fà se non ricordo male ShoWindows.
>
> Prova questa:
> Option Compare Database
> Option Explicit
>
>
> Const SW_HIDE = 0
> Const SW_MINIMIZE = 6
> Const SW_MAXIMIZE = 3
> Const SW_RESTORE = 9
> Const SW_SHOWNA = 8  ' show dopo hide
>
> Declare Function ShowWindow Lib "user32" (ByVal hWnd As Long, ByVal nCmdShow
> As Long) As Long
> Declare Function SetFocusA Lib "user32" Alias "SetFocus" (ByVal hWnd As
> Long) As Long
>
>
> Public Function ShowAppWindows(strQuale As String)
>     Dim myAppWnd As Long
>     Dim dummy As Long
>
>     myAppWnd = Application.hWndAccessApp
>
>     Select Case strQuale
>     Case "min"
>         dummy = ShowWindow(myAppWnd, SW_MINIMIZE)
>     Case "max"
>         dummy = ShowWindow(myAppWnd, SW_MAXIMIZE)
>     Case "hide"
>         dummy = ShowWindow(myAppWnd, SW_HIDE)
>     Case "show"
>         dummy = ShowWindow(myAppWnd, SW_SHOWNA)
>     Case "restore"
>         dummy = ShowWindow(myAppWnd, SW_RESTORE)
>     End Select
>
> End Function
>
> Ciao
>
grazie!! molto gentile provo subito!
ciao,
Pao


text:
Pablitomf ha scritto:
>>Mi sembrava d'aver letto un articolo da qualche parte ma non riesco più
>>a trovarlo! Qualcuno puo' aiutarmi?
>
>
>>Grazie a tutti
>>Pao
>
>
> C'è l'esempio nel sito di Alessandro (se non ricordo male)
>
Grazie!! ho guardato ma non lo trovo proprio!! qualcuno sa aiutarmi?
ciao
Pao


author: ALESSANDRO Baraldi

text:
"Paolo" <
pies...@email.it
> ha scritto nel messaggio
news:09oSd.933030$35.35...@news4.tin.it...

Non c'è.





    myAppWnd = Application.hWndAccessApp

End Function
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


author: Karl Donaubauer

text:
Paolo wrote:
> come da oggetto.
>
> Mi sembrava d'aver letto un articolo da qualche parte ma non riesco
> più a trovarlo! Qualcuno puo' aiutarmi?
Per minimizzare Access sul task bar basta anche un solo
RunCommand. Vedi
www.donkarl.com/it
 FAQ 1.10 Apertura del DB ridotto o ingrandito
Se veramente intendi il SySTray è un po' zoppo (dice il mio
dizionario) perché bisogna molto API, SubClassing, giochi
col Mouse ecc.
Un esempio francese pronto per AX:
http://www.logicielappui.com/tips/AccXP_SysTray.zip
Sembra che purtroppo l'autore ha dimenticato di indicare
che gran parte del codice e persino dei commenti è di
Dev Ashish come si vede qui:
http://www.mvps.org/access/api/api0045.htm
Come vendetta non scrivo il suo nome qui. ;-)
Poi un esempio independente per >=A00 dal collega tedesco
Phil Stiefel:
http://www.codekabinett.com/download/systray.zip
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it
+info sulla prima Conferenza Italiana per Sviluppatori di Access (CISA1)


text:
ALESSANDRO Baraldi ha scritto:
[CUT]
> Non c'č.
> Forse Maurizio intendeva l'uso dell'Icona nella SySTray.
Si, intendevo quello... forse avevo capito male. ;-)
--
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
----------------------------------
Non mi fido molto delle statistiche, perchč un uomo con la testa nel forno



title: Modifica record da codice

author: Giorgiom

text:
Salve,
qualcuno sa dimri come mai questo codice non funziona
mi da l'errore:
"METODO UPDATE O CANCELUPDATE SENZA ADDNEW O EDIT"
Function LOG_DB()
Dim DBS As Database, rst As dao.Recordset
Set DBS = CurrentDb
Set rst = DBS.OpenRecordset("TABELLA", dbOpenDynaset)
With rst
    .Edit
    .MoveLast
    ![data] = Now()
    .Update
End With
rst.Close
Exit Function
End Function
Grazie
Ciao
Giorgio
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Modifica record da codice

author: Bruno Campanini

text:
"Giorgiom" <
giorg...@tiscalinet.it
> wrote in message
news:dge2fn$m2p$1...@news.newsland.it...
> Salve,
> qualcuno sa dimri come mai questo codice non funziona
> mi da l'errore:
> "METODO UPDATE O CANCELUPDATE SENZA ADDNEW O EDIT"
>
>
> Function LOG_DB()
> Dim DBS As Database, rst As dao.Recordset
> Set DBS = CurrentDb
> Set rst = DBS.OpenRecordset("TABELLA", dbOpenDynaset)
> With rst
>    .Edit
>    .MoveLast
>    ![data] = Now()
>    .Update
> End With
> rst.Close
> Exit Function
> End Function
>
> Grazie
> Ciao
> Giorgio
Prova cosě:
-----------------------------
Function LOG_DB()
Dim DBS As Database, rst As dao.Recordset
Set DBS = CurrentDb
Set rst = DBS.OpenRecordset("TABELLA", dbOpenDynaset)
rst.MoveLast
With rst
    .Edit
    ![data] = Now()
    .Update
End With
End Function
-------------------------------
Ciao
Bruno


title: Modifica record da codice

text:
salve
Ho una maschera con all'interno una casella di testo non associata che si
chiama [DATA_APP]
inserisco una data in questa casella di testo e poi clickando su un
pulsante mi esegue il seguente codice
Dim DATA_APP As String
Dim DBS As Database, rst As dao.Recordset
Set DBS = CurrentDb
Set rst = DBS.OpenRecordset("tabella", dbOpenDynaset)
rst.MoveLast
rst.MovePrevious
With rst
    .Edit
    ![data_nuova_p] = [DATA_APP]
    .Update
End With
rst.Close
pero' nel campo [data_nuova_p] non mi meorizza il valore della casella di
testo [DATA_APP]
Non riesco a capire come mai..



title: Modifica record da codice

text:
"Giorgiom" <
giorg...@tiscalinet.it
> wrote in message
news:dggn15$re2$1...@news.newsland.it...
> salve
> Ho una maschera con all'interno una casella di testo non associata che si
> chiama [DATA_APP]
> inserisco una data in questa casella di testo e poi clickando su un
> pulsante mi esegue il seguente codice
>
> Dim DATA_APP As String
> Dim DBS As Database, rst As dao.Recordset
> Set DBS = CurrentDb
> Set rst = DBS.OpenRecordset("tabella", dbOpenDynaset)
> rst.MoveLast
> rst.MovePrevious
> With rst
>    .Edit
>    ![data_nuova_p] = [DATA_APP]
>    .Update
> End With
> rst.Close
>
>
> pero' nel campo [data_nuova_p] non mi meorizza il valore della casella di
> testo [DATA_APP]
>
> Non riesco a capire come mai..
Elimina la prima istruzione sopra elencata:
Dim DATA_APP As String
e sostituisci
![data_nuova_p] = [DATA_APP]
con:
![data_nuova_p] = ![DATA_APP]
Bruno


title: Modifica record da codice

text:
> Elimina la prima istruzione sopra elencata:
> Dim DATA_APP As String
> e sostituisci
> ![data_nuova_p] = [DATA_APP]
> con:
> ![data_nuova_p] = ![DATA_APP]
> Bruno
Ho provato a fare come mi hai suggerito ma mi da questo errore:
"errore di runtime 3265
elemnto non trovato in questo insieme"
se poi facci il debug mi evidenzia in giallo questa riga:
![data_nuova_p] = ![DATA_APP]
Grazie in anticipo



title: Modifica record da codice

text:
"Giorgiom" <
giorg...@tiscalinet.it
> wrote in message
news:dgh57b$q9j$1...@news.newsland.it...
> Ho provato a fare come mi hai suggerito ma mi da questo errore:
> "errore di runtime 3265
> elemnto non trovato in questo insieme"
>
> se poi facci il debug mi evidenzia in giallo questa riga:
> ![data_nuova_p] = ![DATA_APP]
[data_nuova_p] č il nome del campo di "tabella",
[DATA_APP] il nome del TextBox sulla scheda.
Controlla che vi sia corrispondenza e la grafia sia corretta.
Metti REM davanti a tutto il With... End With e metti prima
di rst.Close (che a fine routine non serve a niente)
MsgBox rst![data_nuova_p].
Dimmi se ti legge il campo, ché mi č venuto un dubbio...
Bruno


title: Modifica record da codice

text:
> [data_nuova_p] č il nome del campo di "tabella",
> [DATA_APP] il nome del TextBox sulla scheda.
> Controlla che vi sia corrispondenza e la grafia sia corretta.
> Metti REM davanti a tutto il With... End With e metti prima
> di rst.Close (che a fine routine non serve a niente)
> MsgBox rst![data_nuova_p].
> Dimmi se ti legge il campo, ché mi č venuto un dubbio...
> Bruno
Ho provato a commentare le righe ed o lasciato solo:
Private Sub Comando0_Click()
 Dim DBS As Database, rst As dao.Recordset
 Set DBS = CurrentDb
 Set rst = DBS.OpenRecordset("tabella", dbOpenDynaset)
 rst.MoveLast
 rst.MovePrevious
 'With rst
 '.Edit
 ![data_nuova_p] = ![data_app]
 '.Update
 'End With
 MsgBox rst![data_nuova_p]
 rst.Close
End Sub
quando clicco sul pulsante pero mi da questo errore:
"errore di compilazione - riferimento non valido o non qualificato"
e poi mi evidenzia:
![data_app]
Grazie



title: Modifica record da codice

text:
"Giorgiom" <
giorg...@tiscalinet.it
> wrote in message
news:dgh7j7$uul$1...@news.newsland.it...
> Ho provato a commentare le righe ed o lasciato solo:
>
> Private Sub Comando0_Click()
> Dim DBS As Database, rst As dao.Recordset
> Set DBS = CurrentDb
> Set rst = DBS.OpenRecordset("tabella", dbOpenDynaset)
> rst.MoveLast
> rst.MovePrevious
> 'With rst
> '.Edit
> ![data_nuova_p] = ![data_app]
> '.Update
> 'End With
> MsgBox rst![data_nuova_p]
> rst.Close
>
> End Sub
>
>
> quando clicco sul pulsante pero mi da questo errore:
> "errore di compilazione - riferimento non valido o non qualificato"
> e poi mi evidenzia:
> ![data_app]
Quindi il record non esiste ovvero la tabella è danneggiata.
Ma tu vuoi creare un record nuovo o editarne uno già
esistente (in questo caso il penultimo)?
Bruno


title: Modifica record da codice

text:
> Quindi il record non esiste ovvero la tabella è danneggiata.
> Ma tu vuoi creare un record nuovo o editarne uno già
> esistente (in questo caso il penultimo)?
> Bruno
Ciao Bruno
Io voglio editarne uno gia esistente (come dici tu è il penultimo) ed in
questa tabella ho gia inserito dei records e se scorro la maschera li vedo



title: Modifica record da codice

text:
"Giorgiom" <
giorg...@tiscalinet.it
> wrote in message
news:dgh8hr$p5$1...@news.newsland.it...
>> Quindi il record non esiste ovvero la tabella è danneggiata.
>> Ma tu vuoi creare un record nuovo o editarne uno già
>> esistente (in questo caso il penultimo)?
>
>> Bruno
>
> Ciao Bruno
>
> Io voglio editarne uno gia esistente (come dici tu è il penultimo) ed in
> questa tabella ho gia inserito dei records e se scorro la maschera li vedo
Vedi anche il penultimo col contenuto dei vari campi?
Bruno


title: Modifica record da codice

author: Roberto dalla campagna

text:
"Giorgiom" <
giorg...@tiscalinet.it
> ha scritto nel messaggio
news:dge2fn$m2p$1...@news.newsland.it...
> Salve,
> qualcuno sa dimri come mai questo codice non funziona
> mi da l'errore:
> "METODO UPDATE O CANCELUPDATE SENZA ADDNEW O EDIT"
>
>
> Function LOG_DB()
> Dim DBS As Database, rst As dao.Recordset
> Set DBS = CurrentDb
> Set rst = DBS.OpenRecordset("TABELLA", dbOpenDynaset)
> With rst
>     .Edit
>     .MoveLast
>     ![data] = Now()
>     .Update
> End With
> rst.Close
> Exit Function
> End Function
Innanzitutto questo codice VBA fa riferimento alla libreria Microsoft DAO
quindi, se usi una versione di Access sccessiva ad Access 97, devi
aggiungere al database i riferimenti a Microsoft DAO 3.6 Object Librari e
poi modificare la riga:
Dim DBS As Database, rst As dao.Recordset
con:
Dim DBS As DAO.Database, rst As DAO.Recordset
Ciň premesso il codice VBA di cui sopra sembra debba lavorare SOLO con
l'ultimo o unico record contenuto in TABELLA, ma comunque per far questo
occorre che .MoveLaste preceda e NON segua .Edit, altrimenti per il record
corrente (l'ultimo) viene effettuata nč una .AddNew e neppure una .Edit, da
qui giustamente la segnalazione dell'errore da parte di Access.
Poi alla fine invece di
rst.Close
ti consiglio di chiudere con:
Set DBS = Nothing
Set rst = Nothing
>
> Grazie
Prego.
> Ciao
> Giorgio
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Modifica record da codice

text:
> Vedi anche il penultimo col contenuto dei vari campi?
> Bruno
Ciao
Si vedo anche il penultimo con il contenuto che ho inserito
quindi inserisco la data nella mia casella di testo non associata
[data_app]e se clicco sul pulsante mi da il solito errore:
"errore di compilazione riferimento non valido o non qualificato"
e nel debug si posiziona sul "![data_app]"
Grazie e ciao



title: Modifica record da codice

text:
> Si vedo anche il penultimo con il contenuto che ho inserito
> quindi inserisco la data nella mia casella di testo non associata
> [data_app]e se clicco sul pulsante mi da il solito errore:
> "errore di compilazione riferimento non valido o non qualificato"
> e nel debug si posiziona sul "![data_app]"
> Grazie e ciao
> Giorgio
Sono riuscito a risorverlo
Private Sub Comando0_Click()
> Dim DBS As Database, rst As dao.Recordset
> Set DBS = CurrentDb
> Set rst = DBS.OpenRecordset("tabella", dbOpenDynaset)
> rst.MoveLast
> rst.MovePrevious
> 'With rst
> '.Edit
> ![data_nuova_p] = data_app   <========
> '.Update
> 'End With
> MsgBox rst![data_nuova_p]
> rst.Close
>
> End Sub
bisognava togliere il punto esclamativo e le parentesi quadre sul campo
data_app
Grazie
Ciao



title: Modifica record da codice

text:
"Giorgiom" <
giorg...@tiscalinet.it
> wrote in message
news:dgll48$il5$1...@news.newsland.it...

Già, perché altrimenti dentro il With... End With
il programma considera data_app un campo di rst.
La sintassi corretta è:
![data_nuova_p] = Me![data_app]
Uno dei pochi casi in cui Me è veramente necessario...
Ciao
Bruno


title: Database per partite calcio

author: Brunix

text:
Ciao a tutti,
avrei bisogno di qualche dritta per progettare un db per gestire dei
campionati di calcio con le relative partite. Una volta creato il db, devo
essere in grado di tirar fuori la classifica delle squadre tramite una
query, con il punteggio, partite giocate, vinte, pareggiate e perse, gol
fatti e subiti.
Cosa mi consigliate di fare per poter ricavare i dati senza uscirne pazzo?
Grazie in anticipo per l'aiuto.
Ciao
Brunix


title: Database per partite calcio

author: Giulio Simeone

text:
Brunix

Tu hai una tabella con tutti i risultati delle partite, č cosě?
Una query non ti basta. Devi scrivere del codice che, per ogni squadra:
- Scorra tutta la tabella;
- Prenda in considerazione le righe che contengono il nome di quella
squadra. Fai attenzione: una squadra a volte gioca in casa, a volte fuori
casa e quindi il suo nome non compare sempre nella stessa colonna.
- Per ogni riga, ovvero per ogni partita, calcoli se la squadra ha vinto,
perso o pareggiato;
- Faccia la somma dei punti ottenuti, delle partite vinte, ecc.
Via via metti tutti i dati relativi alle squadre in una tabella; ordini
questa tabella sulla base del punteggio e la visualizzi.
Come te la cavi con il Visual Basic?
Giulio
http://k.1asphost.com/gsimeone/nuova_pagina_1.htm
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Database per partite calcio

author: cidi

text:
"Brunix" <
dymios...@alice.it
> ha scritto nel messaggio
news:43b3fff5$0$1068$4faf...@reader3.news.tin.it...

Ciao Brunix
il nostro assente Pablito si è divertito con questo:
http://www.geviservices.it/Files/DB/Calcioeasy.zip
ma ci sono altri esempi basta cercare con google nello storico del NG
Daniele


title: Database per partite calcio

text:
"Giulio Simeone" <
viandan...@yahoo.it
> ha scritto nel messaggio
news:dp10f6$tjg$1...@news.newsland.it...
> Brunix
>
>> Ciao a tutti,
>> avrei bisogno di qualche dritta per progettare un db per gestire dei
>> campionati di calcio con le relative partite. Una volta creato il db,
>> devo
>> essere in grado di tirar fuori la classifica delle squadre tramite una
>> query, con il punteggio, partite giocate, vinte, pareggiate e perse, gol
>> fatti e subiti.
>> Cosa mi consigliate di fare per poter ricavare i dati senza uscirne
>> pazzo?
>> Grazie in anticipo per l'aiuto.
>> Ciao
>> Brunix
>
> Tu hai una tabella con tutti i risultati delle partite, è così?
>
> Una query non ti basta. Devi scrivere del codice che, per ogni squadra:
>
> - Scorra tutta la tabella;
>
> - Prenda in considerazione le righe che contengono il nome di quella
> squadra. Fai attenzione: una squadra a volte gioca in casa, a volte fuori
> casa e quindi il suo nome non compare sempre nella stessa colonna.
>
> - Per ogni riga, ovvero per ogni partita, calcoli se la squadra ha vinto,
> perso o pareggiato;
>
> - Faccia la somma dei punti ottenuti, delle partite vinte, ecc.
>
> Via via metti tutti i dati relativi alle squadre in una tabella; ordini
> questa tabella sulla base del punteggio e la visualizzi.
>
> Come te la cavi con il Visual Basic?
>
> Giulio
>
>
http://k.1asphost.com/gsimeone/nuova_pagina_1.htm
>
>
> --
>
> questo articolo e` stato inviato via web dal servizio gratuito
>
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it
>
>
Ciao,
grazie per i consigli.
Avevo immaginato che una query non bastasse anche perchè ci sono troppe
condizioni (casa, trasferta, punteggio...). In visual basic me la cavo
abbastanza bene, ma questo db dovrà andare sul web ed essere interfacciato
con il php. Quindi, tutto questo dovrò farlo in php.
Comunque, a livello di database, avevo pensato a questa struttura:
Campionato(<codice>, nome, ...
Squadra(<codice>, nome, campionato...)
Campo(<codice>, nome, indirizzo, ...)
Partita(<campionato>, <squadra1>, <squadra2>, gol1, gol2, data, ora, campo,
giornata, a/r)
p.s. <xxx> = chiave primaria
Cosa ne dite, può andar bene?
Grazie
ciao
Brunix


title: Database per partite calcio

author: Napoleone

text:
"Brunix" <
dymios...@alice.it
> ha scritto nel messaggio
news:43b3fff5$0$1068$4faf...@reader3.news.tin.it...

Ciao Brunix,
alcuni giorni fą, Maurizio Facciuti, ha messo a disposizione un bellisssimo
db d'esempio, riguardante proprio quanto chiedi tu. Trovalo, penso ci
troverai molte risposte a quanto chiedi.
Notte
Napoleone


title: Help for ACCESS Certification Practice Tests

author: Katabohx

text:
Hi all,
someone could help me?
I'm looking for Access 2000 practice tests.
Do you know some web site (similar to
mcsebraindumps.com
 about MCSE exams)
to download these tests?
or some demo questions? better than nothing... ; )
Thanks


text:
We use transcender products.
http://www.transcender.com/
"Katabohx" <
kata...@katamail.com
> wrote in message
news:vtTU9.22005$lj5.2...@tornado.fastwebnet.it...



title: problema struttura ad albero...

author: Flyzone

text:
Sono un bel pò arrugginito sigh :(
Mi ritrovo con una serie di dati tipo questi:
Alfa.Alessia.Compito
Alfa.Alessia.Lavoro
Alfa.Alessia.Studio
Alfa.Daniela.Casa
Alfa.Daniela.Ufficio
Beta.Francesco.Chitarra
Beta.Livia.Computer
Beta.Livia.Scrivania
Hem... scusate l'esempietto stupido...
cmq quello che intendo dire è che mi ritrovo
A.B.C, dove C non è MAI uguale ad altri.
La struttura ad "albero" è definita in altezza
ma può aumentare in larghezza: A.B.C fissi (non
può esistere un D), ma possono aumentare i numero di B e di C
Poi dovrei da una maschera selezionare il campo
C e in automatico dovrebbe andarmi a prendere B ed A...
cioè seleziono "Computer" e mi prende "Livia" e "Beta".
Come costruisco una struttura del genere?
E nella maschera che combino?
Grazie
Fly
P.S. ho provato ad andare sul sito comune ma l'esempio che trovo
mi crea qualche problema....


title: db fatture.

author: access il top

text:
Ciao a tutti utilizzo un programma che mi crea le fatture solo che ha
dei costi di gestione elevatissimi e farň in un anno un 150 fatture.
qualcuno sa dirmi se c'č un db free in access cosě se voglio
personalizzarlo riesco.
grazie mille


title: db fatture.

author: ciroteo

text:
"access il top" <
negrinel...@yahoo.it
> ha scritto nel messaggio
news:41d28df1$0$8207$5fc...@news.tiscali.it...
> Ciao a tutti utilizzo un programma che mi crea le fatture solo che ha
> dei costi di gestione elevatissimi e farò in un anno un 150 fatture.
>
> qualcuno sa dirmi se c'è un db free in access così se voglio
> personalizzarlo riesco.
>
> grazie mille
>
>
Caro mio nella vita di free c'è poco, in questo posto magari trovi qualche
consglio e gente disposta ad aiutarti nel caso in cui tu volessi  provare a
smanettare un po' con access, e seguire il newsgroup. Non ti firmi access
top? Anche per noi Access è il top quindi ... un po' di sforzo e troverai
grandi soddisfazioni!
Altrimenti ti consiglio di leggere un messaggio di Carlo Costarella di
qualche giorno fa in cui veniva segnalato un gestionale free che però era
stato creato per supportare l'attività di un'associazione di volontariato.
Fossi in te lo guarderei e contribuirei alla causa con qualche offerta, che
sarà sicuramente inferiore ai "prezzi elevatissimi" del tuo super programma.


title: db fatture.

text:
"ciroteo" <
ciroteo_c...@libero.it
> ha scritto nel messaggio
news:cqu3li$gm9$1...@hulme.interac.it...

un'altra informazione, sapete se si strova per caso un db anche a
pagamento.. (poco possibilmente) che però è strutturato in access in
modo da poterlo modificare


title: db fatture.

text:
"access il top" <
negrinel...@yahoo.it
> ha scritto nel messaggio
news:41d297c0$0$10913$5fc...@news.tiscali.it...

Io ce l'ho ... come pensi di pagare?


title: db fatture.

author: Pablitomf (dalle ferie)

text:
ciroteo ha scritto:
[CUT]
> > un'altra informazione, sapete se si strova per caso un db anche a
> > pagamento.. (poco possibilmente) che però è strutturato in access in
> > modo da poterlo modificare
> Io ce l'ho ... come pensi di pagare?
E dai "VENALE"... manco a Natale si è + buoni? Un bel pacco dono
infiocchettato con tanto di contrassegno e ti passa la paura... :D
--
Ciao
Pablitomf (Maurizio Facciuti)
------------------------------
http://www.sitocomune.com/
http://www.accessgroup.it/
------------------------------
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: db fatture.

text:
"Pablitomf (dalle ferie)" <
maurizio...@accessgroup.it
> ha scritto nel
messaggio news:cqu7dj$2nh$1...@news.newsland.it...

Mentre tu stai svernando in ferie,  Qui si fa il business ... 40mila euro
possono bastare?


title: db fatture.

text:
ciroteo ha scritto:
[CUT]
> Mentre tu stai svernando in ferie,
Non ancora ferie serie... aspetto il 06/01 per andare a Praga... per ora
ozio a casa... :-P
> Qui si fa il business ... 40mila euro possono bastare?
Azz!!!! BUSINESS???? Questa è usura :-D



title: db fatture.

text:
"Pablitomf (dalle ferie)" <
maurizio...@accessgroup.it
> ha scritto nel
messaggio news:cqu8uq$d0f$1...@news.newsland.it...

shshshhhhhhhhh! stava per cascarci! ...
Passato bene il Natale?
p.s. vedi 3d con alex baraldi sulla classe di ferro tu di che anno 6?


title: db fatture.

text:
ciroteo ha scritto:
[CUT]
> shshshhhhhhhhh! stava per cascarci! ...
se, se...
> Passato bene il Natale?
Insieme all'influenza, che ancora insiste nel tenermi compagnia! (Ecco il
perchč della mia presenza quě e non a fare scorribande per strada)
Spero tu non lo abbia passato come me.
> p.s. vedi 3d con alex baraldi sulla classe di ferro tu di che anno 6?
Visto e risposto.



title: db fatture.

text:
"Pablitomf (dalle ferie)" <
maurizio...@accessgroup.it
> ha scritto nel
messaggio news:cquar3$rkd$1...@news.newsland.it...
> ciroteo ha scritto:
>
> [CUT]
>> shshshhhhhhhhh! stava per cascarci! ...
>
> se, se...
>
>> Passato bene il Natale?
>
> Insieme all'influenza, che ancora insiste nel tenermi compagnia! (Ecco il
> perchč della mia presenza quě e non a fare scorribande per strada)
> Spero tu non lo abbia passato come me.
Fortunatamente io ho solo un raffreddore costante da qualche settimana, ma
niente febbre.
Dai che ti riprendi, pare che Praga sia davvero eccezionale, ti auguro di
riprenderti e di divertirti alla grande!
Io andrň a vedere lo spettacolo di Beppe Grillo al palazzetto di Varese,
secondo me quello li live č meglio del Biso registrato!



title: db fatture.

text:
"Pablitomf (dalle ferie)" <
maurizio...@accessgroup.it
> ha scritto
nel messaggio news:cquar3$rkd$1...@news.newsland.it...

non ho ancora pensato, e soprattutto quanto vorresti???


title: db fatture.

text:
ciroteo ha scritto:
[CUT]
> Fortunatamente io ho solo un raffreddore costante da qualche settimana, ma
> niente febbre.
> Dai che ti riprendi, pare che Praga sia davvero eccezionale, ti auguro di
> riprenderti e di divertirti alla grande!
Faremo il possibile.
> Io andrò a vedere lo spettacolo di Beppe Grillo al palazzetto di Varese,
> secondo me quello li live è meglio del Biso registrato!
Bhè io mi accontenterà stasera di Vincenzo Salemme a teatro...
Cmq, quando vorrete l'invito a Napoli (e non in zone limitrofe per colpa
di Biso che o non conosce le strade o perchè si scoccia di guidare fino a
quì dalla vallata di Heidy!!!!!) è sempre valido... la pizza è sempre in
caldo.



title: db fatture.

text:
access il top ha scritto:
[CUT]
> non ho ancora pensato, e soprattutto quanto vorresti???
[...voi non udite...]
Private Sub RAGIONIER_USURAIO_POST ()
Msgbox "Bhč io avevo sentito 40mila :-D. Ci stai?"
If reponse = Yes then
   Msgbox "FREGATO"
Else
   Me.Mio_Conto_Corrente = Mio_Conto_Corrente + 40.000
   Msgbox "GRAZIE. postami il tuo email che te lo invio"
End If
End Sub
[...ok, ora potete pure udire...]



title: db fatture.

text:
"access il top" <
negrinel...@yahoo.it
> ha scritto nel messaggio
news:41d2b48d$0$10910$5fc...@news.tiscali.it...
>
> "Pablitomf (dalle ferie)" <
maurizio...@accessgroup.it
> ha scritto
> nel messaggio news:cquar3$rkd$1...@news.newsland.it...
>> ciroteo ha scritto:
>>
>> [CUT]
>> > shshshhhhhhhhh! stava per cascarci! ...
>>
>> se, se...
>>
>> > Passato bene il Natale?
>>
>> Insieme all'influenza, che ancora insiste nel tenermi compagnia! (Ecco
> il
>> perchè della mia presenza quì e non a fare scorribande per strada)
>> Spero tu non lo abbia passato come me.
>>
>> > p.s. vedi 3d con alex baraldi sulla classe di ferro tu di che anno
> 6?
>>
>> Visto e risposto.
>>
>> --
>> Ciao
>> Pablitomf (Maurizio Facciuti)
>>
>> ------------------------------
>>
http://www.sitocomune.com/
>>
http://www.accessgroup.it/
>> ------------------------------
>>
>> questo articolo e` stato inviato via web dal servizio gratuito
>>
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it
>>
>>
> non ho ancora pensato, e soprattutto quanto vorresti???
>
>
>
E' ovvio che scherzavo!
Se vuoi qualche esempio contattami via e-mail che magari ti mando qualche
prova che ho in giro, in realtà non avrebbe senso vendere qualcosa senza
essere legittimati a farlo! E non voglio certo una visita della finanza ....
ehehe!!
Ti ripeto se si tratta di un programmino per fare delle fatture pian piano
lo puoi creare da solo o con qualche indicazione degli amici, se invece
parliamo di un gestionale fatto e finito, sicuramente il prodotto che hai,
pur non sapendo quanto ti costi e che cosa possa fare, è allineato ai prezzi
di mercato.


title: db fatture.

text:
"ciroteo" <
ciroteo_c...@libero.it
> ha scritto nel messaggio
news:cqudet$h3q$1...@hulme.interac.it...

a me servirebbe un programmino per fare le fatture che abbia un archivio
clienti un archivio articoli e basta.
quello che uso adesso è un vero e proprio gestionale con libri maestri
ecc ecc ecc che nemmeno uso occupa un sacco di spazio, usa oracle come
database
mandami per favore quello che riesci. se è quello che usi te meglio
ancora, ovviamente senza dai


title: db fatture.

text:
access il top ha scritto:
[CUT]
Impariamo a sfoltire i POST prima di rispondere è ?!?!?!
> a me servirebbe un programmino per fare le fatture che abbia un archivio
> clienti un archivio articoli e basta.
> quello che uso adesso è un vero e proprio gestionale con libri maestri
I Libri sono MASTRI :-D
> ecc ecc ecc che nemmeno uso occupa un sacco di spazio, usa oracle come
> database
> mandami per favore quello che riesci. se è quello che usi te meglio
> ancora, ovviamente senza dai



title: db fatture.

text:
> a me servirebbe un programmino per fare le fatture che abbia un archivio
> clienti un archivio articoli e basta.
> quello che uso adesso è un vero e proprio gestionale con libri maestri
> ecc ecc ecc che nemmeno uso occupa un sacco di spazio, usa oracle come
> database
> mandami per favore quello che riesci. se è quello che usi te meglio
> ancora, ovviamente senza dai
vabbè domani rientro in ufficio e vedo cosa posso mandarti ...
sicuro di non volerci provare da solo?


title: orologio in una maschera

author: Antonio Bechelli

text:
Salve a tutto il ng,
chiedo se sia possibile visualizzare all'interno di una maschera
l'orologio di sistema, quello cioč che compare sulla barra delle
applicazioni di windows.
grazie e ciao
Antonio
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: orologio in una maschera

author: Massimiliano Amendola  kksrl

text:
> Salve a tutto il ng,
> chiedo se sia possibile visualizzare all'interno di una maschera
> l'orologio di sistema, quello cioč che compare sulla barra delle
> applicazioni di windows.
> grazie e ciao
> Antonio
Vado di fantasia..
una micromaschera in cui c'č il testo0
sull'evento timer (impostato a 1 sec)
me.testo0 = now()
uah e che č......
ciao MAssimiliano
in fibrillazione x un successo qui in azienda...


title: orologio in una maschera

author: Carlo Costarella

text:
"Antonio Bechelli" <
antonio....@comune.milano.it
> ha scritto nel
messaggio news:96e07e0145fb0dcd62f...@mygate.mailgate.org...

Una strada:
nel modulo della maschera:
Private Sub Form_Timer()
Me.TuaCasellaDiTesto = Time
End Sub
Imposta l'intervallo timer a 1000
Ciao, Carlo


title: orologio in una maschera

author: Potone

text:
"Antonio Bechelli" <
antonio....@comune.milano.it
> ha scritto nel messaggio
news:96e07e0145fb0dcd62f...@mygate.mailgate.org...

io inserirei infondo alla maschera un oggetto StatusBar (Microsoft Status Bar Control) simile alla barra di stato delle applicazioni
(Acces compreso), questo
controllo consente di visualizzare l'orologio proprio come quello di windows e lo aggiorna automaticamente.
Ciao,
Mat.


title: orologio in una maschera

author: Mike Pritt

text:
"Antonio Bechelli" <
antonio....@comune.milano.it
> ha scritto nel
messaggio news:96e07e0145fb0dcd62f...@mygate.mailgate.org...

Permettimi di non rispondere al post, ma solo perchč le risposte che ho
letto mi sembrano tutte buone.
Il mio dilemma č: non si appesantisce il programma impostando l'evento sul
timer?
Buon lavoro a tutti, Mike.


title: tabella con campi da visualizzare in verticale

author: aaa

text:
ho una tabella fatta cosě:
campo1|campo2|campo3
10    |bbbbbb|cccccc
20    |bbbbb1|ccccc1
volgio fare una query che mi restituisca questo:
10|campo2|bbbbbb
10|campo3|cccccc
20|campo2|bbbbb1
20|campo3|ccccc1
non so se mi sto perdendo in un bicchiere d'acqua ma non sono riuscito
dopo varie prove ad ottenere nulla. ho provato ad usare le query a campi
incrociati ma non ho ottenuto quello che voglio
qualcuno ha un'idea?
ciao e buon lavoro a tutti
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


author: Roberto da casa

text:
"aaa" <
mai...@libero.it
> ha scritto nel messaggio
news:dl9rqo$m81$1...@news.newsland.it...
> ho una tabella fatta cosě:
>
> campo1|campo2|campo3
> 10    |bbbbbb|cccccc
> 20    |bbbbb1|ccccc1
>
> volgio fare una query che mi restituisca questo:
>
> 10|campo2|bbbbbb
> 10|campo3|cccccc
> 20|campo2|bbbbb1
> 20|campo3|ccccc1
>
> non so se mi sto perdendo in un bicchiere d'acqua ma non sono riuscito
> dopo varie prove ad ottenere nulla. ho provato ad usare le query a campi
> incrociati ma non ho ottenuto quello che voglio
>
> qualcuno ha un'idea?
Penso proprio che tu non abbia bisogno di una query a campi incrociati ma di
una query unione.
Se la tabella che contiene i dati si chiama Tabella1, prova con una query
unione che abbia il seguente codice SQL:
SELECT Tabella1.campo1, "campo2" AS campo, Tabella1.campo2 As campobis
FROM Tabella1
UNION SELECT Tabella1.campo1, "campo3" AS campo, Tabella1.campo3 As campobis
FROM Tabella1;
>
> ciao e buon lavoro a tutti
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


text:
Roberto da casa ha scritto:
> "aaa" <
mai...@libero.it
> ha scritto nel messaggio
> news:dl9rqo$m81$1...@news.newsland.it...
> > ho una tabella fatta cosě:
> >
> > campo1|campo2|campo3
> > 10    |bbbbbb|cccccc
> > 20    |bbbbb1|ccccc1
> >
> > volgio fare una query che mi restituisca questo:
> >
> > 10|campo2|bbbbbb
> > 10|campo3|cccccc
> > 20|campo2|bbbbb1
> > 20|campo3|ccccc1
> >
> > non so se mi sto perdendo in un bicchiere d'acqua ma non sono riuscito
> > dopo varie prove ad ottenere nulla. ho provato ad usare le query a campi
> > incrociati ma non ho ottenuto quello che voglio
> >
> > qualcuno ha un'idea?
> Penso proprio che tu non abbia bisogno di una query a campi incrociati ma di
> una query unione.
> Se la tabella che contiene i dati si chiama Tabella1, prova con una query
> unione che abbia il seguente codice SQL:
> SELECT Tabella1.campo1, "campo2" AS campo, Tabella1.campo2 As campobis
> FROM Tabella1
> UNION SELECT Tabella1.campo1, "campo3" AS campo, Tabella1.campo3 As campobis
> FROM Tabella1;
> >
> > ciao e buon lavoro a tutti
perfetto grazie mille.
ciao



title: Problema con TransferDatabase

author: yosef

text:
Ho una procedure che elimina tutte le tabelle collegate e
successivamente le ricollego, per migliorare questo tipo di operazione,
anzichè collegare uno alla volta le tabelle ho creato un tabella
contenente un campo origine e un campo destinazione; nel campo origine
sono contenute le tabelle del database BE e nel campo destinazione i
nomi dei campi che assumeranno nel database FE.
Faccio questo tipo di procedura:
'Imposto il recordset
    Set rs = CurrentDb.OpenRecordset("SELECT
tc.id
, tc.origine,
tc.destinazione FROM TabelleCollegate AS tc WHERE dbsql = 'filtro' ;")
'e fin quì tutto bene
    If rs.EOF Then
    Else
        rs.MoveFirst
    End If
    While Not rs.EOF
        MsgBox rs("origine") & " - " & rs("destinazione")
        'Il messaggio l'ho inserito per vedere se pesca correttamente i
nomi delle tabelle, ed è tutto corretto
         DoCmd.TransferDatabase acLink, "Microsoft Access", _
            [Forms]![Connessione db sql]![connessione], acTable,
rs!origine, rs!destinazione
        rs.MoveNext
    Wend
    rs.Close
Sulla rigda del Transferdatabase mi da il seguente errore:
Errore di runtime '2498'
Tipo di dati dell'espressione errato per uno degli argomenti.
ho provato anche ad inserire rs("orgine") ho provato a memorizzare il
dato della tabella in una variabile varorigine e vardestinazione, ma il
risultato è sempre lo stesso.
Qualcuno mi può aiutare a capire questo tipo di problema e darmi una
soluzione?
Grazie
Giuseppe


title: XML con più nodi denominati allo stesso modo ma di numero variabile

text:
Salve,

ho un problema sull'importazione di un file XML. Si parla, come avrete intuito della fatturazione elettronica.

Ho creato uno script con VBA che funziona alla perfezione quando ho la maggior parte dei file XML da importare. La situazione in cui funziona è la seguente:

<DettaglioLinee>
<NumeroLinea>1</NumeroLinea>
<CodiceArticolo>
<CodiceTipo>COD_FORNITORE</CodiceTipo>
<CodiceValore>1D1G7</CodiceValore>
</CodiceArticolo>
<Descrizione>OPTIPLEX 3060 SFF</Descrizione>
<Quantita>5.00</Quantita>
<UnitaMisura>PCE</UnitaMisura>
<PrezzoUnitario>554.79</PrezzoUnitario>
<PrezzoTotale>2773.95</PrezzoTotale>
<AliquotaIVA>22.00</AliquotaIVA>
</DettaglioLinee>
<DettaglioLinee>
<NumeroLinea>2</NumeroLinea>
<CodiceArticolo>
<CodiceTipo>EN</CodiceTipo>
<CodiceValore>5397063622016</CodiceValore>
</CodiceArticolo>
<Descrizione>SE2216H</Descrizione>
<Quantita>5.00</Quantita>
<UnitaMisura>PCE</UnitaMisura>
<PrezzoUnitario>79.05</PrezzoUnitario>
<PrezzoTotale>395.25</PrezzoTotale>
<AliquotaIVA>22.00</AliquotaIVA>
</DettaglioLinee>

Ho creato uno script con questo codice:

Set Nodo = xmldoc.SelectNodes("//FatturaElettronicaBody/DatiBeniServizi/DettaglioLinee")

For i = 0 To Nodo.Length - 1
Descrizione = Nodo.Item(0).SelectNodes("//Descrizione").Item(i).Text
PrezzoUnitario = Nodo.Item(0).SelectNodes("//PrezzoUnitario").Item(i).Text
AliquotaIva = Nodo.Item(0).SelectNodes("//AliquotaIVA").Item(i).Text
Quantita = Nodo.Item(0).SelectNodes("//Quantita").Item(i).Text
CodiceArticolo = Nodo.Item(0).SelectNodes("//CodiceArticolo/CodiceValore").Item(i).Text

**inserisco i dati quindi in tabella**

next i

E tutto funziona correttamente.

Solo che ho dei file XML che si presentano così:

<DettaglioLinee>
<NumeroLinea>1</NumeroLinea>
<CodiceArticolo>
<CodiceTipo>COD_FORNITORE</CodiceTipo>
<CodiceValore>1D1G7</CodiceValore>
</CodiceArticolo>
<CodiceArticolo>
<CodiceTipo>TU</CodiceTipo>
<CodiceValore>1D1G7</CodiceValore>
</CodiceArticolo>
<CodiceArticolo>
<CodiceTipo>EN</CodiceTipo>
<CodiceValore>5397184102534</CodiceValore>
</CodiceArticolo>
<Descrizione>OPTIPLEX 3060 SFF</Descrizione>
<Quantita>5.00</Quantita>
<UnitaMisura>PCE</UnitaMisura>
<PrezzoUnitario>554.79</PrezzoUnitario>
<PrezzoTotale>2773.95</PrezzoTotale>
<AliquotaIVA>22.00</AliquotaIVA>
</DettaglioLinee>
<DettaglioLinee>
<NumeroLinea>2</NumeroLinea>
<CodiceArticolo>
<CodiceTipo>EN</CodiceTipo>
<CodiceValore>5397063622016</CodiceValore>
</CodiceArticolo>
<CodiceArticolo>
<CodiceTipo>TU</CodiceTipo>
<CodiceValore>210-AFZT</CodiceValore>
</CodiceArticolo>
<Descrizione>SE2216H</Descrizione>
<Quantita>5.00</Quantita>
<UnitaMisura>PCE</UnitaMisura>
<PrezzoUnitario>79.05</PrezzoUnitario>
<PrezzoTotale>395.25</PrezzoTotale>
<AliquotaIVA>22.00</AliquotaIVA>
</DettaglioLinee>

In pratica, in questi casi, mi vengono importate in modo corretto le seguenti variabili:
Descrizione, PrezzoUnitario, AliquotaIva e quantita

mentre codicearticolo, purtroppo viene importata per il secondo nodo, il secondo codice valore del primo nodo

Dato che I codicevalore, possono essere quindi singoli ma anche multipli per ogni singolo nodo, come far capire di passare all'importazione del nodo successivo?

Grazie a tutti quelli che mi leggono e/o rispondo.

Simone


text: nessuna idea?


title: Re: Activex per *.tiff

author: Roberto Massoni

text:
"Gianni" <
giann...@hotmail.com
> ha scritto nel messaggio
news:rPIqd.57715$Es2.1...@twister2.libero.it...
> Ciao a tutto in NG,
> attualmente sto gestendo i disegni autocad (*.dwg) con un controllo
activex
> dedicato a questo aperazione.....esiste qualche controllo activex  per la
> gestione dei disegni in formato tiff.?
Gli ActiveX Kodak (che fra l'altro sono free) puoi gestire sia in input che
in output i file .tif.
Prova ad andare sul Sito Comune e nella sezione General prova a dare uno
sguardo alla FAQ intitolata "Come è possibile scannerizzare, visualizzare,
modificare, stampare e salvare files immagine usando gli ActiveX Kodak?".
> ciao e grazie
>
> Gianni
--
Roberto
--------------------------------------
il Sito Comune di it.comp.appl.access
www.sitocomune.com
-------------------------------------


title: Re: Activex per *.tiff

author: Gianni

text:
Ciao a tutto in NG,
attualmente sto gestendo i disegni autocad (*.dwg) con un controllo activex
dedicato a questo aperazione.....esiste qualche controllo activex  per la
gestione dei disegni in formato tiff.?
ciao e grazie
Gianni


title: Access 2000 + Sql Server 2000 + IIS 6.0 ma funziona ???

author: RobertoA

text:
Stiamo realizzando un miniprogetto con un db mantenuto su Sql Server 2000,
come front-end Access 2000, e come web server IIS 6.0 (quello installato di
serie su WinXP pro).
In pratica desideriamo realizzaze un'applicazione tipo Asp, usabile via
internet e solo con un browser internet.
Riusciamo a creare il db sul server sql
Riusciamo a inserire / modificare / eliminare i record nelle tabelle usando
le maschere di Access 2000
Riusciamo a creare con Access le 'pagine di accesso ai dati' in formato html
Riusciamo a pubblicarle sul web server
NON riusciamo a vederle correttamente se richiamiamo con Internet Explorer
la pagina contenuta nel web server.
In pratica vediamo solo le label, le textbox ma non vediamo la barra che
permette la navigazione e l'inserimento / eliminazione di nuovi record.
Abbiamo gia' porvato a cercare eventuali proprieta' sia dell'oggetto barra
che della pagina per abilitarne la visualizzazione ma niente.
Abbiamo provato a cercare sul web qualche informazioni ma troviamo solo
sitemi che via Access permettono la creazione delle pagine html da usare
all'interno di una rete locale, mentre noi vorremmo visualizzarle usando IIS
.
Cosa possiamo provare?
Grazie e ciao
-----------------------------
Roberto Amorosi
LOGIC DESIGN
in...@logicdesign.it
-----------------------------


author: Pixel

text:
"RobertoA" <
amor...@tiscalinet.it
> ha scritto nel messaggio
news:c3unuh$2bhfng$1...@ID-210108.news.uni-berlin.de...
> Stiamo realizzando un miniprogetto con un db mantenuto su Sql Server 2000,
> come front-end Access 2000, e come web server IIS 6.0 (quello installato
di
> serie su WinXP pro).
> In pratica desideriamo realizzaze un'applicazione tipo Asp, usabile via
> internet e solo con un browser internet.
> Riusciamo a creare il db sul server sql
> Riusciamo a inserire / modificare / eliminare i record nelle tabelle
usando
> le maschere di Access 2000
> Riusciamo a creare con Access le 'pagine di accesso ai dati' in formato
html
> Riusciamo a pubblicarle sul web server
> NON riusciamo a vederle correttamente se richiamiamo con Internet Explorer
> la pagina contenuta nel web server.
> In pratica vediamo solo le label, le textbox ma non vediamo la barra che
> permette la navigazione e l'inserimento / eliminazione di nuovi record.
> Abbiamo gia' porvato a cercare eventuali proprieta' sia dell'oggetto barra
> che della pagina per abilitarne la visualizzazione ma niente.
> Abbiamo provato a cercare sul web qualche informazioni ma troviamo solo
> sitemi che via Access permettono la creazione delle pagine html da usare
> all'interno di una rete locale, mentre noi vorremmo visualizzarle usando
IIS
> Cosa possiamo provare?
Personalmente non ho mai usato le pagine d'accesso ai dati, tuttavia provate
a consultare questo:
http://support.microsoft.com/default.aspx?scid=kb;EN-US;Q291783


title: Update Traduzione di OPTION

author: VeeJay

text:
Ciao a tutti,
i guai non vengono mai da soli...
in riferimento al mio precedente MSG, non solo si deve
poter traslare "A" in in altro valore ma bisogna pure
porre questo valore in una tabella in un campo che dipende
dal primo dato "A".
In definitiva :
se un campo di una tabella contiene "A" si deve
poter scrivere il valore "XXX" nel campo ABC di un'altra tabella,
se tale campo contiene "B" si deve
poter scrivere il valore "YYY" nel campo DEF , ecc.
Stored Procedure ???
Penso che la cosa si possa risolvere via codice...
ma senza codice non esiste altra possibilità ?
Qualcuno dei GURU ha un'idea migliore ?
Grazie mille per l'attenzione
Un cordiale saluto
VeeJay


title: Update Traduzione di OPTION

author: Lorenzo Coronati

text:
Scrisse "VeeJay" <
vee...@tin.it
>:
>in riferimento al mio precedente MSG, non solo si deve
>poter traslare "A" in in altro valore ma bisogna pure
>porre questo valore in una tabella in un campo che dipende
>dal primo dato "A".
Allora dimentica choose: devi avere una tabella di decodifica
>In definitiva :
>se un campo di una tabella contiene "A" si deve
>poter scrivere il valore "XXX" nel campo ABC di un'altra tabella,
>se tale campo contiene "B" si deve
>poter scrivere il valore "YYY" nel campo DEF , ecc.
Mmmhhh...
Mi suona male. Sei sicuro dell'architettura?
>Stored Procedure ???
In access non ci sono.
>Penso che la cosa si possa risolvere via codice...
>ma senza codice non esiste altra possibilità ?
Query di aggiornamento.
--
Lorenzo Coronati
--
<<Nessuno sa che questa affermazione e' vera>>
(John D. Barrow)
--


title: Update Traduzione di OPTION

text:
Ciao Lorenzo,
Innanzitutto Grazie per l'interessamento...
Condivido la tua perplessità sulla struttura, ma deriva da una progettazione
Telecom (chi la conosce la evita) e in particolare la tabella
destinazione deve contenere dati delle centrali  e delle tratte
che le collegano. Il marchingegno dev'essere posto in essere per le varie
tipologie di centrali, tratte, ecc.
E' un casi... è una struttura complessa che con Oracle viene risolta
tramite la OPTION con SQL.
Select  Decode (Col_1, '01', Col_2),
           Decode (Col_1, '02', Col_3),
           . . .
Ad ogni buon conto la cosa è stata risolta momentaneamente
con un CopiaEIncolla manuale dato l'esiguo numero (8-10) di
tipologie in uso.
Mi incuriosisce il fatto che tu mi consigli una query di aggiornamento...
strutturata come ?
Non mi ricordo di qualcosa che somigli al CASE in tale tipo di query,
ma può darsi che sia io a non aver mai approfondito questo aspetto.
Un cordiale saluto
VeeJay
"Lorenzo Coronati" <
lore...@tin.it
> ha scritto nel messaggio
news:389b4390...@news.libero.it...



title: Update Traduzione di OPTION

text:
Scrisse "VeeJay" <
vee...@tin.it
>:
>Condivido la tua perplessità sulla struttura, ma deriva da una progettazione
>Telecom (chi la conosce la evita)
Mmmhhhh...
>Mi incuriosisce il fatto che tu mi consigli una query di aggiornamento...
>strutturata come ?
Ma tu cosa devi fare esattamente?
>> >se un campo di una tabella contiene "A" si deve
>> >poter scrivere il valore "XXX" nel campo ABC di un'altra tabella,
>> >se tale campo contiene "B" si deve
>> >poter scrivere il valore "YYY" nel campo DEF , ecc.
Questo si fa con le query di aggm.
Vado a fantasia:
Hai una tabella principale (tabpri) con un campo (campoab) che vale A
o B e un altro campo valore che deve andare a finire in un'altra
tabella (tabsec), nel campoa o nel campob a seconda.
Allora ti fai una prima query (qsec) che ricava a o b per tutti i
record della seconda tabella: (do per scontato il campo di join idpri)
SELECT tabsec.idpri, tabsec.campoa, tabsec.campob, tabpri.campoab
FROM tabsec INNER JOIN tabpri ON tabsec.idpri = tabpri.idpri;
Poi due query (qa e qb) che filtrano da tabpri i record tipo a e
tipob:
qa: SELECT * FROM tabpri WHERE campoab="A"
qb: SELECT * FROM tabpri WHERE campoab="B"
E infine la query di aggm.:
UPDATE (qsec LEFT JOIN qa ON (qsec.idpri = qa.idpri) AND (qsec.campoab
= qa.campoab)) LEFT JOIN qb ON (qsec.idpri = qb.idpri) AND
(qsec.campoab = qb.campoab) SET qsec.campoa = qa.valore, qsec.campob =
qb.valore;
Sara' brutto fin che vuoi ma funziona.
Forse si possono evitare qa e qb con select nidificate: utile
esercizio per casa ;-)
Gudlac!



title: Update Traduzione di OPTION

text:
Ciao Lorenzo,
ti premetto che la cosa è stata già risolta alla fonte utilizzando Oracle su
un server NT;
comunque, in via del tutto accademica, ti informo di quanto segue.
"Lorenzo Coronati" <
lore...@tin.it
> ha scritto nel messaggio mailto:
news:38a168c3...@news.libero.it...
> Scrisse "VeeJay" <
vee...@tin.it
>:
> >Condivido la tua perplessità sulla struttura, ma deriva da una
progettazione
> >Telecom (chi la conosce la evita)
> Mmmhhhh...
Mmmmmhhhh ! ! ! !
> >Mi incuriosisce il fatto che tu mi consigli una query di aggiornamento...
> >strutturata come ?
> Ma tu cosa devi fare esattamente?
Quello che ho tentato di descrivere subito sotto :
> >> >se un campo di una tabella contiene "A" si deve
> >> >poter scrivere il valore "XXX" nel campo ABC di un'altra tabella,
> >> >se tale campo contiene "B" si deve
> >> >poter scrivere il valore "YYY" nel campo DEF , ecc.
> Questo si fa con le query di aggm.
>
Purtroppo la cosa non si ferma quì poiché i valori da intercettare sono
circa
una DECINA per ogni coppia di tabelle e la cosa si ripete con lo stesso
meccanismo per altre 50 volte (cinquanta giochetti del genere ! ! !).
> Vado a fantasia:
> Hai una tabella principale (tabpri) con un campo (campoab) che vale A
> o B e un altro campo valore che deve andare a finire in un'altra
> tabella (tabsec), nel campoa o nel campob a seconda.
> Allora ti fai una prima query (qsec) che ricava a o b per tutti i
> record della seconda tabella: (do per scontato il campo di join idpri)
> SELECT tabsec.idpri, tabsec.campoa, tabsec.campob, tabpri.campoab
> FROM tabsec INNER JOIN tabpri ON tabsec.idpri = tabpri.idpri;
>
> Poi due query (qa e qb) che filtrano da tabpri i record tipo a e
> tipob:
> qa: SELECT * FROM tabpri WHERE campoab="A"
> qb: SELECT * FROM tabpri WHERE campoab="B"
>
> E infine la query di aggm.:
> UPDATE (qsec LEFT JOIN qa ON (qsec.idpri = qa.idpri) AND (qsec.campoab
> = qa.campoab)) LEFT JOIN qb ON (qsec.idpri = qb.idpri) AND
> (qsec.campoab = qb.campoab) SET qsec.campoa = qa.valore, qsec.campob =
> qb.valore;
>
> Sara' brutto fin che vuoi ma funziona.
> Forse si possono evitare qa e qb con select nidificate: utile
> esercizio per casa ;-)
>
Quello che proponi funziona sicuramente ma, ti ripeto, bisogna mettere
su cinquanta query e, per ognuna, discriminare più o meno una decina di
valori.
A questo punto la domanda "sorge spontanea": uno statement SQL tanto
lungo viene trattato dal nostro "amico" ? Qual'è il limite delle strighe SQL
?
Si possono cumulare + stringhe, eventualmente ci fosse un limite, ad esempio
di 254 caratteri? (mi sembra di ricordare un vecchio MSG al riguardo...)
Penso comunque che la cosa sia risolvibile proficuamente con un pò di codice
perché mi sa che questa è "la morte sua".
> Gudlac!
La "Gud" ce la mettiamo tutta, ma è la "Lac" che ci manca...
Un cordiale saluto
VeeJay


title: Update Traduzione di OPTION

text:
Scrisse "VeeJay" <
vee...@tin.it
>:
>Ciao Lorenzo,
>ti premetto che la cosa è stata già risolta alla fonte utilizzando Oracle su
>un server NT;
Avete fatto la cosa giusta ;-)
>A questo punto la domanda "sorge spontanea": uno statement SQL tanto
>lungo viene trattato dal nostro "amico" ? Qual'è il limite delle strighe SQL
>?
64K
Abbastanza ;-P
>Penso comunque che la cosa sia risolvibile proficuamente con un pò di codice
>perché mi sa che questa è "la morte sua".
Concordo.
>La "Gud" ce la mettiamo tutta, ma è la "Lac" che ci manca...
:-D
Bai



title: Messaggio Indesiderato su azione stampa

author: Giuseppe

text:
Ciao a tutti
Questa funzione per stampare un report dopo l'anteprima:
Function StampaListaEtichetteGenerico()
Const ErrAnnullaStampa = 2501
On Error GoTo err_StampaListaEtichetteGenerico
 Dim stNomeDoc As String
  Dim stCriteriCollegamento As String
    If IsNull(idordine) Then
        MsgBox "Selezionare un ordine dall'elenco."
    Else
        stNomeDoc = "Lista_Ubicazioni"
        stCriteriCollegamento = "IDOrdine = " & idordine
        DoCmd.OpenReport stNomeDoc, acPreview, , stCriteriCollegamento
        DoCmd.SelectObject acReport, stNomeDoc, False
        DoCmd.RunCommand acCmdPrint
        End If
err_StampaListaEtichetteGenerico:
        Select Case Err.Number
        Case ErrAnnullaStampa
        MsgBox "Stampa Annullata!!   ", vbCritical, "      Attenzione"
        Case Else
        MsgBox Err.Number & "" & Err.Description
        End Select
End Function
Funziona  perfettamente , l 'unico problema è che dopo aver dato OK
alla finestra di stampa per la scelta della stampante inizia a stampare e
subito
dopo esce un messaggio Microsoft Access con un'unico carattere  "0"
Non so perchè ,e come fare per eliminarlo.
Ciao Giuseppe


title: Messaggio Indesiderato su azione stampa

author: Giorgio Prx

text:
"Giuseppe" <
amrma...@tin.it
> ha scritto nel messaggio
news:57zlb.31808$e5.11...@news1.tin.it...
> Ciao a tutti
> Questa funzione per stampare un report dopo l'anteprima:
>
> Function StampaListaEtichetteGenerico()
>
> Const ErrAnnullaStampa = 2501
> On Error GoTo err_StampaListaEtichetteGenerico
>
>  Dim stNomeDoc As String
>   Dim stCriteriCollegamento As String
>     If IsNull(idordine) Then
>         MsgBox "Selezionare un ordine dall'elenco."
>     Else
>         stNomeDoc = "Lista_Ubicazioni"
>         stCriteriCollegamento = "IDOrdine = " & idordine
>
>         DoCmd.OpenReport stNomeDoc, acPreview, , stCriteriCollegamento
>         DoCmd.SelectObject acReport, stNomeDoc, False
>         DoCmd.RunCommand acCmdPrint
>         End If
       *****Exit Function*********
> err_StampaListaEtichetteGenerico:
>         Select Case Err.Number
>         Case ErrAnnullaStampa
>         MsgBox "Stampa Annullata!!   ", vbCritical, "      Attenzione"
>         Case Else
>         MsgBox Err.Number & "" & Err.Description
>         End Select
> End Function
>
>
Ciao Inserisci l'exit function dove ti ho indicato, altrimenti il programma
prosegue anche in caso di Err.Number=0
Ciao Giorgio


title: Aiuto: x velocizzare accesso ODBC a MS-SQL Server

author: Massimiliano Malloni

text:
Stò facendo una procedura che fa una ricerca (con WHERE ) su una tabella
allegata originata da una fonte dati ODBC da MS-SQL Server; la cosa funziona
ma è di una lentezza inaudita.
Riconosco che la tabella è 'grandina' (una anagrafica da 187.000 record), ma
per applicare un filtro su nome e cognome ci impiega circa 30 secondi;
considerando che devo fare circa 13.000 ricerche sto valutando l'eventualità
di prendermi qualche giorno di ferie ....
A parte gli scherzi, dove posso intervenire per velocizzare la cosa? Io ho
provato a vedere se fosse possibile fare una seek ma l'help di Access mi
dice che è applicabile solo ad aree di lavoro Jet.
Aiutatemi
Massimiliano Malloni
CED ASL 11 - Fermo (AP)
0734/625907
m.ma...@asl11.marche.it
----------------------------------------------------------------------------
-----------------------
Il caso aiuta soltanto la mente preparata al nuovo e all'inconsueto (L.
Pasteur)
--
Posted from [194.243.108.98]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


author: Nicola Ardito

text:
""Massimiliano Malloni"" <
m.ma...@asl11.marche.it
> ha scritto nel
messaggio news:000701c01735$97118ff0$1c28...@re.an.intra...
> Stò facendo una procedura che fa una ricerca (con WHERE ) su una tabella
> allegata originata da una fonte dati ODBC da MS-SQL Server; la cosa
funziona
> ma è di una lentezza inaudita.
> Riconosco che la tabella è 'grandina' (una anagrafica da 187.000 record),
ma
> per applicare un filtro su nome e cognome ci impiega circa 30 secondi;
mi sembrano eccessivi
> considerando che devo fare circa 13.000 ricerche sto valutando
l'eventualità
> di prendermi qualche giorno di ferie ....
>
> A parte gli scherzi, dove posso intervenire per velocizzare la cosa? Io ho
> provato a vedere se fosse possibile fare una seek ma l'help di Access mi
> dice che è applicabile solo ad aree di lavoro Jet.
>
> Aiutatemi
>
>
Purtroppo non ho una tabella disponibile con tanti record comunque da me  su
una tabella anagrafica collegata via ODBC con 23000 record impiega
0,14 s per trovare tutti quelli il cui cognome inizia per a ( e qui l'indice
sul campo e' fondamentale)
1,17 per trovare tutti quelli il cui cognome contiene la lettera a (qui
l'indice non c'entra )
 In particolare la prova che ho fatto consiste nell'aprire un recordset
basato sulle condizioni scritte e nel dare l'istruzione rst.movelast
Ciao Nicola
--
email:sostituire tin a NOSPAM


author: Matteo Fortini

text:
Hai messo degli indici su nome e cognome?
Ciao,
    Matteo


title: Numerazione progressiva su maschere continue

text:
Vorrei sapere quale il miglior modo per numerare automaticamente i record in
una maschera dati.
Per migliore intendo il più semplice.
Grazie


author: Giacomo Rossi

text:
"Jazz@Chess" <
nos...@libero.it
> wrote in message
news:U85ea.120785$zo2.3...@news2.tin.it...
> Vorrei sapere quale il miglior modo per numerare automaticamente i record
in
> una maschera dati.
> Per migliore intendo il piů semplice.
> Grazie
>
>
Ciao assegna un campo nella tabella chiamato ID e dagli come formato
contatore.
Piu' semplice di cosi'
Ciao Giacomo


text:
"Giacomo Rossi" <
rogi...@tin.it
> ha scritto nel messaggio
news:Rk6ea.85380$pG1.1...@news1.tin.it...
>
> "Jazz@Chess" <
nos...@libero.it
> wrote in message
> news:U85ea.120785$zo2.3...@news2.tin.it...
> > Vorrei sapere quale il miglior modo per numerare automaticamente i
record
> in
> > una maschera dati.
> > Per migliore intendo il più semplice.
> > Grazie
> >
> >
> Ciao assegna un campo nella tabella chiamato ID e dagli come formato
> contatore.
> Piu' semplice di cosi'
> Ciao Giacomo
>
>
Ha fatto la battutaaaaaaaaa!
E se filtro con una query come ti comporti ??????


text:
"Jazz@Chess" <
nos...@libero.it
> ha scritto nel messaggio
news:zz6ea.85455$pG1.1...@news1.tin.it...
>
[CUT]
> Ha fatto la battutaaaaaaaaa!
> E se filtro con una query come ti comporti ??????
>
ZELIG......!!
Non te la prendere, era una soluzione che molti non conoscono
se alle prime armi.....!!!!
Inserisci una TxtBox con Origine Controllo la seguente Funzione:
Ovviamente necessita della selezione delle Librerie DAO, ma forse
facevo senza dirlo......!!!         ;-)
Public Function GetRecNum() As Long
'==========================================================================
'Name      : GetRecNum()
'Purpose   :
'Author    : Maurizio Borrelli
'Date      : 01 febbraio 2002
'Called by :
'Calls     :
'Inputs    :
'Output    : Posizione assoluta del record corrente+1
'==========================================================================
  On Error GoTo erh
  With CodeContextObject.RecordsetClone
    If Not (.BOF And .EOF) Then
      .Bookmark = CodeContextObject.Bookmark
      GetRecNum = .AbsolutePosition + 1
    End If
  End With
ext:
  Exit Function
erh:
  GetRecNum = 0
End Function
@Alex.


author: OldJack

text:
Buon giorno, stamattina ho per sbaglio cercato di aprire un file mdb con
access 2007, mentre mi cercava l'installazione ho annullato la procedura,
adesso ogni volta che apro il file mi segnala l'errore "Progetto nel
database di Visual Basic, Applications Edition è danneggiato"
Ho cercato di aprire il file di nuovo con access 2003 ma niente, ho cercato
d'importare il tutto in un nuovo db ma niente, ho cercato di compattare e
ripristinare il db ma senza esito.
Vi chiedo un aiuto per recuperare....
Old-Jack


title: Progetto nel database di Visual Basic, Applications Edition è danneggiato

author: MA

text:

Da A2007 te lo fa aprire?
Aprire non significa convertire
quindi fallo tranquillamente
--
--
Massimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:eut6fo$g7t$1...@tdi.cu.mi.it...

No Access 2007 mi dice che è impossibile aprire il database perchè il
relativo progetto non può essere letto. Per aprire il database è necessario
eliminare il progetto VBA con eliminazione di tale progetto verrà rimosso
tutto il codice da moduli, maschere e report....
In poche parole recupero solo tabelle e query...
Ciao


text:
"OldJack" <
old...@infinito.it
> ha scritto nel messaggio
news:eut73g$i0i$1...@nnrp-beta.newsland.it...

hai provato ad "importare" gli oggetti in un altro database vuoto?
(partendo da un database vuoto: importa da . . .)
a me una volta è andata bene.
ciao,
thomas.az


text:
"
thomas.az
" <
thomas.a...@alice.it
> ha scritto nel messaggio
news:4612b72e$0$37195$4faf...@reader3.news.tin.it...

Si ho provato ma niente, cmq ho risolto grazie a questa informazione
http://support.microsoft.com/?kbid=298174
non fa altro che importare da un db ad un altro...
Non  mi ha importato i moduli.... ma quelli li avevo anche in un file di
backup :-)
Cmq grazie!
Old-Jack.


title: [OT] Segnalazione link interessante

author: ciroteo ®

text:
Ciao a tutti, mi scuso per la mia ormai lunga latitanza, ma il poco tempo a
mia disposizione mi impedisce di essere pių assiduo.
Vi segnalo comunque un interessante sito dedicato ad access.
Mi sembra degna di nota (dopo opprotuna registrazione) la sezione sugli
esempi di creazione delle interfacce utente. Molti postano screenshot delle
proprie applicazioni, vi č inoltre una discreta sezione sui tutorial.
Un saluto !
M
http://www.utteraccess.com/


title: [OT] Segnalazione link interessante

author: Morgan

text:
"ciroteo ®" <ciroteo(nospam)@
libero.it
> ha scritto nel messaggio
news:4623c1bc$0$36440$4faf...@reader5.news.tin.it...
> Ciao a tutti, mi scuso per la mia ormai lunga latitanza, ma il poco tempo
> a
> mia disposizione mi impedisce di essere più assiduo.
> Vi segnalo comunque un interessante sito dedicato ad access.
> Mi sembra degna di nota (dopo opprotuna registrazione) la sezione sugli
> esempi di creazione delle interfacce utente. Molti postano screenshot
> delle
> proprie applicazioni, vi è inoltre una discreta sezione sui tutorial.
> Un saluto !
> M
>
>
http://www.utteraccess.com/
Veramente "cool"
Morgan


title: [OT] Segnalazione link interessante

author: Simone Calligaris

text:
"ciroteo
> Ciao a tutti, mi scuso per la mia ormai lunga latitanza, ma il poco tempo
a
> mia disposizione mi impedisce di essere più assiduo.
> Vi segnalo comunque un interessante sito dedicato ad access.
> Mi sembra degna di nota (dopo opprotuna registrazione) la sezione sugli
> esempi di creazione delle interfacce utente. Molti postano screenshot
delle
> proprie applicazioni, vi è inoltre una discreta sezione sui tutorial.
Beh, non credo si possa proprio definire una scoperta: è l'area dedicata ad
Access più famosa e frequentata al mondo  :-)
Saluti.


title: [OT] Segnalazione link interessante

text:
"Simone Calligaris" <
simo...@libero.it
> ha scritto nel messaggio
news:46247c49$0$37204$4faf...@reader3.news.tin.it...

:-(
eh! simone, mi dispiace per me è stata una scoperta recente.
meglio cosi dai ...


title: [OT] Segnalazione link interessante

author: Carlo Costarella

text:
"ciroteo ®" <ciroteo(nospam)@
libero.it
> ha scritto nel messaggio
news:46251e72$0$17944$4faf...@reader1.news.tin.it...
cut
> eh! simone, mi dispiace per me è stata una scoperta recente.
> meglio cosi dai ...
Certamente!
Ho sempre paura di chi dice di conoscere tutto!
Ciao, Carlo


title: [OT] Segnalazione link interessante

text:

Ciao ragazzi,
mi accodo alle segnalazioni:
http://www.microsoft.com/italy/eventi/default.mspx
scegliete come Prodotto Access
;-)
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: [OT] Segnalazione link interessante

text:
"Carlo Costarella" <
> Certamente!
> Ho sempre paura di chi dice di conoscere tutto!
E' una frecciata?    ;-)
Comunque ribadisco che UtterAccess è davvero famosissimo...
Saluti.


title: [OT] Segnalazione link interessante

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:f04mai$85t$1...@tdi.cu.mi.it...
> Carlo Costarella wrote:
> > "ciroteo ®" <ciroteo(nospam)@
libero.it
> ha scritto nel messaggio
> > news:46251e72$0$17944$4faf...@reader1.news.tin.it...
> > cut
> >> eh! simone, mi dispiace per me è stata una scoperta recente.
> >> meglio cosi dai ...
> >
> > Certamente!
> > Ho sempre paura di chi dice di conoscere tutto!
> >
> > Ciao, Carlo
>
>
> Ciao ragazzi,
> mi accodo alle segnalazioni:
>
http://www.microsoft.com/italy/eventi/default.mspx
> scegliete come Prodotto Access
>
> ;-)
>
> --
vediamo vediamo ... ma io lo conosco!!!