text:
> "TseRaa" [...]:
> > "Maurizio Borrelli" [...]:
> >    perche' gli proponi tre pulsanti: Si', No, Annulla?
[...]
> Però, al di la di tutta questa disquisizione su Si,NO,Annulla che non
> ha nulla a che fare con il problema,
    Ti pare? Problema tuo, dopotutto.
> perchè Access si comporta in questo modo???
    Vediamo.
> Private Sub Form_BeforeUpdate(Cancel As Integer)
>    Dim strTtl As String
>    Dim strMsg As String
>    strTtl = "Salvare il record?"
>    strMsg = "I dati sono cambiati. Vuoi salvare le modifiche?"
>    retValue = MsgBox(strMsg, vbQuestion + vbYesNoCancel, strTtl)
>    Select Case retValue
>        Case vbYes
>            'aggionare qualcosa prima di salvare il record
>             Me!UltimoAggiornamento = Date     <= il debug si ferma qui
>             Me!Agrecap = Me!CapComb.Column(1)
>             Me!Agrecap.Requery
>             Me.Ente = UCase(Me.Ente)
>             Me.CognomeNome = UCase(Me.CognomeNome)
>             Me.Indirizzo = UCase(Me.Indirizzo)
>             Me.Città = UCase(Me.Città)
>             etc, etc ....
>        Case vbNo
>            DoCmd.RunCommand acCmdUndo
    S'era detto che se la risposta dell'utente e' no rinunciavi a salvare e
proseguivi. Io non sono molto pratico di questo odioso RunCommand (odioso
perche' ancora non lo conosco bene, ovviamente). Cosa fa esattamente insieme
a acCmdUndo? Annulla l’ultima operazione, giusto? Ma tu non volevi invece
"non salvare e proseguire"? Oppure ho capito male?
>        Case vbCancel
>            Cancel = True
>    End Select
> End Sub
> Ogni tanto ed in modo casuale viene fuori "errore di run-time 3020 -
> metodo Update o CancelUpdate senza Addnew o edit".
> e quando entro in debug l'interruzione è sulla linea che ho indicato
> sopra (Me!UltimoAggiornamento = Date)
    Pero' l'errore che segnali non e' un errore vb ma Jet. Usa l'evento
Error e ispeziona mettendo un punto di interruzione.



title: Conferma salvataggio record a singhiozzo

author: omnitow

text:
> > >> In una maschera di input quando qualche campo viene modificato, nel
> > >> passaggio ad un altro record chiedo conferma del salvataggio del
> > >> record mediante la seguente sub
> > >> Ogni tanto ed in modo casuale viene fuori "errore di run-time 3020 -
> > >> metodo Update o CancelUpdate senza Addnew o edit".
Questo errore capitava spesso anche a me prima che imparassi a non
modificare mai un record se non č veramente necessario, non ho capito
neppure io il reale motivo di questo errore, mi sono fatto un'idea e secondo
me
capita quando piů routine modificano contemporaneamente (o quasi) il record.
Per esempio, in una maschera di ricerca per una rubrica che ho progettato,
l'evento Current spostava il record corrente della rubrica per visualizzare
il contatto selezionato nella maschera di ricerca. Questo evento scatenava
anche l'evento oncurrent della rubrica che controllava e modificava, spesso
inutilmente il valore del record. Ho risolto il problema evitando di
scatenare l'evento oncurrent della rubrica quando la maschera di ricerca
fosse aperta.
Comunque quando ho cominciato ad inserire accorgimenti del tipo
Dim Valore as variant
If Rec!Campo<>Valore Then Rec!Campo=Valore
questo tipo di errrore non l'ho piů riscontrato
ciao omnitow


author: Carlo Costarella

text:
"omnitow" <
omn...@libero.net
> ha scritto nel messaggio
news:aki7mf$r9a$1...@fe2.cs.interbusiness.it...
>
> > > >> In una maschera di input quando qualche campo viene modificato, nel
> > > >> passaggio ad un altro record chiedo conferma del salvataggio del
> > > >> record mediante la seguente sub
>
> > > >> Ogni tanto ed in modo casuale viene fuori "errore di run-time
3020 -
> > > >> metodo Update o CancelUpdate senza Addnew o edit".
>
>
> Questo errore capitava spesso anche a me prima che imparassi a non
> modificare mai un record se non è veramente necessario, non ho capito
> neppure io il reale motivo di questo errore, mi sono fatto un'idea e
secondo
> me
> capita quando più routine modificano contemporaneamente (o quasi) il
record.
> Per esempio, in una maschera di ricerca per una rubrica che ho progettato,
> l'evento Current spostava il record corrente della rubrica per
visualizzare
> il contatto selezionato nella maschera di ricerca. Questo evento scatenava
> anche l'evento oncurrent della rubrica che controllava e modificava,
spesso
> inutilmente il valore del record. Ho risolto il problema evitando di
> scatenare l'evento oncurrent della rubrica quando la maschera di ricerca
> fosse aperta.
>
> Comunque quando ho cominciato ad inserire accorgimenti del tipo
>
> Dim Valore as variant
> If Rec!Campo<>Valore Then Rec!Campo=Valore
>
> questo tipo di errrore non l'ho più riscontrato
>
> ciao omnitow
>
>
>
Solo per curiosità ma anche per studio, mandami il db zippato.
Ovviamente puliscilo di tutto quello che non serve.
Ciao, Carlo


text:
> > > > >> Ogni tanto ed in modo casuale viene fuori "errore di run-time
> 3020 -
> > > > >> metodo Update o CancelUpdate senza Addnew o edit".
> > Per esempio, in una maschera di ricerca per una rubrica che ho
progettato,
> > l'evento Current spostava il record corrente della rubrica per
> visualizzare
> > il contatto selezionato nella maschera di ricerca. Questo evento
scatenava
> > anche l'evento oncurrent della rubrica che controllava e modificava,
> spesso
> > inutilmente il valore del record. Ho risolto il problema evitando di
> > scatenare l'evento oncurrent della rubrica quando la maschera di ricerca
> > fosse aperta.
> >
> > Comunque quando ho cominciato ad inserire accorgimenti del tipo
> >
> > Dim Valore as variant
> > If Rec!Campo<>Valore Then Rec!Campo=Valore
> >
> > questo tipo di errrore non l'ho più riscontrato
> Solo per curiosità ma anche per studio, mandami il db zippato.
> Ovviamente puliscilo di tutto quello che non serve.
>
> Ciao, Carlo
Non credo ti possa essere utile ormai ho apportato parecchie modifiche, era
il mio primo progetto
ciao omnitow


author: TseRaa

text:


sono corretti ... altrimenti il tutto non funzionerebbe mai
>Ora mi sono proprio incuriosito e
>ti propongo due soluzioni.
>1) Accodi un nuovo recordset alla tabella
Non capisco bene cosa vuol dire relativamente alla situazione in
oggetto.
Voglio dire: se il record X viene modificato e passo ad altro record,
semplicemente il vecchio record viene salvato con le modifiche.
Ancora poco fa ho fatto un'altra prova e questo comportamento si è
ripresentato ... su un centinaio di record salvati, tre volte mi è
venuto fuori quel maledetto errore.
Allora chiedo: è possibile ritoccare il codice che ho scritto e che
riporto sotto:

    'aggionare qualcosa prima di salvare il record
     Me!UltimoAggiornamento = Date     <= il debug si ferma qui
     Me!Agrecap = Me!CapComb.Column(1)
     Me!Agrecap.Requery
     Me.Ente = UCase(Me.Ente)
     Me.CognomeNome = UCase(Me.CognomeNome)
     Me.Indirizzo = UCase(Me.Indirizzo)
     Me.Città = UCase(Me.Città)
     etc, etc ....
in modo che non mi venga più fuori  "errore di run-time 3020 - metodo
Update o CancelUpdate senza Addnew o edit" proprio sul primo valore
 (Me!UltimoAggiornamento = Date)
>2) Mi mandi una copia zippata del DB e vedo cosa posso fare.
Questo è alquanto problematico perchè, tra una cosa e l'altra il file
è di circa 16 mega
Adriano
e-mail galad***NOSPAM***@
alma.it


text:
"TseRaa" <
ga...@alma.it
> ha scritto nel messaggio
news:lm2smuo57vqbaf970...@4ax.com...

Controlla il controllo "UltimoAggiornamento" se accetta il valore Date
che gli passi. Vedi se è di tipo data/ora, se ha una maschera di input.
Al limite sostituisce Date con Format(Date,"dd/mm/yyyy")
Riguardo a "Accodi un nuovo recordset alla tabella":
scrivi due righe di codice che aprono la tabella che ti interessa
e accodano i dati:
Dim RCS as Recordset
Set RCS = CurrentDB.OpenRecordset("TuaTabella")
With RCS
.AddNew
!UltimoAggiornamento = Format(Date,"dd/mm/yyyy")
!Agrecap = Me!CapComb.Column(1) 'oppure nz(Me!CapComb.Column(1),"")
!Ente = UCase(Me.Ente)
!CognomeNome = UCase(Me.CognomeNome)
!Indirizzo = UCase(Me.Indirizzo)
!Città = UCase(Me.Città)
'....ecc.
.Update
End With
RCS.Close
Fammi Sapere.
Poi per l'invio del db zippato non è necessario inviarlo tutto
bastano solo le tabelle, le maschere o le query interessate
Ciao, Carlo


text:
On Thu, 29 Aug 2002 12:19:15 GMT, "Carlo Costarella"
<
carloantoni...@virgilio.it
> wrote:
>Controlla il controllo "UltimoAggiornamento" se accetta il valore Date
>che gli passi. Vedi se è di tipo data/ora, se ha una maschera di input.
>Al limite sostituisce Date con Format(Date,"dd/mm/yyyy")
Certo che funziona ... quelle 95 volte su 100 che aggiorno record il
campo UltimoAggiornamento ha la data del giorno in cui faccio la
modifica al record
>scrivi due righe di codice che aprono la tabella che ti interessa
>e accodano i dati:
>Dim RCS as Recordset
>Set RCS = CurrentDB.OpenRecordset("TuaTabella")
>
>With RCS
>.AddNew
>!UltimoAggiornamento = Format(Date,"dd/mm/yyyy")
>!Agrecap = Me!CapComb.Column(1) 'oppure nz(Me!CapComb.Column(1),"")
>!Ente = UCase(Me.Ente)
>!CognomeNome = UCase(Me.CognomeNome)
>!Indirizzo = UCase(Me.Indirizzo)
>!Città = UCase(Me.Città)
>'....ecc.
>.Update
>End With
>RCS.Close
Stasera provo il tuo codice ... probabilmente dovrò sostituire Edit al
posto di AddNew in quanto modificando un record già esistente se
faccio AddNew la cosa non funzia ... già!!! c'è però il problema che
quando aggiungo un record nuovo cosa succede al momento del
salvataggio se metto Edit al posto di AddNew?? ... comunque faccio un
po' di prove e ti faccio sapere.
P.S. spero che la cosa funzioni anche se la tabella in questione è
allegata! ( dal tuo codice: >Set RCS =
CurrentDB.OpenRecordset("TuaTabella") )
Adriano
e-mail galad***NOSPAM***@
alma.it


text:
"TseRaa" <
ga...@alma.it
> ha scritto nel messaggio
news:66hsmu8t0vpmehavq...@4ax.com...
> On Thu, 29 Aug 2002 12:19:15 GMT, "Carlo Costarella"
> <
carloantoni...@virgilio.it
> wrote:
>
CUT
> Stasera provo il tuo codice ... probabilmente dovrò sostituire Edit al
> posto di AddNew in quanto modificando un record già esistente se
> faccio AddNew la cosa non funzia ... già!!! c'è però il problema che
> quando aggiungo un record nuovo cosa succede al momento del
> salvataggio se metto Edit al posto di AddNew?? ... comunque faccio un
> po' di prove e ti faccio sapere.
> P.S. spero che la cosa funzioni anche se la tabella in questione è
> allegata! ( dal tuo codice: >Set RCS =
> CurrentDB.OpenRecordset("TuaTabella") )
>
> Adriano
> e-mail galad***NOSPAM***@
alma.it
Ottime osservazioni. Infatti avevo pensato al problema cercando di
cancellare i dati appena scritti subito prima di fare l'update del
recordset.
Con  Me.Undo prima di .Update
subito dopo ci vuole un requery:
Me.Requery
Non ho provato questa soluzione.
Con Edit non credo funzioni perchè si dovrebbe attivare
una modifica concorrente dello stesso record con conseguente
messaggio su quali modifiche salvare.
Ti sarei grato se mi mandassi uno spezzone di questo DB.
Ciao, Carlo


text:
On Thu, 29 Aug 2002 16:42:57 GMT, "Carlo Costarella"
<
carloantoni...@virgilio.it
> wrote:
>Ottime osservazioni. Infatti avevo pensato al problema cercando di
>cancellare i dati appena scritti subito prima di fare l'update del
>recordset.
>Con  Me.Undo prima di .Update
>subito dopo ci vuole un requery:
>Me.Requery
>Non ho provato questa soluzione.
>
>Con Edit non credo funzioni perchè si dovrebbe attivare
>una modifica concorrente dello stesso record con conseguente
>messaggio su quali modifiche salvare.
funziona, funziona
>Ti sarei grato se mi mandassi uno spezzone di questo DB.
Eccoti accontentato, ma forse chi è più contento sono io che, grazie
ai tuoi consigli forse ha risolto il problema.
Dico "forse" perchè vorrei ancora fare ancora delle prove in quanto
come ti ho detto l'anomalia si presentava in media su un 5% di
operazioni di aggiornamento di record. Comunque su una sessantina di
record che ho provato a modificare la Sub si comporta bene.
Ancora un piccolo commento ai dubbi che avevo su AddNew ed Edit e il
fatto che la tabella fosse una tabella allegata.
Come potrai vedere dal codice che ti riporto "in Toto", Io ho messo
EDIT e funziona sia in aggiornamento di un record esistente sia se
inserisco un record nuovo ... tu mi dirai che è strano eppure così
funziona.
Ecco la Sub in questione:
_______________________________
Private Sub Form_BeforeUpdate(Cancel As Integer)
   Dim CodiceImportanza As String
   Dim strTtl As String
   Dim strMsg As String
   strTtl = "Salvare il record?"
   strMsg = "I dati sono cambiati." & vbCrLf & _
            "Vuoi salvare le modifiche?"
   retValue = MsgBox(strMsg, vbQuestion + vbYesNoCancel, strTtl)
   Select Case retValue
       Case vbYes
            Dim RCS As Recordset
            Set RCS = CurrentDb.OpenRecordset("Archivio")
            With RCS
            .Edit
            Me!UltimoAggiornamento = Format(Date, "dd/mm/yyyy")
            Me!Agrecap = Me!Capcomb.Column(1)
            Me!Agrecap.Requery
            Me!Ente = UCase(Me!Ente)
            Me!CognomeNome = UCase(Me!CognomeNome)
            Me!Indirizzo = UCase(Me!Indirizzo)
            Me!Città = UCase(Me!Città)
            Me!Provincia = UCase(Me!Provincia)
            Me!Nazione = UCase(Me!Nazione)
            Me!Presentazione = UCase(Me!Presentazione)
            CodiceImportanza = Me!I01 & Me!I02 & Me!I03 & Me!I04 &
Me!I05 & _
            Me!I06 & Me!I07 & Me!I08 & Me!I09 & Me!I10 & _
            Me!I11 & Me!I12 & Me!I13 & Me!I14 & Me!I15 & _
            Me!I16 & Me!I17 & Me!I18 & Me!I19 & Me!I20 & _
            Me!I21 & Me!I22 & Me!I23 & Me!I24 & Me!I25
            Me!CodiceImportanza = CodiceImportanza
            .Update
            End With
            RCS.Close
       Case vbNo
           DoCmd.RunCommand acCmdUndo
       Case vbCancel
           Cancel = True
   End Select
End Sub
___________________________________________
... spero che le prove che farò nei prossimi giorni non mi riservino
sorprese ... ancora grazie del contributo.
Adriano
e-mail galad***NOSPAM***@
alma.it


title: Aggiungere a combo box record non in lista

author: Benedetto

text:
La mia intenzione č di fare in modo che digitando in una combo box un record
che non č in lista venga aggiunto automaticamente. Ho seguito l'esempio che
si trova sul Sitocomune ma ho riscontrato il seguente problema:
Quando il record non č in lista appare "Errore Run-Time '13'  e scegliendo
Debug la riga evidenziata č la seguente:
  Set miorst = CurrentDb.OpenRecordset("Prodotti")
Anche nel mio caso la combo si chiama Prodotti e fa riferimento ad una
tabella che si chiama "prodotti" ed al campo Prodotti.
Dove sbaglio?


author: Alessandro

text:
"Benedetto" <
deva...@libero.it
> ha scritto nel messaggio
news:VigHb.215392$e6.83...@twister2.libero.it...
> La mia intenzione è di fare in modo che digitando in una combo box un
record
> che non è in lista venga aggiunto automaticamente. Ho seguito l'esempio
che
> si trova sul Sitocomune ma ho riscontrato il seguente problema:
>
> Quando il record non è in lista appare "Errore Run-Time '13'  e scegliendo
> Debug la riga evidenziata è la seguente:
>
>   Set miorst = CurrentDb.OpenRecordset("Prodotti")
>
>
>
> Anche nel mio caso la combo si chiama Prodotti e fa riferimento ad una
> tabella che si chiama "prodotti" ed al campo Prodotti.
>
> Dove sbaglio?
>
>
 Nella struttura di un modulo Scegli strumenti riferimenti e aggiungi
Microsoft DAO 3.51 o 3.6
Ciao


author: Roberto da casa

text:
"Alessandro" <
ale...@tiscali.it
> ha scritto nel messaggio
news:bskv4t$ch6$1...@lacerta.tiscalinet.it...
>
> "Benedetto" <
deva...@libero.it
> ha scritto nel messaggio
> news:VigHb.215392$e6.83...@twister2.libero.it...
> > La mia intenzione č di fare in modo che digitando in una combo box un
> record
> > che non č in lista venga aggiunto automaticamente. Ho seguito l'esempio
> che
> > si trova sul Sitocomune ma ho riscontrato il seguente problema:
> >
> > Quando il record non č in lista appare "Errore Run-Time '13'  e
scegliendo
> > Debug la riga evidenziata č la seguente:
> >
> >   Set miorst = CurrentDb.OpenRecordset("Prodotti")
> >
> >
> >
> > Anche nel mio caso la combo si chiama Prodotti e fa riferimento ad una
> > tabella che si chiama "prodotti" ed al campo Prodotti.
> >
> > Dove sbaglio?
> >
> >
>  Nella struttura di un modulo Scegli strumenti riferimenti e aggiungi
> Microsoft DAO 3.51 o 3.6
Affinchč funzioni, oltre ad aggiungere ai riferimenti alla libreria
Microsoft DAO, occorre anche sostituire la riga di codice VBA:
Dim miorst As Recordset
con
Dim miorst As DAO.Recordset
oppure fai in modo che i riferimenti alla libreria Microsoft DAO precedano i
riferimenti alla libreria Microsoft ADO.
>
> Ciao
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Re: confronto tra date ed estrazione data massima

author: Nick

text:
"ciarletto" <
c...@y.it
> ha scritto nel messaggio news:82Z88Z48Z250Y1...@usenet.libero.it...
>
>          Ciao, in una tabella ho:
> 1. colonna "datafattura"
> 2. colonna "data scadenza"
> 3. colonna "datapagamento".
> Vorrei confrontare le ultime 3 colonne ed estrarre la data + recente , poi
> facendo la differenza con la data fattura ottendo i giorni.
> (mi serve x calcolare i gg di incasso).
> Grazie
>
> --------------------------------
> Inviato via
http://arianna.libero.it/usenet/
prova con
public sub DataGG (dataF as date, dataS as date, dataP as date)
'presupposto che la data fattura sarà sempre minore delle altre due altrimenti c'è un errore :)
if dataS >= dataP then
    msgbox "la data maggiore è quella di scadenza: " & dataS
    msgbox "i giorni di differenza sono: " & datediff("d",dataS, DataF)
else
    msgbox "la data maggiore è quella di scadenza: " & dataP
    msgbox "i giorni di differenza sono: " & datediff("d",dataP, DataF)
end if
end sub
sostituisci ai msgbox i recordset oppure le variabili nella form, dovrebe funzionare (se ho capito cosa ti serve :))
ciao
Nick


title: Gantt

author: simisa

text:
Esiste un modo per definire un grafico Gantt in access con le colonne
oscurate per sabato, domenica e festivi e che formatti le settimane in
numeri ?
tipo:
WK1 | WK2 | WK3...
xx       xx        xx
Dove xx sta per sabato e domenica in grigio... ;-)
Grazie infinite


title: Demo Partita Doppia

text:
Devo implementare un software di che crei la Partita Doppia Qualcuno ha uno
demo!! o si base su modelli eseguita con access naturalmente!!!
Attendo!!!


title: Problema su ciclo for...  next

author: carla

text:
Salve a tutti,
vorrei poter eliminare un recor a patto che questo abbia il campo
importopagrata =0
ho scritto queste istruzioni:
NumRec = DCount("*", "TABELLA PAGAMENTI", _
   "Prgsoluni='" & Me!prgsoluni & "'")
frazpagvar = FrazPag.Value
   For I = NumRec To frazpagvar + 1 Step -1
   If Me![Sottomaschera x masch PRGSOL x PAGAMENTI]![ImportoPagrata].Value =
0 Then
   MsgBox Me![Sottomaschera x masch PRGSOL x
PAGAMENTI]![ImportoPagrata].Value
   ..... altre istruzioni ecc....   (cancella record)
   End If
   Next I
come mai mi cancella solo il primo record?
con il msgbox mi sono accorta che pur diminuendo I , mi viene valorizzato
sempre il primo record.
Come posso fare a valorizzare anche gli altri?
alla stessa maniera, vorrei che una volta ridotto il numero dei record mi
aggiornasse il nrrata.
con il seguente codice mi mette il valore a tutti uguale. Non riesco a
identificare il record corrente.
   For I = NumRec To 1 Step -1
        miosql = "UPDATE [TABELLA PAGAMENTI] SET [TABELLA PAGAMENTI].nrrata
= " & I & " WHERE ([TABELLA PAGAMENTI].prgsoluni)='" & Me!prgsoluni & "';"
        DoCmd.RunSQL miosql
   Next I
grazie dei suggerimenti.
Carla


title: Problema su ciclo for...  next

text:
"carla" <carl...@NOSPAMhotmail.com> ha scritto nel messaggio
news:436ddd02$0$29606$4faf...@reader3.news.tin.it...

Per il primo caso potrebbe bastarti una query di eliminazione...
Per il secondo ho poche notizie...
Ciao, Carlo


title: Problema su ciclo for...  next

author: Bruno Campanini

text:
"carla" <carl...@NOSPAMhotmail.com> wrote in message
news:436ddd02$0$29606$4faf...@reader3.news.tin.it...
> Salve a tutti,
>
> vorrei poter eliminare un recor a patto che questo abbia il campo
> importopagrata =0
> ho scritto queste istruzioni:
Se devi cancellare dalla tabella PAGAMENTI tutti i record
che hanno il campo ImportoPagRata=0:
Dim SQL As String
DoCmd.SetWarnings False
SQL = "DELETE PAGAMENTI.*, FROM PAGAMENTI
            WHERE PAGAMENTI.ImportoPagRata=0;"
DoCmd.RunSQL SQL
DoCmd.SetWarnings True
> alla stessa maniera, vorrei che una volta ridotto il numero dei record mi
> aggiornasse il nrrata.
> con il seguente codice mi mette il valore a tutti uguale. Non riesco a
> identificare il record corrente.
Avevi ad esempio 7 record coi campi [nrrata] numerati da 1 a 7.
Avendone eliminato 2 vorresti che i restanti 5 avessero i campi
[nrrata] con numerazione da 1 a 5?
Bruno


title: Problema su ciclo for...  next

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:436e0bc3$0$6026$4faf...@reader4.news.tin.it...

Sě vorrei fare questo, comunque ti faccio anche un piccolo esempio
nrrata  importorata  importopagato
1         100               0
2         100              30
3         50                0
4         50                20
In questo caso mi dovrebbe eliminare la rata 3 e 1 perchč non sono state
pagate e le restanti dovrebbero prendere il valore nrrata 1 e 2
Grazie
Ciao
Carla


title: Problema su ciclo for...  next

text:
"carla" <carl...@NOSPAMhotmail.com> wrote in message
news:436e3018$0$29590$4faf...@reader3.news.tin.it...
> Sě vorrei fare questo, comunque ti faccio anche un piccolo esempio
>
> nrrata  importorata  importopagato
> 1         100               0
> 2         100              30
> 3         50                0
> 4         50                20
> In questo caso mi dovrebbe eliminare la rata 3 e 1 perchč non sono state
> pagate e le restanti dovrebbero prendere il valore nrrata 1 e 2
>
> Grazie
> Ciao
> Carla
Mi sembra una gran sciocchezza numerare in tabella i record.
Comunque:
====================================
Dim SQL As String, RS As Recordset, k As Integer
DoCmd.SetWarnings False
SQL = "DELETE Pagamenti.* " & _
           "FROM Pagamenti " & _
           "WHERE Pagamenti.ImportoPagRata=0;"
DoCmd.RunSQL SQL
DoCmd.SetWarnings True
Set RS = CurrentDb.OpenRecordset("Pagamenti", dbOpenDynaset)
With RS
    Do Until .EOF
    k = k + 1
        .Edit
        ![NrRata] = k
        .Update
        .MoveNext
    Loop
End With
====================================
Ciao
Bruno


title: Problema su ciclo for...  next

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:436e9bb4$0$1485$4faf...@reader2.news.tin.it...

> Bruno Scusami, non ti ho detto che la rinumerazione dei records la feve
> fare, cosě come l'eliminazione, solo per i records della tabella pagamenti
> dove il prgsoluni č uguale al prgsoluni di mask1 (prgsoluni č il campo
> testo con cui sono collegate mask1 e tabella pagamenti).
Per l'eleiminazione sono riuscita a integrare la tua istruzione aggiungendo
in fondo WHERE ((([TABELLA PAGAMENTI].ImportoPagrata)=0) AND (([TABELLA
PAGAMENTI].prgsoluni)=" & "'" & Me.[prgsoluni] & "'" & "));"
Per la rinumerazione cosa devo fare?
Grazie
Ciao
carla


title: SitoComune faq 6.22, aggiungerei una modifica

author: Fabio

text:
Salve a tutto il NG.
Ho trovato molto utile la faq 6.22 Richiamare la finestra di dialogo
per la selezione di un file del SitoComune; per trovare un tipo
specifico di file devo però sempre modificare il modulo. Ho effettuato
una modifica che mi risulta funzionale, soprattutto perchè permette di
richiamare la funzione passandole direttamente diverse possibili
scelte, così può essere l'utente a scegliersi il filtro direttamente
dalla finestra, e posso riutilizzare il modulo senza doverlo
modificare; ho anche aggiunto un paio di commenti che potrebbero
servire a chi come me è alle prime armi. Se non è troppo disturbo
pubblicherei qui di seguito la versione che ho modificato (solo la
funzione, il resto è inalterato) chiedendo il vostro aiuto, critiche e
commenti per le migliorie, così da poterla sottoporre al SitoComune se
fosse valida (sì insomma, proporre una modifica/aggiunta fatta male mi
parrebbe un insulto). Grazie per l'attenzione e l'aiuto.
Fabio
'Funzione alternativa da richamare
Public Function cmdlg_file_filter(plFilter As Variant, Optional
cerca_da As String = "C:\")
   'Autore: Stefano Bettini
   'Restituisce: il percorso completo del file selezionato
   'modificato da Fabio Innocente per scegliere i tipi di files da
cercare
   'e la Directory di partenza (di default C:)
   Dim OpenFile As OPENFILENAME
   Dim lReturn As Long
   Dim sFilter As String
   Dim i As Integer
   OpenFile.lStructSize = Len(OpenFile)
   'inizializzo sFilter
   sFilter = ""
   For i = 0 To UBound(plFilter)
      'il carattere zero (Chr(0)) delimita e i singoli filtri
      sFilter = sFilter & plFilter(i) & Chr(0)
   Next i
   OpenFile.lpstrFilter = sFilter
   OpenFile.nFilterIndex = 1
   OpenFile.lpstrFile = String(257, 0)
   OpenFile.nMaxFile = Len(OpenFile.lpstrFile) - 1
   OpenFile.lpstrFileTitle = OpenFile.lpstrFile
   OpenFile.nMaxFileTitle = OpenFile.nMaxFile
   OpenFile.lpstrInitialDir = cerca_da
   OpenFile.lpstrTitle = "Selezione"
   OpenFile.flags = 0
   lReturn = GetOpenFileName(OpenFile)
   If lReturn = 0 Then
      cmdlg_file_filter = ""
   Else
      cmdlg_file_filter = Left(OpenFile.lpstrFile,
InStr(OpenFile.lpstrFile, Chr$(0)) - 1)
   End If
End Function
'per richiamare la funzione:
    Dim tipoFile As Variant
    'tipoFile deve contenere una o più coppie di elementi (descrizione
e tipo di file)
    'separati da una virgola
    Dim pathFile As String
    tipoFile = Array("Tutti i file (*.*)", "*.*","File di testo
(*.txt)","*.txt")
    pathFile = cmdlg_file_filter(tipoFile, Directory_da_cui_Cercare)
   'pathFile è una stringa col percorso completo del file a partire
dal nome del
   'drive dove è salvato


author: Alessandro Baraldi

text:
Fabio ha scritto:
> Salve a tutto il NG.
>
> Ho trovato molto utile la faq 6.22 Richiamare la finestra di dialogo
> per la selezione di un file del SitoComune; per trovare un tipo
> specifico di file devo però sempre modificare il modulo. Ho effettuato
> una modifica che mi risulta funzionale, soprattutto perchè permette di
> richiamare la funzione passandole direttamente diverse possibili
> scelte, così può essere l'utente a scegliersi il filtro direttamente
> dalla finestra, e posso riutilizzare il modulo senza doverlo
> modificare; ho anche aggiunto un paio di commenti che potrebbero
> servire a chi come me è alle prime armi. Se non è troppo disturbo
> pubblicherei qui di seguito la versione che ho modificato (solo la
> funzione, il resto è inalterato) chiedendo il vostro aiuto, critiche e
> commenti per le migliorie, così da poterla sottoporre al SitoComune se
> fosse valida (sì insomma, proporre una modifica/aggiunta fatta male mi
> parrebbe un insulto). Grazie per l'attenzione e l'aiuto.
>
> Fabio
Ciao Fabio.
Ti dico la mia...!
Personalmente trovo inutile comporre un'array(data una stringa di
partenza) da passare ad una Funzione per poi riconvertirlo in
Stringa...., a quel punto passa direttamente la stringa
come Filtro e ti eviti un ciclo sull'Array ....!
Altra considerazione, questo a mio avviso potrebbe essere opinabile:
La cosa forse veramente funzionale sarebbe creare una Classe nella
quale inserire un Metodo "AddFilter" e "RemoveFilter" a quel punto
diventerebbe veramente flessibile...
Tieni presente che quanto ti ho detto è già realizzato, anche perchè
la chiamata al CmdDialog supporta moltissime personalizzazioni, tra le
quali il CallBack...., quello
che hai trovato sul SC è il Demo minimale...
Saluti
@Alex


text:
Alessandro Baraldi ha scritto:
> Fabio ha scritto:
>
> > Salve a tutto il NG.
> >
CUT
> > Fabio
>
> Ciao Fabio.
>
> Ti dico la mia...!
>
> Personalmente trovo inutile comporre un'array(data una stringa di
> partenza) da passare ad una Funzione per poi riconvertirlo in
> Stringa...., a quel punto passa direttamente la stringa
> come Filtro e ti eviti un ciclo sull'Array ....!
>
> Altra considerazione, questo a mio avviso potrebbe essere opinabile:
> La cosa forse veramente funzionale sarebbe creare una Classe nella
> quale inserire un Metodo "AddFilter" e "RemoveFilter" a quel punto
> diventerebbe veramente flessibile...
>
> Tieni presente che quanto ti ho detto è già realizzato, anche perchè
> la chiamata al CmdDialog supporta moltissime personalizzazioni, tra le
> quali il CallBack...., quello
> che hai trovato sul SC è il Demo minimale...
>
> Saluti
> @Alex
Grazie, allora li lascio in pace e vedo se sono capace di fare per
conto mio quanto mi hai suggerito!
Caio
Fabio


title: AIUTO !!!!!!!!!!! Grafico di MS Access 97

author: Simon

text:
Sto cercado da molto tempo di visualizzare su di un unico grafico le
spezzate di un grafico che si riferiscono ai fatturati mesnsili nei vari
anni. Ho quindi l'esigenza di confrontare l'andamento del 2001 con il 2000,
scandendo mensilmente l' arco temporale.
Qualcuno mi puo aiutare ??
Ringrazio Anticipatamente
Simon


text:
"Simon" <
Simon....@iexi.com
> ha scritto nel messaggio
news:MOpI7.6890$0x4.1...@news2.tin.it...
> Sto cercado da molto tempo di visualizzare su di un unico grafico le
> spezzate di un grafico che si riferiscono ai fatturati mesnsili nei vari
> anni. Ho quindi l'esigenza di confrontare l'andamento del 2001 con il
2000,
> scandendo mensilmente l' arco temporale.
>
io l'ho fatto..ma è più facile da tentare di fare che spiegartelo...comunque
il grafico fa capo a una query a campi incrociati
adesso quando ho 2 sec. provo a postarlo su NG
ciao
>


title: Problema con pannello comandi

text:
Quando creo un pannello comandi, per ognuno di essi posso scegliere
testo, comando ed una terza opzione.
Se in comando scelgo "Esegui funzione" poi posso scegliere "nome
funzione". Ma a quali funzioni devo riferirmi e cosa devo mettere in
questo campo. Se la funzione accetta delle variabili in ingresso?
Spero di essere stato chiaro.
Grazie e ciao


title: Dimensioni campi nei report

author: Ezio Peraro

text:
Devo stampare dei report che contengono un campo in cui il testo inserito
puo' variare dai 10 ai 250 caratteri.
Se lo dimensiono per il minimo, mi taglia testo, se lo dimensiono per il
massimo, nella stampa mi risultano tanti spazi e righe bianche. La
proprieta' "espandibile" o "riducibile", anche se applicata,  mi sembra
ininfluente.
Ho tentato di ricorrere alla stampa unione di Word che, al contrario, riesce
a "sagomare" le celle in relazione al testo, ma, purtroppo, si perdono i
raggruppamenti per categoria.
Qualcuno conosce una terza via, piu' illuminata?
Grazie
Ezio


title: Dimensioni campi nei report

author: Fabio Montagner

text: Ma la proprietà "espandibile" l'hai applicata anche alla sezione del report?


title: Dimensioni campi nei report

author: Antonio Biso

text:
Ezio Peraro ha scritto nel messaggio <8bok1f$g48$
1...@nslave2.tin.it
>...
>Devo stampare dei report che contengono un campo in cui il testo inserito
>puo' variare dai 10 ai 250 caratteri.
>Se lo dimensiono per il minimo, mi taglia testo, se lo dimensiono per il
>massimo, nella stampa mi risultano tanti spazi e righe bianche. La
>proprieta' "espandibile" o "riducibile", anche se applicata,  mi sembra
>ininfluente.
Non è possibile!
Antonio


title: Dimensioni campi nei report

author: lbo dal portatile

text:
>>Devo stampare dei report che contengono un campo in cui il testo inserito
>>proprieta' "espandibile" o "riducibile", anche se applicata,  mi sembra
>>ininfluente.
>Non è possibile!
possibile si'.  i campi mica dispongono delle prop exp e rid.  forse i
controlli.
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/


title: RICONOSCIMENTO INPUT

author: Alberto

text:
Ciao ragazzi, ho un problema e chiedo aiuto..
Devo realizzare un gestionale per un centro - estetico.
Tra i vari dati occorre associare ai vari clienti e agli articoli
venduti/utilizzati un BARCODE.
Quello che mi viene richiesto è :
in qualsiasi maschera mi trovo (magari non legata alle anagrafiche) se
viene letto il codice a barre tramite lettore in automatico si deve
aprire l'anagrafica interessata.
Come posso fare  ?


title: RICONOSCIMENTO INPUT

author: Gabriele Bertolucci

text:
> Tra i vari dati occorre associare ai vari clienti e agli articoli
> venduti/utilizzati un BARCODE.
Fino a qui niente di particolare.
> Quello che mi viene richiesto è :
> in qualsiasi maschera mi trovo (magari non legata alle anagrafiche) se
> viene letto il codice a barre tramite lettore in automatico si deve
> aprire l'anagrafica interessata.
Dunque, secondo me devi staccarti dal problema "lettore di codici a barre"
ed analizzare il problema da un altro punto di vista.
Motivo? I lettori di codici a barre da banco di solito sono collegati fisicamente
al computer sul quale vengono utilizzati, semplicemente funzionando in emulazione
tastiera. Questo significa che il fatto di leggere il codice a barre e tradurlo
in caratteri tramite il lettore, oppure leggere il codice numerico e digitarlo
manualmente da tastiera, sono la stessa identica cosa.
Quindi, il tuo problema si sposta leggermente.
Il tuo cliente vuole che, inserendo in qualsiasi momento un codice a barre,
la tua procedura riporti alla relativa anagrafica cliente o articolo.
Fossi in te io prevederei due modalità di input per la tua procedura: nella
prima modalità (quella predefinita dei programmi GUI-based) non fai niente
di particolare e gli input che vengono inseriti sono catturati semplicemente
dalla maschera che ha il focus; nella seconda modalità, invece, fai in modo
che qualunque dato venga inputato, sia filtrato dalla tua procedura in modo
da riconoscere se si tratta di un codice a barre oppure no.
Ovviamente devi anche prevedere un "tasto fuga" che ti permetta di switchare
tra le due modalità di input.
A questo punto il tuo cliente potrebbe anche essere contento ma potrebbe
non gradire il fatto di dover premere quel tasto per passare da una modalità
ad un'altra: allora puoi anche prevedere che la procedura parta nella modalità
più utilizzata dal tuo cliente, inoltre puoi anche inserire un timer che
riporti a tale modalità dopo un tot di tempo senza che sia stato ricevuto
un input.
Soluzione alternativa: il cliente fornisce una postazione dalla quale si
provvede esclusivamente ad utilizzare il lettore di codici, mentre le altre
postazioni utilizzano la tua procedura senza alcun particolare accorgimento.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution


title: RICONOSCIMENTO INPUT

author: MA

text:
Gabriele Bertolucci wrote:
>> Tra i vari dati occorre associare ai vari clienti e agli articoli
>> venduti/utilizzati un BARCODE.
>
> Fino a qui niente di particolare.
>
>> Quello che mi viene richiesto è :
>> in qualsiasi maschera mi trovo (magari non legata alle anagrafiche)
>> se viene letto il codice a barre tramite lettore in automatico si
>> deve aprire l'anagrafica interessata.
>
> Dunque, secondo me devi staccarti dal problema "lettore di codici a
> barre"
> ed analizzare il problema da un altro punto di vista.
> Motivo? I lettori di codici a barre da banco di solito sono collegati
> fisicamente al computer sul quale vengono utilizzati, semplicemente
> funzionando in emulazione tastiera. Questo significa che il fatto di
> leggere il codice a barre e tradurlo in caratteri tramite il lettore,
> oppure leggere il codice numerico e digitarlo manualmente da
> tastiera, sono la stessa identica cosa.
> Quindi, il tuo problema si sposta leggermente.
Tutto giusto se parli di lettori ad emulazione tastiera.
se invece li hai sulla seriale, tu intercetti sempre la lettura sulla porta
e a quel punto lo veicoli dove vuoi.
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Report Excel, problema un po' complesso, ma sono senza idee su come proseguire

author: Postino

text:
Ho un problemi un po' complesso riguardante la reportistica, ma vediamo
subito di cosa si tratta.
Ho creato un database gestionale (Access 97) dove tra le molte cose si
occupa anche di registrare delle presenze, ognuna di questa sarà di tipo A,
B, C a seconda del tipo di presenza della persona.
Ho un file excel per rilevare le presenze di ogni SINGOLA persona durante
l'anno. Questo file é standard e la sua struttura (vedi descrizione) non
puo' essere modificata. Per farvi un'idea di come é fatto immaginatevi una
tabella larga 31 caselle (come i giorni) e alta 3 (per ogni tipo di
presenza), il tutto ripetuto dodici volte (come i mesi), quindi in tutto vi
sono 12 tabelle da 31 x 3 celle). Una volta stampato il foglio saranno
mostrati i mesi da gennaio a giugno davanti e da luglio a dicembre dietro.
Ora il lavoro consiste nel tirare su i dati in una query (easy) e trasferire
ogni singola presenza nel campo corretto (meno easy).
NB: Una persona puo' essere presente anche ad anno già iniziato e quindi può
anche terminare durante l'anno (es. dal 30 maggio a 30 settembre). Il tipo
di presenza (A,B,C) può ovviamente variare.
Possibili soluzioni:
a] Creare l'intero Report in Access, anche se da quanto mi risulta la parte
grafica (v. struttura modello) non é così evidente da ricostruire.
b] Creare il modello in Excel e quindi esportare i dati della Query via
codice (ok), ma poi come procedere? Bisogna lavorare sul singolo campo di
Excel, o vi sono soluzioni più "umane"?
c] Non fare il report. :o)
Qualcuno ha già fatto qualcosa del genere? Idee?
Grazie mille ;o))


author: Maurizio Borrelli

text:
> "Postino" <
raf...@sunrise.ch
> ha scritto nel messaggio
> news:3e4833b3$0$5120$5402...@news.sunrise.ch...
[...]
> Ho creato un database gestionale (Access 97) dove tra le molte cose si
> occupa anche di registrare delle presenze, ognuna di questa sarà di tipo
> A, B, C a seconda del tipo di presenza della persona.
> Ho un file excel per rilevare le presenze di ogni SINGOLA persona durante
> l'anno. Questo file é standard e la sua struttura (vedi descrizione) non
> puo' essere modificata. Per farvi un'idea di come é fatto immaginatevi una
> tabella larga 31 caselle (come i giorni) e alta 3 (per ogni tipo di
> presenza), il tutto ripetuto dodici volte (come i mesi), quindi in tutto
> vi sono 12 tabelle da 31 x 3 celle). Una volta stampato il foglio saranno
> mostrati i mesi da gennaio a giugno davanti e da luglio a dicembre dietro.
> Ora il lavoro consiste nel tirare su i dati in una query (easy) e
> trasferire ogni singola presenza nel campo corretto (meno easy).
> NB: Una persona puo' essere presente anche ad anno già iniziato e quindi
> può
> anche terminare durante l'anno (es. dal 30 maggio a 30 settembre). Il tipo
> di presenza (A,B,C) può ovviamente variare.
> Possibili soluzioni:
> a] Creare l'intero Report in Access, anche se da quanto mi risulta la
> parte
> grafica (v. struttura modello) non é così evidente da ricostruire.
> b] Creare il modello in Excel e quindi esportare i dati della Query via
> codice (ok), ma poi come procedere? Bisogna lavorare sul singolo campo di
> Excel, o vi sono soluzioni più "umane"?
> c] Non fare il report. :o)
[...]
    Magari a te sembrera' strano, perche' hai ben presente il tuo problema,
ma a me che ti leggo viene da dire: e allora? Qual e' la domanda?...
    Perche' arrivato a leggere i tuoi "easy" e "meno easy" penso: bon, sa
che dovra' penare un po' ma questo non lo considera un problema e non pare
che attenda risposte al riguardo... Vediamo ora cosa gli interessa sapere. E
a questo punto mi perdo...
    Allora io direi di riformulare il tutto...
    Mi sembra di capire che le uniche due cose dalle quali non si possa
prescindere (quindi ignoro bellamente il tuo punto c. ;-) siano:
        1. una cartella di lavoro excel esistente contenente i
           dati di input. Da quel che scrivi sembra che non si possa
           intervenire sulla struttura di questo documento e che
           quindi non possa essere messa in discussione;
        2. un report cartaceo, stampato fronte retro, con la sintesi
           mensile di tali dati, un semestre per pagina.
    Vediamo il punto 1. Parli di *un* file excel per rilevare le presenze di
*ogni singola* persona e descrivi come e' fatto *il* foglio. Questo vuol
dire che nella cartella di lavoro excel ci sono tanti fogli di lavoro quante
sono le persone?
    Parli di un database per la registrazione delle presenze, che non ci
descrivi, e parli di aggiornare tale database con i dati presenti nella
cartella di lavoro excel, ma non specifichi che tipo di aggiornamento vada
eseguito. Dato che il problema *sembrerebbe* essere esclusivamente la stampa
del report al mio punto 2, dovresti parlarci un po' di piu' di cosa ti
proponi di fare riguardo l'aggiornamento del database.
    Per ora mi fermo... e spero di esserti stato utile.
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


text:
Effettivamente forse non sono stato chiarissimo, sarà stato l'orario :o))
Alcuni punti non chiarissimi nel primo post:
- Il documento Excel (solo un foglio) contiene tutte le presenze della
persona in un anno, di una sola persona (che avrò scelto in una Form di
Access).
- Quando dicevo che la struttura del documento non deve mutare intendevo
dire che alla fine dovrò poter stampare un foglio A4 con 6 tabelle davanti
(gen-giu) e 6 dietro (lug-dic) tutte della grandezza 3 x 31 celle.
Database:
- Per questa stampa vengono utilizzate due sole tabelle OSPITE e PRESENZA
(legame 1 a M).
- OSPITE (Id, Nome, Cognome,...) e PRESENZA (Id, IdOspite, Data,
TipoPresenza)
Quello che voglio fare e semplicemente far saltare fuori il Report descritto
sopra (dopo aver scelto l'ospite) e mostrare quindi tutte le sue presenze
inserendo una "X" nella cella corrispondente (quindi secondo la data ed il
tipo di presenza).
La domanda:
Non sono ben in chiaro su come procedere.
- C'é la qualche algoritmo che mi permette via codice di inserire nelle
singole celle la X (quando é il caso)?
- Devo fare passare tutte le celle e fargli fare il controllo (es. PRESENZA
31.05.2003 di tipo C corrisponde alla cella A1? no, A2? no, A3? no,...)?
- Oihbò... per quel che sono le soluzioni, come detto son confuso anche
io.... é per questo che chiedevo se qualcuno aveva già avuto esperienze
simili :o)
Se hai bisogno altre delucidazioni... son sempre qui! :o))
Grazie ancora!



title: BE protetto da pwd

author: Napoleone

text:
Ciao a tutti,
ho provato a mettere la pwd al dbBE, quando lancio il FE mi dice password
errata..
come mai succede cio?
win xp - A03
Napoleone


title: BE protetto da pwd

author: Cinzia

text:
"Napoleone" <
napole...@libero.it
> ha scritto nel messaggio
news:7_suf.109451$65.31...@twister1.libero.it...

Ciao NApoleone,
dal frontEnd scollega tutte le tabelle e ricollegale, quando le
ricollegherai ti chiederà la password e una volta inserita il tutto
riprenderà a funzionare.
--
Cinzia
---------------------------------------
|
http://www.riolab.org
  |
--------------------------------------->


title: BE protetto da pwd

text:
"Cinzia" <
cinziapagani_...@tiscali.it
> ha scritto nel messaggio
news:43ba67dc$0$332$5fc...@news.tiscali.it...
>
>
> "Napoleone" <
napole...@libero.it
> ha scritto nel messaggio
> news:7_suf.109451$65.31...@twister1.libero.it...
>> Ciao a tutti,
>> ho provato a mettere la pwd al dbBE, quando lancio il FE mi dice password
>> errata..
>>
>> come mai succede cio?
>>
>> win xp - A03
>>
>> Napoleone
>>
> Ciao NApoleone,
> dal frontEnd scollega tutte le tabelle e ricollegale, quando le
> ricollegherai ti chiederą la password e una volta inserita il tutto
> riprenderą a funzionare.
>
>
> --
> Cinzia
Ciao Cinzia,
perfetto!!
Adesso quando lancio il FE, mi legge i dati delle tabelle, senza chiedere la
PW, č corretto cosi? Immaginavo che, alla prima apertura del FE chiedesse la
PW!!! :-))
Grazie
Napoleone


title: BE protetto da pwd

text:
> >> Ciao a tutti,
> >> ho provato a mettere la pwd al dbBE, quando lancio il FE mi dice
password
> >> errata..
> >>
> >> come mai succede cio?
> >>
> >> win xp - A03
> >>
> >> Napoleone
> >>
> > Ciao NApoleone,
> > dal frontEnd scollega tutte le tabelle e ricollegale, quando le
> > ricollegherai ti chiederà la password e una volta inserita il tutto
> > riprenderà a funzionare.
> >
> >
> > --
> > Cinzia
>
> Ciao Cinzia,
> perfetto!!
> Adesso quando lancio il FE, mi legge i dati delle tabelle, senza chiedere
la
> PW, è corretto cosi? Immaginavo che, alla prima apertura del FE chiedesse
la
> PW!!! :-))
>
>
Ciao Napoleone
No è giusto così, sostanzialmente si memorizza la password nella stringa di
connessione delle tabelle e quindi non te la richiede più!!



title: BE protetto da pwd

author: cicalanew

text:
Cinzia ha scritto:
> > >> Ciao a tutti,
> > >> ho provato a mettere la pwd al dbBE, quando lancio il FE mi dice
> password
> > >> errata..
> > >>
> > >> come mai succede cio?
> > >>
> > >> win xp - A03
> > >>
> > >> Napoleone
> > >>
> > > Ciao NApoleone,
> > > dal frontEnd scollega tutte le tabelle e ricollegale, quando le
> > > ricollegherai ti chiederà la password e una volta inserita il tutto
> > > riprenderà a funzionare.
> > >
> > >
> > > --
> > > Cinzia
> >
> > Ciao Cinzia,
> > perfetto!!
> > Adesso quando lancio il FE, mi legge i dati delle tabelle, senza chiedere
> la
> > PW, è corretto cosi? Immaginavo che, alla prima apertura del FE chiedesse
> la
> > PW!!! :-))
> >
> >
> Ciao Napoleone
> No è giusto così, sostanzialmente si memorizza la password nella stringa di
> connessione delle tabelle e quindi non te la richiede più!!
una domanda:
come si scollegano le tabelle?
grazie
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: BE protetto da pwd

author: luigi onofrio

text:
cicalanew ha scritto:
> Cinzia ha scritto:



apri il FE, visualizza tabelle, selezioni le tabelle e le cancelli
poi vai su carica dati esterni, carica tabelle e le ricarichi cercando il
percorso specifico.
prego



title: BE protetto da pwd

text:
"Cinzia" <
cinziapagani_...@tiscali.it
> ha scritto nel messaggio
news:43ba8f4c$0$337$5fc...@news.tiscali.it...
>
>> >> Ciao a tutti,
>> >> ho provato a mettere la pwd al dbBE, quando lancio il FE mi dice
> password
>> >> errata..
>> >>
>> >> come mai succede cio?
>> >>
>> >> win xp - A03
>> >>
>> >> Napoleone
>> >>
>> > Ciao NApoleone,
>> > dal frontEnd scollega tutte le tabelle e ricollegale, quando le
>> > ricollegherai ti chiederŕ la password e una volta inserita il tutto
>> > riprenderŕ a funzionare.
>> >
>> >
>> > --
>> > Cinzia
>>
>> Ciao Cinzia,
>> perfetto!!
>> Adesso quando lancio il FE, mi legge i dati delle tabelle, senza chiedere
> la
>> PW, č corretto cosi? Immaginavo che, alla prima apertura del FE chiedesse
> la
>> PW!!! :-))
>>
>>
>
> Ciao Napoleone
> No č giusto cosě, sostanzialmente si memorizza la password nella stringa
> di
> connessione delle tabelle e quindi non te la richiede piů!!
>
> --
> Cinzia
Grazie Cinzia,
sei sempre chiara e gentilissima.
Napoleone


title: BE protetto da pwd

text:
Se invece vuoi aprire i DB sempre con PW io ho fatto così:
ho creato un BE (solo tabelle) e un FE (Maschere-Query Macro ecc). Ho aperto il BE in modalità esclusiva, poi gli ho assegnato una PW (es aaa) e richiuso. Ho aperto l'FE e ho collegato le tabelle dal BE digitando, quando richiesto la PW aaa, quindi ho chiuso. Ho aperto l'FE in modalità esclusiva e gli assegnato un'altra PW (es bbb). Quando vado ad aprire a 2 DB li apro con le rispettive PW che gli ho assegnato
--
franco_44
------------------------------------------------------------------------
View this thread:
http://www.itsistemi.net/viewtopic-747755.html
Inviato via
http://www.itsistemi.net


title: BE protetto da pwd

text:
"franco_44" <
franco_4...@no-mx.itsistemi.net
> ha scritto nel messaggio
news:franco_4...@no-mx.itsistemi.net...
>
> Se invece vuoi aprire i DB sempre con PW io ho fatto così:
> ho creato un BE (solo tabelle) e un FE (Maschere-Query Macro ecc). Ho
> aperto il BE in modalità esclusiva, poi gli ho assegnato una PW (es aaa) e
> richiuso. Ho aperto l'FE e ho collegato le tabelle dal BE digitando,
> quando richiesto la PW aaa, quindi ho chiuso. Ho aperto l'FE in modalità
> esclusiva e gli assegnato un'altra PW (es bbb). Quando vado ad aprire a 2
> DB li apro con le rispettive PW che gli ho assegnato
>
>
> --
> franco_44
>
Ciao franco,
sul primo punto per quanto riguarda la protezione del BE, l'abbiamo pensata
allo stesso modo; per quanto riguarda il FE, vorrei impostare una protezione
che mi dia qual'cosa di più della semplice PW.
Notte
Napoleone


title: Errore di run-time 53 - Impossibile trovare il file

author: John B

text:
Un saluto a tutti.
Nella gestione di un archivo ho generato un pulsante Word che mi dovrebbe
apparire il file che ho archiviato.
Le poche righe di codice sono:
Private Sub cmdEsegui_Click()
Dim Esegui
Esegui = Shell(Me!Applicazione & " " & Me!Percorso & NomeFile,
vbNormalFocus)
End Sub
Tutto funziona, tranne che il primo record, dove ricevo quel messaggio
d'errore quando clicco sul pulsante.
Che cosa potrebbe essere?
Grazie fin d'ora del Vs aiuto.
Giovanni


text:
> "John B" <
b...@infinito.it
> ha scritto nel messaggio
> news:MRYV9.61897$AA2.2...@news2.tin.it...

    Per poter rispondere bisognerebbe sapere cosa valgono Me!Applicazione,
Me!Percorso e NomeFile al momento dell'esecuzione. Fai cosi':
        Private Sub cmdEsegui_Click()
        Dim Esegui
        Debug.Print Me!Applicazione
        Debug.Print Me!Percorso
        Debug.Print NomeFile
        'Esegui = Shell(Me!Applicazione & " " & Me!Percorso & NomeFile,
        'vbNormalFocus)
        End Sub
e facci sapere cosa leggi nella "Finestra immediata".
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


text:
>     Per poter rispondere bisognerebbe sapere cosa valgono Me!Applicazione,
Me!Percorso e NomeFile al momento dell'esecuzione. Fai cosi':
Me!Applicazione vale:
C:\Programmi\Microsoft Office97\Office\WINWORD.EXE
Me!Percorso vale:
D:\documenti\rosa\giunta\
NomeFile
č il nome del file salvato nel percorso indicato.
Se lo stesso nome lo digito nel record 2 o 3 e cosě via il file Word si apre
normalmente
Altro messaggio che ricevo quando ritorno tramite la maschera sul record 1
č:
"Il modulo di gestione di database Microsoft Jet ha interrotto
l'elaborazione.
Un altro utente sta tentando contemporaneamente di modificare gli stessi
dati."
Ma sono da solo su un solo PC (almeno credo).
Adesso provo con i Vs preziosi suggerimenti. Grazie ancora e intanto auguro
una buona serata.
Giovanni


text:
> "John B" <
b...@infinito.it
> ha scritto nel messaggio
> news:zoZV9.62142$AA2.2...@news2.tin.it...
    ... dunque, il tuo codice era questo:
Private Sub cmdEsegui_Click()
Dim Esegui
Esegui = Shell(Me!Applicazione & " " & Me!Percorso & NomeFile,
vbNormalFocus)
End Sub
> Me!Applicazione vale:
> C:\Programmi\Microsoft Office97\Office\WINWORD.EXE
    Con uno spazio! Quindi dovrai racchiudere tale testo fra doppi apici:
        Shell( """" & Me!Applicazione & """"
proprio come faresti digitandolo al prompt del DOS. (Prova!...)
[...]
    Probabilmente questo dovrebbe bastare. Facci sapere.



text:
Ok. Adesso, con le modifiche effettuate, funziona.
Grazie ancora e anche buon fine settimana.
Giovanni


title: Stampe di etichette.

author: Raffaele

text:
Ciao ragazzi, ho un grosso problema con delle etichette da stampare. Infatti
avendo una tabella con descrizione e quantità, ho l'esigenza di stampare nel
report tante etichette per quante sono le giacenze. Ad esempio se ci sono
dieci tavoli il report mi deve stampare dieci etichette della stessa
descizione, se ci sono cinque sedie lo stesso e così via, qualcuno saprebbe
essere così gentile da aiutarmi? Grazie anticipate a tutti. Ciao
Raffaele


title: Stampe di etichette.

author: Francesco Baralli

text:
Ho avuto un problema simile e mi hanno suggerito (nel newsgroup) di usare la
routine:
Private Sub Corpo_Print(Cancel As Integer, PrintCount As Integer)
   If PrintCount < Me.N_Fascicoli Then
      Me.NextRecord = False
      PrintCount = PrintCount + 1
   Else
      PrintCount = 0
   End If
End Sub
da inserire nel report delle etichette, il campo N_Fascicoli contiene il
numero di etichette da stampare deloo stesso record e deve essere un campo
della tabella o query fonte dei dati.
Ciao,
Fr@
Raffaele <
rmi...@freemail.it
> wrote in message
87n8tl$krt$1...@nslave2.tin.it...



title: per Federico (switchare)

author: gestserv

text:
Ti risulta che nella routine che hai messo sul sito comune (switchare tra fe
e be uguali) qualora ci sia un collegamento ad un archivio.dbf  oltre che
un'archivio.mdb sia impossibile che la routine funzioni? mi da un messaggio
impossibile trovare archivio#dbf ...
grazie
matteo


title: per Federico (switchare)

author: Federico Luciani

text:

> matteo
No, non funziona.
Devi modificare il codice e fare in modo che se la tabella e' un dbf usi una
stringa di connessione appropriata.
--
Federico
----------------------------------
Rimuovi paperino. per e-mail
----------------------------------
Tutte le richieste che arrivano
in privato, vengono cestinate.
----------------------------------
Sito Comune di it.comp.appl.access
http://www.sitocomune.com
mailto:
webm...@sitocomune.com
----------------------------------


title: Pulsante per trasferire campi da Word ad Access

text:
Ho copiato da un precedente post il seguente codice
Dim acc As Access.Application
    Set acc = GetObject(, "Access.application")
    acc.CurrentDb.Execute "INSERT INTO TblProva (CampoTxt, CampoLng) "
& _
                          "VALUES (""da Word"", 999);"
    Set acc = Nothing
Ho aggiunto il riferimento alla libreria Access
ma al momento dell'esecuzione mi restituisce l'errore
"il componente Activex non è in grado di creare l'oggetto"
Qualcuno sa aiutarmi ?


author: geppo

text:
Ciao <
cosi...@gmail.com
> ha scritto nel messaggio
news:39e47a3d-f349-4a36...@q30g2000prq.googlegroups.com...
Ho copiato da un precedente post il seguente codice
Dim acc As new Access.Application
acc.CurrentDb.Execute "INSERT INTO TblProva (CampoTxt, CampoLng) "
& _
                          "VALUES (""da Word"", 999);"
    Set acc = Nothing
--
Ciao
Geppo


text:
On 9 Gen, 01:31, "geppo" <c...@tin.it.invalid> wrote:
> Ciao <
cosim...@gmail.com
> ha scritto nel messaggionews:39e47a3d-f349-4a36...@q30g2000prq.googlegroups.com...
> Ho copiato da un precedente post il seguente codice
>
> Dim acc As new Access.Application
>
> acc.CurrentDb.Execute "INSERT INTO TblProva (CampoTxt, CampoLng) "
> & _
>                           "VALUES (""da Word"", 999);"
>     Set acc = Nothing
>
> --
> Ciao
> Geppo
Grazie Geppo ma adesso mi da "errore di automazione sintassi non
valida"
al rigo con la freccia
Dim acc As New Access.Application
---->    Set acc = GetObject(",Access.application")
    acc.CurrentDb.Execute "INSERT INTO tabella1 (Campo, Campo2) " & _
                          "VALUES (""da Word"", 999);"
    Set acc = Nothing
End Sub
Ciao


author: Sergio MAZZA

text:
<
cosi...@gmail.com
> ha scritto nel messaggio
news:b0e38b3e-5c17-4229...@g39g2000pri.googlegroups.com...





End Sub
Ciao
[risposta]
Leggi qui (e nell'help in linea F1):
Funzione GetObject
http://office.microsoft.com/it-it/access/HA012288481040.aspx
Ciao.
--
Sergio MAZZA


text:
On 10 Gen, 15:52, "Sergio MAZZA" <
sergioma...@tiscali.it
> wrote:
> <
cosim...@gmail.com
> ha scritto nel messaggionews:b0e38b3e-5c17-4229...@g39g2000pri.googlegroups.com...
> On 9 Gen, 01:31, "geppo" <c...@tin.it.invalid> wrote:
>
> > Ciao <
cosim...@gmail.com
> ha scritto nel
> > messaggionews:39e47a3d-f349-4a36...@q30g2000prq.googlegroups.com...
> > Ho copiato da un precedente post il seguente codice
>
> > Dim acc As new Access.Application
>
> > acc.CurrentDb.Execute "INSERT INTO TblProva (CampoTxt, CampoLng) "
> > & _
> > "VALUES (""da Word"", 999);"
> > Set acc = Nothing
>
> > --
> > Ciao
> > Geppo
>
> Grazie Geppo ma adesso mi da "errore di automazione sintassi non
> valida"
> al rigo con la freccia
>
> Dim acc As New Access.Application
>
> ---->    Set acc = GetObject(",Access.application")
>
>     acc.CurrentDb.Execute "INSERT INTO tabella1 (Campo, Campo2) " & _
>                           "VALUES (""da Word"", 999);"
>     Set acc = Nothing
>
> End Sub
>
> Ciao
>
> [risposta]
> Leggi qui (e nell'help in linea F1):
> Funzione GetObjecthttp://
office.microsoft.com/it-it/access/HA012288481040.aspx
>
> Ciao.
>
> --
> Sergio MAZZA
Grazie la sintassi corretta è
Set acc = GetObject("c:\miodb.mdb")


text:

*************************  H E L P
Si ma adesso non riesco a passare alla query i valori dei campi di
Word


text:

Risolto così
Dim acc As New Access.Application
    Set acc = GetObject("c:\db1.mdb")
    acc.CurrentDb.Execute "INSERT INTO tabella1 (Campo, Campo2) " & _
                          "VALUES ('" & Xcampo & "', '" & Xdata &
"');"



title: Differenza fra due date!

author: Air

text:
Sto lavorando in Access su un progetto di conto corrente bancario in access,
non riesco a calcolare nella query la differenza tra 2 date appartenenti a
due record diversi.
Grazie, Air


title: Differenza fra due date!

author: moskolowosky

text:


Prova con la funzione DataDiff
Ciao


title: Differenza fra due date!

author: Roberto da casa

text:
"Air" <
or...@libero.it
> ha scritto nel messaggio
news:p9epa.45208$LB6.1...@news1.tin.it...

Se, come immagino, la differenza la devi fare in una query tra la data del
record corrente e la data del record precedente, vai sul Sito Comune (link
qui sotto) e nella Sezione Queries scaricati il database di esempi che č
allegato alla FAQ intitolata "Esempi di utilizzo e creazione di queries".
Apri il database che hai scaricato e seleziona il Topic intitolato Referring
to a Field in the Previous or Next Record.
Pigiando il pulsante Show Example visualizzerai degli esempi di ciň che ti
serve. Ti consiglio le tecniche realizzate tramite funzioni VBA.
Per maggiori dettagli di come sono stati realizzati gli esempi che hai
visualizzato, vai al link:
http://support.microsoft.com/support/kb/articles/q101/0/81.asp
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Filtro

author: Pippo

text:
.....Nella progr. di VB non ci chiappo !!
Vi sottopongo quest script di una maschera, nella quale, l'ho modificata
aggiungendo la dichiarazione di IUPAC e sostituendo l'assegnazione di
default stLinkCriteria =."[Name]=" & "'" & Me![Nome] & "'", con quanto in
calce riporto
Q.no mi può indicare come passare ad stLinkCriteria la variabile IUPAC,
affinche nella maschera che questa  routine apre, venga immediatamente
vissualizzato in [nome]  ?
Grazie
Private Sub Apri_maschera_Proprieta_Sicurezza_Click()
On Error GoTo Err_Apri_maschera_Proprieta_Sicurezza_Click
    Dim stDocName As String
    Dim stLinkCriteria As String
    Dim IUPAC As String
    stDocName = "Proprieta Sicurezza ALTSOLV"
    IUPAC = "[Sicurezza]![nome]"
    stLinkCriteria = "[Name]=" & "'" & IUPAC & "'"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Apri_maschera_Proprieta_Sicurezza_C:
    Exit Sub
Err_Apri_maschera_Proprieta_Sicurezza_Click:
    MsgBox Err.Description
    Resume Exit_Apri_maschera_Proprieta_Sicurezza_C
End Sub


title: Filtro

text:
"Pippo" <
buff...@virgilio.it
> ha scritto nel messaggio
news:424ab8a9$0$8080$5fc...@news.tiscali.it...

MA [Sicurezza] cosa è?
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Filtro

text:
Grazie per l'intervento.
[Sicurezza] č il nome della tabella,  [nome] il nome del field nel record.
Ciao
"Roberto da casa" <
r.masso...@libero.it
> ha scritto nel messaggio
news:QlA2e.36693$zZ1.1...@twister1.libero.it...
>
> "Pippo" <
buff...@virgilio.it
> ha scritto nel messaggio
> news:424ab8a9$0$8080$5fc...@news.tiscali.it...
>> .....Nella progr. di VB non ci chiappo !!
>>
>> Vi sottopongo quest script di una maschera, nella quale, l'ho modificata
>> aggiungendo la dichiarazione di IUPAC e sostituendo l'assegnazione di
>> default stLinkCriteria =."[Name]=" & "'" & Me![Nome] & "'", con quanto in
>> calce riporto
>>
>> Q.no mi puň indicare come passare ad stLinkCriteria la variabile IUPAC,
>> affinche nella maschera che questa  routine apre, venga immediatamente
>> vissualizzato in [nome]  ?
>>
>> Grazie
>>
>> Private Sub Apri_maschera_Proprieta_Sicurezza_Click()
>> On Error GoTo Err_Apri_maschera_Proprieta_Sicurezza_Click
>>
>>     Dim stDocName As String
>>     Dim stLinkCriteria As String
>>     Dim IUPAC As String
>>
>>     stDocName = "Proprieta Sicurezza ALTSOLV"
>>     IUPAC = "[Sicurezza]![nome]"
>>     stLinkCriteria = "[Name]=" & "'" & IUPAC & "'"
>>     DoCmd.OpenForm stDocName, , , stLinkCriteria
>>
>> Exit_Apri_maschera_Proprieta_Sicurezza_C:
>>     Exit Sub
>>
>> Err_Apri_maschera_Proprieta_Sicurezza_Click:
>>     MsgBox Err.Description
>>     Resume Exit_Apri_maschera_Proprieta_Sicurezza_C
>>
>> End Sub
>
> MA [Sicurezza] cosa č?



title: Filtro

text:
"Pippo" <
buff...@virgilio.it
> ha scritto nel messaggio
news:424ba20b$0$8081$5fc...@news.tiscali.it...
> Grazie per l'intervento.
>
> [Sicurezza] è il nome della tabella,  [nome] il nome del field nel record.
>
> Ciao
[CUT]
Quamdo rispondi scrivi DOPO e non prima del testo dei messaggi precedenti.
Nella riga di codice:
stLinkCriteria = "[Name]=" & "'" & IUPAC & "'"
la tabella non può essere che quella che è origine record della maschera
"Proprieta Sicurezza ALTSOLV" ed il campo che viene controllato nel tuo caso
si chiama [Name] e si trova nel primo termine di confronto e non nel secondo
termine di paragone del confronto.
Se poi il nome di riferimento del secondo termine di paragone è contenuto
nella variabile IUPAC non devi chiudere il nome di tale variabile tra apici,
insomma:
stLinkCriteria = "[Name]=" & IUPAC
Resta il fatto che non riesco a capire cosa tu voglia fare.



title: Gestiona pasti mensa

text:
Devo realizzare un db per la gestione delle presenze in una mensa che
abbia queste caratteristiche:
un elenco di persone (circa 50) e giorno per giorno assegnare le
seguenti possibili variabili:
Presenza-semplice...........(con possibilità di Pranzo e Cena)
Presenza-per-servizio.......(con diritto a Pranzo e Cena)
L'elenco di persone però è suddiviso per incarico (es. dirigente puo'
usufruire sia di P che di C), mentre gli impiegati che chiamerò
impiegati1 solo P e impiegati2 sia P che C.
Sino ad ora gestivano la cosa attraverso un semplice foglio di excel
con un semplice mega-griglia di excel mese per mese, giorno per
giorno.
Alla fine di ogni mese vanno calcolati i costi dei singoli pasti, ma
questo è un problema successivo.
Come posso impostare le tabelle e relative relazioni?
Grazie a tutti


title: Gestiona pasti mensa

author: almorel

text:

Ciao,
io farei  3 tabelle:
Anagrafica dipendenti
-------------------------------
Matricola
Dipendente
Categoria
Diritto pasti
ecc
Costo pasti (per futuri calcoli)
----------------
Costo pranzo
Costo cena
Pasti
--------
Data
Matricola
Tipo di presenza
Pranzo (si/no)
Cena    (si/no)
A spanne direi che questi sono i campi necessari. Poi c'è da
sviluppare l'applicazione.
Ciao
Alberto


title: Gestiona pasti mensa

text:

> Alberto- Nascondi testo citato
>
> - Mostra testo citato -
Beh..per ora ci provo a creare le giuste relazioni...grazie.


title: Gestiona pasti mensa

author: pablitomf

text:
On 9 Nov, 10:07, skate2k5 <
skate...@fastwebnet.it
> wrote:

Titolo Tabella:
Tab_Dipendenti
Note :
per archiviare le anagrafiche dipendenti con la specifica della
tipologia
Campi:
c_Matricola (key)
c_TipoDip (recupera da c_TipoDip di Tab_TipoDip)
c_Cognome
c_Nome
c_ ...
Titolo Tabella:
Tab_TipoDip
Note :
per associare il TipoDipendente (dirigente, impiegato, ecc..) alla
possibilità di pranzo e/o cena
Campi:
c_TipoDip (key)
c_Pranzo (si/no)
c_Cena (si/no)
Titolo Tabella:
Tbl_Mensa
Note :
per archiviare le presenze in mensa dei dipendenti. All'inserimento
bisognerà poi associare un evento che monitori il TipoDip (e le
proprietà che ci sono dietro) con il TipoPasto (pranzo/cena), affinchè
un "impiegato1" ad esempio non possa cenare
Campi:
c_Pk (key)
c_Data
c_Matricola (recupera da c_Matricola di Tab_Dipendenti)
c_TipoPresenza
c_TipoPasto


title: Recupero nome accesso

author: Roberto

text:
E' possibile ricavare in una form con che nome di accesso sia entrato un
utente (protezione livello utente)?
Grazie
--------------------------------
Inviato via
http://usenet.libero.it


title: Recupero nome accesso

author: Sib

text:
"Roberto" <
r2de...@libero.it
> ha scritto nel messaggio
> E' possibile ricavare in una form con che nome di accesso sia entrato un
> utente (protezione livello utente)?
CurrentUser
Pero' bastva dare un'occhiata appena all'help in linea.
Sib


title: problema con totali-parziali in report

author: Riccardo M.

text:
Salve a tutti, avrei il seguente quesito da sottoporre:
in un report ho dei totali parziali sviluppati su gruppo
avrei la necessita' di non visualizzare il parziale (magari con colore
bianco)
qualora la casella dtmData del record successivo (sempre che ci sia) dello
stesso gruppo sia la medesima.
Esempio
Importo    Data            Parziale
100            15-04-05    100
150            15-05-05    250
120            15-06-05
130            15-06-05    500
100            30-06-05    600
è possibile?
non riesco ad intercettare il record successivo del gruppo per confrontare
la data.
grazie
Riccardo


title: problema con totali-parziali in report

author: Roberto dalla campagna

text:
"Riccardo M." <
ricc...@free.panservice.it
> ha scritto nel messaggio
news:d8c77q$8v3$1...@news.panservice.it...

Se ti sta bene un risultato di questo tipo:
Importo    Data            Parziale
100            15-04-05    100
150            15-05-05    250
120            15-06-05    370
130            15-06-05    500
100            30-06-05    600
devi solamente indicare =[Importo] nell'origine controllo della casella di
testo Parziale ed quindi impostare a Su tutto la sua proprietà Somma
parziale; a questo punto sarà Access a gestire il totale progressivo.
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Creare un contatore da query di accodamento?

author: Ale

text:
A tutti i "guru" di access I have a question for you:
Situazione attuale:
Tabella base che viene aggioranta periodicamente, vengono eleiminati i dati
presenti con una query di eliminazione e poi vengono accodati nuovi dati con
una query di accodamento.
La mia necessità sarebbe che la query di accodamento mi creasse un
contatore, da inserire in un campo testo o numerico, che ad ogni
aggiornamento ripartisse da zero, perchè se uso il contatore standard della
tabella continua a contare in progressivo.


author: Marco

text:
Ciao
Ale <
alenic...@goldvi.it
> wrote in message
8etqa9$5kq$1...@fe1.cs.interbusiness.it...

Credo non si possa fare con SQL (gradite smentite), un soluzione è VBA.
Ti crei un campo (chiamiamolo Numero di tipo Integer) e dopo la Query
d'aggiornamento lanci una funzioncina tipo questa ;
Public Function Incrementa_Numero()
Dim MRec As Recordset, Inizio As Integer
Set MRec = CurrentDb.OpenRecordset("Nome tua Tabella")
Inizio = 0
Do Until MRec.EOF
MRec.Edit
MRec!Numero = Inizio + 1
Inizio = MRec!Numero
MRec.Update
MRec.MoveNext
Loop
End Function
Ciao Marco


author: Paolo

text:
Per far ripartire il contatore da zero, potresti:
- eliminare la tabella anzichè svuotarla
- ricrearla ( tramite query creazione tabella)
- popolarla con i nuovi record
non è molto elegante, ma funziona.......



title: [?] Report Vuoto + Access97

author: PennyWise

text:
Mi sembrava che sul sito comune ci fosse qualcosa che spiegava come
comportarsi in caso di report vuoi, ma non sono più riuscito a trovare
nulla.
Se nell'evento
REPORT_NODATA(cancel)
imposto cancel a true il report viene annullato ma access segnala questo
annullamento e termina l'esecuzione del codice VBA.. I record lo apro con
docmd.openreport
come posso evitare questo problema??


title: [?] Report Vuoto + Access97

author: Lorenzo Coronati

text:
Scrisse "PennyWise" <pennywise_k#@#
yahoo.it
>:
>Se nell'evento
>REPORT_NODATA(cancel)
>imposto cancel a true il report viene annullato ma access segnala questo
>annullamento e termina l'esecuzione del codice VBA.. I record lo apro con
>docmd.openreport
Un bell'on error resume next e passa tutto ;-)
--
Lorenzo Coronati
--
[si parla di ODE/MOD, ndr]
<<chi sarebbe cosi' gentile da passarmelo?
in caso posso ricambiare con qualache mp3...:)))>>
(Koala, 5/3/2001)
--


title: scusate inizio da 0

author: Andy

text:
sono proprio alle prime armi...vorrei capire una cosa.... io ho fatto il db
access con una maschera semplice per interrogare il db ...come faccio ad
esportare il tutto in modo che ogni volta che clicco sopra al db si apra
solo la maschera e non il programma acceess... si insomma come se fosse un
"vero" e proprio programma
grazie a tutti quelli che mi vorranno aiutare
A


title: scusate inizio da 0

author: Antonio Biso

text:
"Andy" <
drasti...@nontoccarmilibero.it
> ha scritto nel messaggio
news:ZD53a.117202$ZE.32...@twister2.libero.it...
Allora, lo 0 è scrivere un subject significativo!
Antonio


title: scusate inizio da 0

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:ni63a.117365$YG2.3...@twister1.libero.it...

scusami... :-(
A


title: scusate inizio da 0

author: Emyr

text:


macro con nome autoexec
imposta aprimaschera quella che vuoi tu
oppure
vai su opzioni maschera di avvio....
Saluti.
Emanuele.


title: Misurare formati foto in apertura file

author: Daniele

text:
Un saluto a tutti i partecipanti al NG.
Vorrei sapere se è possibile con VBA, aprire un'immagine "jpg", leggere la
lunghezza e la larghezza e con tali dati variare le misure del controllo
image in modo da adattarlo alle misure della foto.
Grazie per i suggerimenti.
Ciao - Daniele


title: Misurare formati foto in apertura file

author: Michele (Giò)

text:
"Daniele" <
cogitoe...@libero.it
> ha scritto nel messaggio news:f1phf4$6kq$1...@aioe.org...
> Un saluto a tutti i partecipanti al NG.
>
> Vorrei sapere se č possibile con VBA, aprire un'immagine "jpg", leggere la
> lunghezza e la larghezza e con tali dati variare le misure del controllo
> image in modo da adattarlo alle misure della foto.
>
> Grazie per i suggerimenti.
>
> Ciao - Daniele
>
Mi sa che direttamente non č possibile.
A meno che non esista qualche libreria che lo possa fare, a mio giudizio mi butterei in cerca del
sorgente jpg (che poi non vorrei ce ne fosse piů di uno) e tramite VBA andare a leggere l'header del
file per cercare di estrapolare le dimensioni della foto. E' molto impegnativo (in termini di
tempo), ma non impossibile.
Michele


title: Misurare formati foto in apertura file

text:
"Michele (Giò)" <
joyl...@alice.it
> ha scritto nel messaggio
news:4640786e$0$17950$4faf...@reader1.news.tin.it...
> "Daniele" <
cogitoe...@libero.it
> ha scritto nel messaggio
news:f1phf4$6kq$1...@aioe.org...
> > Un saluto a tutti i partecipanti al NG.
> >
> > Vorrei sapere se è possibile con VBA, aprire un'immagine "jpg", leggere
la
> > lunghezza e la larghezza e con tali dati variare le misure del controllo
> > image in modo da adattarlo alle misure della foto.
> >
> > Grazie per i suggerimenti.
> >
> > Ciao - Daniele
> >
>
> Mi sa che direttamente non è possibile.
>
> A meno che non esista qualche libreria che lo possa fare, a mio giudizio
mi butterei in cerca del
> sorgente jpg (che poi non vorrei ce ne fosse più di uno) e tramite VBA
andare a leggere l'header del
> file per cercare di estrapolare le dimensioni della foto. E' molto
impegnativo (in termini di
> tempo), ma non impossibile.
>
> Michele
>
Grazie Michele
Ho capito che il gioco non vale la candela (almeno nel mio caso).
Ciao - Daniele


title: Misurare formati foto in apertura file

author: ALESSANDRO Baraldi

text:
[CUT]
> Grazie Michele
> Ho capito che il gioco non vale la candela (almeno nel mio caso).
> Ciao - Daniele
Secondo me potreste risolvere così:
Carica l'immafine in un controllo Immagine quindi vedi che ti restituisce
questa funzione...
Private Function fDimensioni() As String
    fDimensioni = Int(Me.Immagine.ImageWidth / 14.998) & " X " &
Int(Me.Immagine.ImageHeight / 14.998) & " Pixel"
End Function
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------


title: scansione documenti multipagina - Access 2016/2019

author: mario rossi

text:
buongiorno a tutti, mi chiedevo se esiste qualche controllo integrato che consente la scansione multipla di documenti in access 2016/2019

esempio: ho uno scanner piano, scansiono la prima pagina poi chiedo all'utente se vuole altre pagine per lo stesso documento, se risponde si scansiona anche la seconda e cosi via e alla fine crea pdf unico con tutti i fogli scansionati

se invece risponde no allora salva l'unica singola pagina scansionata.

grazie a tutti.


text:

in pratica ho usato questo codice che effettua si la scansione da scanner utilizzando il riferimento vba "microsoft Windows Image Acquisition Library v2.0" però anche se scelgo come alimentazione fogli "alimentatore" che indica l'ADF sopra lo scanner, il programma carica i 3 fogli che gli metto sopra ma nella jpeg della scansione appare soltanto la prima pagina ignorando le altre 2 che però a caricato nell'ADF

qualcuno ha una soluzione? esiste qualche controllo a pagamento più personalizzabile per la scansione multipagina?

*** code ***
Public Sub importascanner(nomecampo As String, cartelladestinazione As String, nomefile As String, nomeform As String)
Dim aaaa As New WIA.CommonDialog

Dim V As WIA.Vector
Dim IMG As WIA.ImageFile
Dim c As Long

c = &HFF0000FF 'Blu opaco (A=255,R=0,G=0,B=255)

Set V = CreateObject("WIA.Vector")

V.Add c
V.Add c
V.Add c
V.Add c

Set IMG = aaaa.ShowAcquireImage(, ColorIntent, MinimizeQuality, , False, True)

'Salvo l'immagine
IMG.SaveFile cartelladestinazione & nomefile & ".jpg" ' & IMG.FileExtension
Forms(nomeform).Controls(nomecampo) = nomefile & ".jpg" ' & IMG.FileExtension

End Sub
*** code ***


title: Stampa di parecchi moduli

author: gnews

text:
Quello che voglio fare è stampare un nuovo modulo per avvisare i clienti che
una scadenza è vicina.
Voglio innanzitutto selezionare tutti i nominativi in una tabella che hanno
una data di scadenza compresa tra xx/xx/xxxx e zz/zz/zzzz. Devo poi far
stampare in automatico TUTTI i moduli, un modulo per ogni cliente esportando
in ogni modulo alcuni dati di ogni rispettivo cliente.
Come mi consigliate di fare?
Grazie!


title: Stampa di parecchi moduli

author: Gabriele Bertolucci

text:

Be', non credo che ci siano troppe vie per ottenere quello che chiedi.
Devi preparare un report basato su una query sulla tabella clienti, filtrata
per quel campo data che hai segnalato.
Da una qualche maschera provvederai a mandare in stampa il report: dallo
stesso punto provvederai anche a passare la condizione di where al report.
Cosa c'è che non ti torna?
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution


title: Stampa di parecchi moduli

text:
> Be', non credo che ci siano troppe vie per ottenere quello che chiedi.
>
> Devi preparare un report basato su una query sulla tabella clienti,
> filtrata per quel campo data che hai segnalato.
> Da una qualche maschera provvederai a mandare in stampa il report: dallo
> stesso punto provvederai anche a passare la condizione di where al report.
>
> Cosa c'è che non ti torna?
Facendo la query sulla tabella clienti in base alla data ipotizziamo che ci
siano 30 record.
A questo punto devo far stampare 30 report. Come faccio a dire al report che
prima deve stampare con il primo nominativo, poi il secondo ecc.?
Ho pensato che cliccando su un pulsante che posso far ciclare la query,
passando alla condizione di where (parametrica) il record con i dati da
mandare in stampa. Come faccio a selezionare ogni record della query finchè
non sono arrivato alla fine?
Potrebbe essere una soluzione valida?
Grazie!


title: Stampa di parecchi moduli

text:
> Facendo la query sulla tabella clienti in base alla data ipotizziamo
> che ci
> siano 30 record.
Supponiamo.
> A questo punto devo far stampare 30 report. Come faccio a dire al
> report che
> prima deve stampare con il primo nominativo, poi il secondo ecc.?
Due alternative:
1) non fai niente e stampi, vedrai che Access ci pensa da solo a farti stampare
tutti i moduli necessari;
2) fai un ciclo dove per 30 volte mandi in stampa il report con dati differenti.
> Ho pensato che cliccando su un pulsante che posso far ciclare la
> query,
> passando alla condizione di where (parametrica) il record con i dati
> da
> mandare in stampa.
Questa č la seconda alternativa.
> Come faccio a selezionare ogni record della query
> finchč
> non sono arrivato alla fine?
Devi utilizzare ADO, dichiarandoti un recordset, dandogli la SELECT della
query come origine e poi utilizzando un ciclo dove utilizzi EOF come condizione
per uscire.
> Potrebbe essere una soluzione valida?
Certo.



title: Stampa di parecchi moduli

text:
> 1) non fai niente e stampi, vedrai che Access ci pensa da solo a farti
> stampare tutti i moduli necessari;
Sai, non avrei mai pensato che Access lo facesse in automatico. Implementerò
questa soluzione.
Grazie mille!


title: sub su risultato query

author: Repko

text:
salve,
vorrei sapere come impostare una funzione che su evento clik di un pulsante
confronti il risultato di una query (una data) con la data odierna. se le
date sono uguali si apre una msgbox altrimenti il pulsante chiude la form.
Ciao e grazie


title: sub su risultato query

text:
"Repko" <x@x.x> ha scritto nel messaggio
news:JlLWc.142941$OR2.6...@news3.tin.it...

Invece di usare una query usi una dlookup (vedi help)
Antonio


title: sub su risultato query

text:
"Antonio Biso" <ch...@NOSPAMetruria.net> ha scritto nel messaggio
news:hoXWc.55389$1V3.1...@twister2.libero.it...

Ho applicato il tuo consiglio in questo modo ma funziona in modo strano...
ho sbagliato qualcosa?
Private Sub Comando53_Click()
On Error GoTo Err_Comando53_Click
    Dim TodayReg As Variant
    TodayReg = DLookup("[dataregrich]", "t_richieste", "[DataRegRich]" =
Date) ' non so se è corretto, insomma voglio che la dlookup controlli se c'è
un record inserito in data odierna
    If TodayReg = Date Then
        If MsgBox("Hai eseguito delle registrazioni, vuoi stampare
l'elenco?", vbYesNo, "Avviso") = vbYes Then
        Dim stDocName As String
        Dim stLinkCriteria As String
        stDocName = "M_Registrazioni_del_Giorno_1"
        DoCmd.OpenForm stDocName, , , stLinkCriteria
        Else
        DoCmd.Close
        DoCmd.OpenForm "M_Avvio", acNormal, "", "", , acNormal
        DoCmd.Maximize
        End If
    Else
    DoCmd.Close
    DoCmd.OpenForm "M_Avvio", acNormal, "", "", , acNormal
    DoCmd.Maximize
    End If
Exit_Comando53_Click:
    Exit Sub
Err_Comando53_Click:
    MsgBox Err.Description
    Resume Exit_Comando53_Click
End Sub


title: sub su risultato query

text:

Ora funziona,
ho cambiato la parte del criterio della dlookup da
TodayReg = DLookup("[dataregrich]", "t_richieste", "[dataregrich]" =Date)
a
TodayReg = DLookup("[dataregrich]", "t_richieste", "[dataregrich] = Date()")
credo di aver posizionato male gli apici della formula.
Grazie a tutti e grazie ad Antonio


title: modifica struttura tabella

author: MinmaX

text:
Buondì.
Ho la necessità di aggiungere delle colonne in una tabella di un
database access, vorrei farlo prendendo la struttura della colonna da
un'altra tabella.
Ho provato da asp tramite adox e anche tramite sql ma in tutti e due i
metodi ho dei problemi (ad esempio come scegliere il numero di
decimali in un campo currency)
mi chiedevo se fosse possibile tramite create table o alter table, o
qualunque altra idea vi possa venire.
Grazie a tutti in anticipo


title: modifica struttura tabella

author: MA

text:

Se hai scelto currency lui userà comenuque 4 decimali
Non confondere quanti ne vedi e quante ne accetta il formato
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: modifica struttura tabella

text:

da adox o da query non posso scegliere il formato?


title: modifica struttura tabella

text:
MinmaX wrote:
> On 2 Apr, 17:03, "MA" <
mas...@massimilianoamendola.it
> wrote:
>> MinmaX wrote:
>>> Buondì.
>>> Ho la necessità di aggiungere delle colonne in una tabella di un
>>> database access, vorrei farlo prendendo la struttura della colonna
>>> da un'altra tabella.
>>> Ho provato da asp tramite adox e anche tramite sql ma in tutti e
>>> due i metodi ho dei problemi (ad esempio come scegliere il numero di
>>> decimali in un campo currency)
>>> mi chiedevo se fosse possibile tramite create table o alter table, o
>>> qualunque altra idea vi possa venire.
>>> Grazie a tutti in anticipo
>>
>> Se hai scelto currency lui userà comenuque 4 decimali
>> Non confondere quanti ne vedi e quante ne accetta il formato
>>
>> --
>> --
> da adox o da query non posso scegliere il formato?
Per la presentazione dei dati puoi usare format(Tuocampo;"standard")
nelle query
--
--
MAssimiliano Amendola
www.accessgroup.it



title: modifica struttura tabella

text:

> Cisa - Conferenza Italiana Sviluppatori Access- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
grazie! provo subito!


title: Aiuto! conflitti di sincronizzazione...

author: Lorenz

text:
Ho realizzato un db in Access97, l'ho replicato e distribuito ad alcuni uffici
della mia azienda, ognuno dei quali apporta le modifiche di sua competenza.
A volte perň dopo la sincronizzazione, oltre ad alcuni conflitti fra record del
tutto giustificati, mi segnala un conflitto anche per la barra dei menu
personalizzata che ho creato apposta per questo db e chiamato "Lorenz".
Nella finestra di risoluzione dei conflitti mi presenta i due record in
conflitto, ognuno con un solo campo vuoto e non ne vedo la differenza.
Allo stesso modo, aprendo la tabella "MSysCmdbars_Conflict", trovo un solo
record:campo: "Grptbcd"  valore: "Dati Binario Lungo"
campo: "TbName"  valore: "Lorenz".
Non capisco da cosa sia generato il conflitto, dato che non sempre si presenta
e comunque la barra mi pare sempre identica.
Ho fatto delle ricerche nella Guida in linea, nel Sitocomune ed in questo ng,
ma non ho trovato riferimenti ai conflitti di sincronizzazione fra le barre dei
menu.
Se qualcuno puň aiutarmi, lo ringrazio fin da ora.
--
Posted from  [146.133.224.2]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: NEWSGROUP SPARITO

author: Ras Judah

text:
Ciao, stamattina bvolevo legegre i post del ng e appena cliccato sul
nome del NG mi è apparso un messatggio d'errore che li per li non ho
considerato, ma poi ho visto che mi è sparito l'NG dalla lista di
quelli sottoscritti
Ho provato a fare una nuova sottoscrizione ma nell'elenco dei NG
questo non c'è piu.
Uso il server news TIN
QUalcuno sa qualcosa?
Stefano


title: HELP ME!

author: Sergio

text:
Ciao a tutti, mi sono perso, sono in brain flipping.
Volevo costruire qualcosa che gestisse simultaneamente 1) un calendario,
magari da impostare a piacimento da una data iniziale a una finale, e che
poi restasse fisso, ed 2) un elenco variabile di alunni. Per ogni data del
calendario il qualcosa avrebbe dovuto registrare le ore di presenza degli
alunni. Volevo costruire, poi ho iniziato a rinunciarci, fino ad ora.
A tutti ciao, 1000 grazia a tutti anche senza risposta


title: HELP ME!

text:
"Sergio" <
ix...@supereva.it
> ha scritto nel messaggio
news:badffc$5d6$1...@newsreader.mailgate.org...
> Ciao a tutti, mi sono perso, sono in brain flipping.
Messaggio con subject poco significativo!
Skipped!
Prova a flippare nuovamente con un altro subject!!!
Antonio


title: Filtro data che odia Ottobre!

author: marco

text:
Ciao a tutti
Ho questa situazione:
Ho creato una combo per filtrare gli ordini di un cliente.
La combo ha questa origine:
SELECT DISTINCT [RegistroOrdini].[Data] AS Espr1
FROM RegistroOrdini
WHERE
((([RegistroOrdini].[IdCliente])=[Forms]![DettagliNuova]![Me.TxtCliente ]))
ORDER BY [RegistroOrdini].[Data] DESC;
che mi estrae tutte le date diverse in cui si sono verificati gli ordini.
Sull'evento DopoAggiornamento della combo ho messo:
Me.cbxNumOrdini.RowSource = "SELECT IDordine, NumeroOrdine " & _
                                "FROM RegistroOrdini " & _
                                "WHERE IdCliente= '" & Me.TxtCliente & "' "
& _
                                "AND Data>= #" & Me.CbxDataInizio.Value & "#
";"
in modo che la listbox che contiene i numeri per il dettaglio peschi i dati
da questa nuova origine filtrata.
Vrie prove e va tutto, almeno fino a settembre.
Se nella combo seleziono 1 ottobre il filtro non funziona, nel senso che mi
fa vedere tutti gli ordini senza filtro, cioč TUTTI gli ordini del cliente.
Lo stesso vale per altri giorni di ottobre.
Preciso che:
Il campo DATA della tabella RegistroOrdini č impostato a DATA GENERICA
cosě come il FORMATO della COMBO di filtro
Che succede???
Marco


title: Filtro data che odia Ottobre!

text:
"marco" <
pl...@pippo.it
> ha scritto nel messaggio
news:%M7jb.5677$d1....@nntpserver.swip.net...
> Ciao a tutti
> Ho questa situazione:
> Ho creato una combo per filtrare gli ordini di un cliente.
> La combo ha questa origine:
>
> SELECT DISTINCT [RegistroOrdini].[Data] AS Espr1
> FROM RegistroOrdini
> WHERE
>
((([RegistroOrdini].[IdCliente])=[Forms]![DettagliNuova]![Me.TxtCliente ]))
> ORDER BY [RegistroOrdini].[Data] DESC;
>
> che mi estrae tutte le date diverse in cui si sono verificati gli ordini.
>
> Sull'evento DopoAggiornamento della combo ho messo:
>
> Me.cbxNumOrdini.RowSource = "SELECT IDordine, NumeroOrdine " & _
>                                 "FROM RegistroOrdini " & _
>                                 "WHERE IdCliente= '" & Me.TxtCliente & "'
"
> & _
>                                 "AND Data>= #" & Me.CbxDataInizio.Value &
"#
> ";"
Non so dire sicuramente cosa sta succedendo, ma ho due osservazioni:
1) idcliente è numerico o di testo?
Se come penso è numerico non devi usare gli apicetti nel confronto col
valore in maschera
2) la sintassi dell'SQL vuole che tu inverta il mese e l'anno rispetto
all'inserimento in maschera, perchè il formato è mm-gg-aa. Tu non lo fai...
Antonio


title: Filtro data che odia Ottobre!

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:QU7jb.39311$e6.13...@twister2.libero.it...
> "marco" <
pl...@pippo.it
> ha scritto nel messaggio
> news:%M7jb.5677$d1....@nntpserver.swip.net...
> > Ciao a tutti
> > Ho questa situazione:
> > Ho creato una combo per filtrare gli ordini di un cliente.
> > La combo ha questa origine:
> >
> > SELECT DISTINCT [RegistroOrdini].[Data] AS Espr1
> > FROM RegistroOrdini
> > WHERE
> >
>
((([RegistroOrdini].[IdCliente])=[Forms]![DettagliNuova]![Me.TxtCliente ]))
> > ORDER BY [RegistroOrdini].[Data] DESC;
> >
> > che mi estrae tutte le date diverse in cui si sono verificati gli
ordini.
> >
> > Sull'evento DopoAggiornamento della combo ho messo:
> >
> > Me.cbxNumOrdini.RowSource = "SELECT IDordine, NumeroOrdine " & _
> >                                 "FROM RegistroOrdini " & _
> >                                 "WHERE IdCliente= '" & Me.TxtCliente &
"'
> "
> > & _
> >                                 "AND Data>= #" & Me.CbxDataInizio.Value
&
> "#
> > ";"
>
> Non so dire sicuramente cosa sta succedendo, ma ho due osservazioni:
> 1) idcliente è numerico o di testo?
  Idcliente è di titpo testo
> Se come penso è numerico non devi usare gli apicetti nel confronto col
> valore in maschera
> 2) la sintassi dell'SQL vuole che tu inverta il mese e l'anno rispetto
> all'inserimento in maschera, perchè il formato è mm-gg-aa. Tu non lo
fai...
Cioè devo formattare Me.CbxDataInizio come  mm-gg-aa???
ma allora perché 30/09/2003 lo riconosce e 1/10/2003 no?
Forse perché nella  lista non c'è una data 10 gennaio (l'inverso di 1
ottobre)
ma non ci può essere una data giorno 9 mese 30 e quindi reinterpreta il
tutto correttamente.
Giusto??
Marco


title: Filtro data che odia Ottobre!

author: Roberto da casa

text:
"marco" <
pl...@pippo.it
> ha scritto nel messaggio
news:%M7jb.5677$d1....@nntpserver.swip.net...

Ti avrebbe rifunzionato tutto se in CmbxDataInizio avessi selezionato una
data di ottobre ma che avesse il giorno maggiore di 12; di contro non ti
potrebbe funzionare per date di qualsiasi mese che abbiano il giorno minore
o uguale a 12.
Se, come sembrerebbe, IdCliente č un campo di tipo Testo, prova cosě:
Me.cbxNumOrdini.RowSource = "SELECT IDordine, NumeroOrdine " & _
"FROM RegistroOrdini WHERE IdCliente= '" & Me.TxtCliente & "'" & _
" AND Data>= #" & Format(Me.CbxDataInizio, "mm/dd/yyyy") & "#;"
Se invece il campo IdCliente fosse di tipo Numerico o Contatore, prova cosě:
Me.cbxNumOrdini.RowSource = "SELECT IDordine, NumeroOrdine " & _
"FROM RegistroOrdini WHERE IdCliente= " & Me.TxtCliente &  _
" AND Data>= #" & Format(Me.CbxDataInizio, "mm/dd/yyyy") & "#;"
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Filtro data che odia Ottobre!

author: namor

text:
marco ha scritto:
[cut]
> Cioè devo formattare Me.CbxDataInizio come  mm-gg-aa???
> ma allora perché 30/09/2003 lo riconosce e 1/10/2003 no?
> Forse perché nella  lista non c'è una data 10 gennaio (l'inverso di 1
> ottobre)
> ma non ci può essere una data giorno 9 mese 30 e quindi reinterpreta il
> tutto correttamente.
> Giusto??
> Marco
Si, non esiste un mese 30 quindi quella data può essere interpretata in un
modo solo, e non sbaglia. Per le date ambigue come 1/10/2003 prevale
l'interpretazione mm/gg/aaaa.
Namor
--

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


title: Filtro data che odia Ottobre!

text:
"marco" <
pl...@pippo.it
> ha scritto nel messaggio
news:%M7jb.5677$d1....@nntpserver.swip.net...
Cut
Ho risolto riformattando il campo data secondo le specifiche mm/gg/aaaa.
Grazie a tutti comunque.
Mi permetto di aprire una piccola polemica.
Che senso ha impostare un formato per le date nella sintassi sql
(mm/gg/aaaa) se poi il motore cerca di interpetarlo comunque???
Io sono stato "fortunato" perché ho fatto il debug su un caso impossibile
(mese 30)
ma supponiamo un diverso utilizzo.
 una società che emette fatture il 5 di ogni mese. In questo caso il debug
va tutto regolare.
Supponiamo poi che la suddetta società cambi giorno di fatturazione al 27.
Magra fiugra di m....
Non so, ma a me non sembra molto sensato. Mi rendo conto che forse è fatta
per "semplificare" la vita (almeno spero) ma è lo stesso una cosa stupida
perché quanto più una regola è rigida tanto più farai atenzione ad
osservarla (a livello di programmazione, si intende...)
Ciao marco


title: Filtro data che odia Ottobre!

author: Antonio Biso

text:
"marco" <
pl...@pippo.it
> ha scritto nel messaggio
news:Kl9jb.5688$d1....@nntpserver.swip.net...
>
> "marco" <
pl...@pippo.it
> ha scritto nel messaggio
> news:%M7jb.5677$d1....@nntpserver.swip.net...
>
> Cut
>
> Ho risolto riformattando il campo data secondo le specifiche mm/gg/aaaa.
>
> Grazie a tutti comunque.
>
> Mi permetto di aprire una piccola polemica.
>
> Che senso ha impostare un formato per le date nella sintassi sql
> (mm/gg/aaaa) se poi il motore cerca di interpetarlo comunque???
Stop
Ti risulta che i prodotti microsoft seguano sempre una certa logica?
Antonio


title: conversione cifre in lettere

author: Katy

text:
Qualcuno sa indicarmi dove poter trovare una macro che mi converta i numeri
in lettere, come sugli assegni praticamente?
Vi ringrazio!


title: conversione cifre in lettere

author: Max

text:
Katy <
kat...@hotmail.com
> wrote in message
nflya.205070$K35.4...@news2.tin.it...

www.sitocomune.com
Ciao Max


title: prova non leggere

author: ray


title: Creare interfaccie utente verso DB, è meglio Access o Visual Basic?

author: MegaMax

text:
Questo post è volutamente cross-postato, in quanto vorrei conoscere
l'oppinione degli sviluppatori di ambo i newsgroup, sperando che ne risulti
una discussione costruttiva. :-)
Argomento di discussione: qual'è il miglior tool per creare software che
forniscano un'interfaccia utente verso un DB (Access-JET o SQL Server)?
Io ho lavorato sia con VB (non troppo) sia con Access (molto), e ne ho
concluso quanto segue:
* Access è smodatamente più comodo e potente a levello di strumenti per
disegnare/formattare l'interfaccia (allineare/ridimensionare/spostare i
controlli).
* Access ha le sottomaschere, che mancano in VB (in VB esiste un controllo
per creare qualcosa di simile, ma è più contorto :-)
* In Access accedere ai dati è una bazecola, è fatto apposta; mettere il
contenuto di una query in un controllo (casella di riepilogo,
sottomaschera...) è questione di 3 secondi e 2 click del mouse; in VB è
decisamente più complicato, o usi i controlli data, o fai tutto da codice,
inserendo i dati un record alla volta.
* Esiste Access Developer, in grado di creare pacchetti Access che
funzionano anche se non è installato Office
* VB crea codice più "leggero"
* VB può creare vere aplicazioni eseguibili (exe)
* VB è più potente/comodo/efficace per tutte quelle cose che esulano dal
puro "accesso dati"
Alla luce di queste considerazioni (discutibili ovviamente), perchè ci sono
vagonate di sviluppatori che utilizzano VB per sviluppare applicazioni che
sono pure interfaccie verso DB?
Alla luce della mia esperienza (personale, limitata, magari sbagliata) se
usassero Access impiegherebbero metà tempo a sviluppare un dato applicativo,
ed otterrebbero risultati graficamente più accattivanti, a livello di
interfaccia; tirando mote meno imprecazioni quando si tratta di
formattare/allineare i controlli :-)
Che ne pensate?
Come si intuisce sono molto Access-sostenitore (quando si tratta di creare
interfaccie verso DB).
Ma magari sbaglio, perchè conosco meglio Access che VB; appunto per questo
vorrei sapere cosa ne pensano gli esperti di VB.
Ciao, Max


author: Alessandro

text:
"MegaMax" <
zz...@sssss.com
> wrote in message
news:ad7ib1$uob1c$
1...@ID-141456.news.dfncis.de
>[CUT]
>
> Che ne pensate?
> Come si intuisce sono molto Access-sostenitore (quando si tratta di creare
> interfaccie verso DB).
> Ma magari sbaglio, perchè conosco meglio Access che VB; appunto per questo
> vorrei sapere cosa ne pensano gli esperti di VB.
>
> Ciao, Max
Premetto che, come hai precisato sono impressioni/deformazioni
personali,
quindi è tale anche il mio commento....!
Io ho iniziato con VB, e mi sono fatto un'pò d'esperienza(non
moltissima)
e per me VB ha una flessibilità che ACCESS non gestisce.
Si possono fare molti esempi, dall'utilizzo completo dei RECORDSET con
gli oggetti, ACCESS, almeno il 97, non prevede di attribuire ad un
oggetto
il contenuto di un RECORDSET.
ACCESS non gestisce le matrici di controlli (COMODISSIMI per la gestione
delle form non associate e altro), ora non dite che si possono simulare
matrici di controlli, perchè è solo un'accrocchio....!
E' vero che VB non ha le SUB_Form, ma ha dei controlli funzionali come
le varie GRID disponibili....!
Si tratta di avere però un bagaglio di Utility e/o funzioni generiche
già realizzate, perchè a primo impatto potrebbe sembrare ostico
il dover popolare controlli con RIGHE e RIGHE di codice.
Fortunatamente se si sanno usare bene le proprietà e i metodi
dei controlli dedicati ad ADO e DAO non è così.
Nonostante questo sono passato da circa 1 anno ad ACCESS97, e pur
con le limitazioni che "FORSE" può avere, ci lavoro bene.
VANTAGGIO FONDAMENTALE:
Rapidità massima per realizzare "piccoli" gestionali con ottime MMI
(Man Machine Interface).
Opinione:
In base all'esigenza mi adatto con l'uno o l'altro.
Alessandro./@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


author: Pimpoli

text:
MegaMax wrote:
>
> Questo post è volutamente cross-postato, in quanto vorrei conoscere
> l'oppinione degli sviluppatori di ambo i newsgroup, sperando che ne
> risulti una discussione costruttiva. :-)
>
> Argomento di discussione: qual'è il miglior tool per creare software
> che forniscano un'interfaccia utente verso un DB (Access-JET o SQL
> Server)?
>
> Io ho lavorato sia con VB (non troppo) sia con Access (molto), e ne ho
> concluso quanto segue:
Ciao...io ho seguito un po' il cammino inverso, perchè ho sempre usato
VB ed ora...sto sbattendo la testa su Access! Io Access lo trovo molto..
.contorto! Vagonate di codice ridondante, poi non mi sento mai
veramente "libero" e con il "programma in pugno" come mi sentivo con VB.
 Inoltre in VB la gestione dei Recordset è mooooolto più semplice.
 Tanto per dire, ho provato a realizzare in Access una semplice
 maschera di inserimento e gestione dati da una singola tabella con un
 po' di VBA sotto, e mi sono accorto di quanto sia complicato rispetto
 a VB (sempre se vuoi fare le cose bene senza possibili errori da parte
 dell'utente!): infatti, coem potrai notare, ho dovuto richiedere più
 volte l'aiuto dei partecipanti a questo Newsgroup. Questa la mia
 impressione: per una cosa "provvisoria" o per uso personale va anche
 bene Access, ma VB...è un'altra cosa! Ciao, con simpatia!
Giorgio


text:
> Ciao...io ho seguito un po' il cammino inverso, perchè ho sempre usato
> VB ed ora...sto sbattendo la testa su Access! Io Access lo trovo molto..
> .contorto! Vagonate di codice ridondante,
credo dipenda dall'esperienza, per me è lo stesso con VB :-)
> poi non mi sento mai
> veramente "libero" e con il "programma in pugno" come mi sentivo con VB.
questo lo condivido.
>  Inoltre in VB la gestione dei Recordset è mooooolto più semplice.
boh... a me sembra identica; ADO e DAO usano le stesse librerie....
cambia il modo con cui colleghi i dati agli oggetti, ed in access mi sembra
semplice.
>  Tanto per dire, ho provato a realizzare in Access una semplice
>  maschera di inserimento e gestione dati da una singola tabella con un
>  po' di VBA sotto,
Credo che dipenda molto dall'esperienza... a me vengono facili facili :-)
> Ciao, con simpatia!
> Giorgio
Ciao, Max :-)


text:
"Alessandro" <
ik2...@libero.it
> ha scritto nel messaggio
news:38f6027c5f6a64b051...@mygate.mailgate.org...
> "MegaMax" <
zz...@sssss.com
> wrote in message
> news:ad7ib1$uob1c$
1...@ID-141456.news.dfncis.de
>
> >[CUT]
> >
> > Che ne pensate?
> > Come si intuisce sono molto Access-sostenitore (quando si tratta di
creare
> > interfaccie verso DB).
> > Ma magari sbaglio, perchè conosco meglio Access che VB; appunto per
questo
> > vorrei sapere cosa ne pensano gli esperti di VB.
> >
> > Ciao, Max
>
> Premetto che, come hai precisato sono impressioni/deformazioni
> personali,
> quindi è tale anche il mio commento....!
> Io ho iniziato con VB, e mi sono fatto un'pò d'esperienza(non
> moltissima)
> e per me VB ha una flessibilità che ACCESS non gestisce.
> Si possono fare molti esempi, dall'utilizzo completo dei RECORDSET con
> gli oggetti, ACCESS, almeno il 97, non prevede di attribuire ad un
> oggetto
> il contenuto di un RECORDSET.
Io ho sempre usato Access 2000, e li si può fare (cosa molto comoda in
alcuni casi :-)
ciao, Max