title: invio di posta elettronica con allegati

text:
Giacobino da Tradate expressed precisely :

Il codice che ho inviato l'ho creato con Office 2003, poi forse (non
ricordo bene) lievemente modificato per Office 2007, 2010, 2013.
Funziona con l'Outlook di Office, non Outlook Express.
Occorre pertanto verificare che detto Outlook sia installato e che vi
sia stato aperto un account di posta.

Se non puoi installare Outlook prova con vbSendMail.dll citato dall'OP.
Occorrerï¿œ solo qualche lieve modifica per adattare il VB6 al VBA di
Access.

Bruno


title: invio di posta elettronica con allegati

author: Piero

text:
"Bruno Campanini" <
brun...@libero.it
> ha scritto nel messaggio
news:52c37518$0$1372$4faf...@reader1.news.tin.it...

> Occorrer� solo qualche lieve modifica per adattare il VB6 al VBA di
> Access.
>
Ciao Bruno
� possibile creare una funzione in modo da richiamarla all'occorenza con
call,
per non riposrtare ogni volta tutto il codice?


title: invio di posta elettronica con allegati

author: Bruno Campanini

text:
Piero was thinking very hard :
> "Bruno Campanini" <
brun...@libero.it
> ha scritto nel messaggio
> news:52c37518$0$1372$4faf...@reader1.news.tin.it...
>> Giacobino da Tradate expressed precisely :
>>> Il 30/12/2013 13.53, Bruno Campanini ha scritto:
>>>
>>>> Usare, saran 20 righe di codice, un client di posta tipo Outlook di
>>>> Office.
>>>
>>> in passato con A97 ho mandato via email dei report esportati in html,
>>> senza problemi, sfruttando la presenza nel computer di outlook express.
>>>
>>> Nel frattempo pero' l'azienda ha gestito la posta aziendale tramite Lotus
>>> Notes, che viene interrogata tramite webmail. Nei computer aziendali
>>> quindi non e' piu' installato nessun cliente di posta e mi sa che anche
>>> porte 25 ecc. sono sbarrate.
>>>
>>> Nella rete az. resta accessibile la porta 80, filtrata da un sistema di
>>> white list.
>>>
>>> In una situazione del genere che tipo di approccio potrei seguire?
>>
>> Il codice che ho inviato l'ho creato con Office 2003, poi forse (non
>> ricordo bene) lievemente modificato per Office 2007, 2010, 2013.
>> Funziona con l'Outlook di Office, non Outlook Express.
>> Occorre pertanto verificare che detto Outlook sia installato e che vi sia
>> stato aperto un account di posta.
>>
>> Se non puoi installare Outlook prova con vbSendMail.dll citato dall'OP.
>> Occorrerï¿œ solo qualche lieve modifica per adattare il VB6 al VBA di Access.
>>
> Ciao Bruno
> ï¿œ possibile creare una funzione in modo da richiamarla all'occorenza con
> call,
> per non riposrtare ogni volta tutto il codice?

Inserisci il codice in un modulo e rinominalo:
        Public Sub SendingMailFromTable
Sarï¿œ disponibile da ovunque entro Access e richiamabile anche passando
parametri (occorre una lieve modifica al codice).
Non ï¿œ necessario trasformarlo in Function, che Function non ï¿œ: non
restituisce un valore, ma esegue un'azione.

Quali sono i parametri che vorresti passare?

Bruno


title: invio di posta elettronica con allegati

text:
cut
>> Ciao Bruno
>> � possibile creare una funzione in modo da richiamarla all'occorenza con
>> call,
>> per non riposrtare ogni volta tutto il codice?
>
> Inserisci il codice in un modulo e rinominalo:
>        Public Sub SendingMailFromTable
> Sar� disponibile da ovunque entro Access e richiamabile anche passando
> parametri (occorre una lieve modifica al codice).
> Non � necessario trasformarlo in Function, che Function non �: non
> restituisce un valore, ma esegue un'azione.
>
> Quali sono i parametri che vorresti passare?
>
Ciao Bruno e grazie

ho piu' situazioni.
p.e.
in una maschera (dove ho il pulsante) ho una sottomaschera
"S_EmailFornitori_2" da query:
SELECT TbEmailFornitori.IdFornitore, TbEmailFornitori.Email,
TbEmailFornitori.Email_ChiusuraCarico, TbEmailFornitori.Esclusa,
IIf(IsNull(IIf(Not
IsNull(DLookUp("Email_ChiusuraCarico","Q_EmailFornitori","IDFornitore= " &
[IDFornitore])),[Email]=Null,[Email])),[Email_ChiusuraCarico],IIf(Not
IsNull(DLookUp("Email_ChiusuraCarico","Q_EmailFornitori","IDFornitore= " &
[IDFornitore])),[Email]=Null,[Email])) AS EmailNew
FROM TbEmailFornitori
WHERE (((IIf(IsNull(IIf(Not
IsNull(DLookUp("Email_ChiusuraCarico","Q_EmailFornitori","IDFornitore= " &
[IDFornitore])),[Email]=Null,[Email])),[Email_ChiusuraCarico],IIf(Not
IsNull(DLookUp("Email_ChiusuraCarico","Q_EmailFornitori","IDFornitore= " &
[IDFornitore])),[Email]=Null,[Email]))) Is Not Null));

che mi mostra le mail dei destinatari.

su click del pulsante ho questo codice da completare:

            Dim blRet As Boolean

            blRet = ConvertReportToPDF(Me.lstRptName, vbNullString, _
            Me.lstRptName.Value & ".pdf", False, True, 150, "", "", 0, 0, 0)

richiamando il tuo programma,
per inviare la mail con i vari indirizzi e attachament (che di solito � un
solo attachament per volta)


title: invio di posta elettronica con allegati

text:
Piero was thinking very hard :
> cut
>>> Ciao Bruno
>>> ï¿œ possibile creare una funzione in modo da richiamarla all'occorenza con
>>> call,
>>> per non riposrtare ogni volta tutto il codice?
>>
>> Inserisci il codice in un modulo e rinominalo:
>>        Public Sub SendingMailFromTable
>> Sarï¿œ disponibile da ovunque entro Access e richiamabile anche passando
>> parametri (occorre una lieve modifica al codice).
>> Non ï¿œ necessario trasformarlo in Function, che Function non ï¿œ: non

> per inviare la mail con i vari indirizzi e attachament (che di solito ï¿œ un
> solo attachament per volta)

Di seguito al codice dui sopra (opportunamente adattato):
=========================================================
Dim RS As Recordset, FieldName As String, Message As String
Dim AttachDoc As String, CCstring, BCCstring

Set RS = CurrentDb.OpenRecordset("Tua ExprSQL", dbOpenDynaset)
FieldName = "TuoCampoMailAddress"
Message = "Auguri 2014"
AttachDoc = "D:\Pixel.txt"
CCstring = "
brun...@libero.it
"
BCCstring = ""

SendingMailFromTable RS, FieldName, Message, AttachDoc, CCstring,
BCCstring
===========================================================

Quindi Scrivi in un Modulo:
=============================
Public Sub SendingMailFromTable(RS As Recordset, _
           FieldName As String, _
           Message As String, _
           AttachDoc As String, _
           Optional CCstring, _
           Optional BCCstring)

Dim NewMail As MailItem

Do Until RS.EOF
    Set NewMail =
CreateObject("Outlook.Application").CreateItem(olMailItem)
    With NewMail
        .To = RS(FieldName)
        .Body = Message
        .Attachments.Add AttachDoc
        .CC = CCstring
        .BCC = BCCstring
        .Subject = "My Special Subject"
        .Send
    End With
    Set NewMail = Nothing
    RS.MoveNext
Loop

End Sub
===================================

Bruno


title: invio di posta elettronica con allegati

text:
"Bruno Campanini" <
brun...@libero.it
> ha scritto nel messaggio
news:52c55219$0$23115$4faf...@reader2.news.tin.it...
> Piero was thinking very hard :
>> cut
>>>> Ciao Bruno
>>>> � possibile creare una funzione in modo da richiamarla all'occorenza
>>>> con call,
>>>> per non riposrtare ogni volta tutto il codice?
>>>
>>> Inserisci il codice in un modulo e rinominalo:
>>>        Public Sub SendingMailFromTable
>>> Sar� disponibile da ovunque entro Access e richiamabile anche passando
>>> parametri (occorre una lieve modifica al codice).
>>> Non � necessario trasformarlo in Function, che Function non �: non

>> per inviare la mail con i vari indirizzi e attachament (che di solito �

Grazie Bruno
posso darci un nome qualsiasi al modulo?


title: invio di posta elettronica con allegati

text:
cut

nel modulo ho errore qui:
Dim NewMail As MailItem



title: invio di posta elettronica con allegati

text:
Piero expressed precisely :

Hai una versione di Office inferiore a 2010?

Intanto correggi in:
   Dim NewMail As Object

Bruno


title: invio di posta elettronica con allegati

text:
"Bruno Campanini" <
brun...@libero.it
> ha scritto nel messaggio
news:52c58e5a$0$1375$4faf...@reader1.news.tin.it...

2003

> Intanto correggi in:
>   Dim NewMail As Object

ok

qui mi da variabile non definita "olMailItem"


title: invio di posta elettronica con allegati

text:
Piero formulated on Thursday :

>> Hai una versione di Office inferiore a 2010?
> 2003
>
>> Intanto correggi in:
>>   Dim NewMail As Object
>
> ok
>
> qui mi da variabile non definita "olMailItem"

Spiacente, non sono in grado di verificare con Office 2003.
Prova a guardare in Tools==>References (Strumenti==>Riferimenti)
se tutto ï¿œ a posto.

Bruno


title: invio di posta elettronica con allegati

text:
"Bruno Campanini" <
brun...@libero.it
> ha scritto nel messaggio
news:52c6dc5f$0$23115$4faf...@reader2.news.tin.it...

> se tutto � a posto.
>
ciao Bruno
ho un problema in questo punto
        .To = RS(FieldName)
elemento non trovato in quest'insieme


title: invio di posta elettronica con allegati

text:
After serious thinking Piero wrote :
> "Bruno Campanini" <
brun...@libero.it
> ha scritto nel messaggio
> news:52c6dc5f$0$23115$4faf...@reader2.news.tin.it...
>> Piero formulated on Thursday :
>>
>>>> Hai una versione di Office inferiore a 2010?
>>> 2003
>>>
>>>> Intanto correggi in:
>>>>   Dim NewMail As Object
>>>
>>> ok
>>>
>>> qui mi da variabile non definita "olMailItem"
>>
>> Spiacente, non sono in grado di verificare con Office 2003.
>> Prova a guardare in Tools==>References (Strumenti==>Riferimenti)
>> se tutto ï¿œ a posto.
>>
> ciao Bruno
> ho un problema in questo punto
>         .To = RS(FieldName)
> elemento non trovato in quest'insieme

E con olMailItem... risolto?

Bruno


title: invio di posta elettronica con allegati

text:
"Bruno Campanini" <
brun...@libero.it
> ha scritto nel messaggio
news:52c6e24d$0$23117$4faf...@reader2.news.tin.it...
> After serious thinking Piero wrote :
>> "Bruno Campanini" <
brun...@libero.it
> ha scritto nel messaggio
>> news:52c6dc5f$0$23115$4faf...@reader2.news.tin.it...
>>> Piero formulated on Thursday :
>>>
>>>>> Hai una versione di Office inferiore a 2010?
>>>> 2003
>>>>
>>>>> Intanto correggi in:
>>>>>   Dim NewMail As Object
>>>>
>>>> ok
>>>>
>>>> qui mi da variabile non definita "olMailItem"
>>>
>>> Spiacente, non sono in grado di verificare con Office 2003.
>>> Prova a guardare in Tools==>References (Strumenti==>Riferimenti)
>>> se tutto � a posto.
>>>
>> ciao Bruno
>> ho un problema in questo punto
>>         .To = RS(FieldName)
>> elemento non trovato in quest'insieme
>
> E con olMailItem... risolto?
no!
al momento ho aggirato l'ostacolo cosi
'Option Explicit


title: invio di posta elettronica con allegati

text:

Quando esegui il codice in late binding (hai dichiarato as Object) non puoi usare "olMailItem" o qualunque nome appartenente all'oggetto. Devi per forza usare il numero che lo rappresenta, nel tuo caso 0 (vado a memoria).


title: invio di posta elettronica con allegati

text:
"Fair87" <
roby...@gmail.com
> ha scritto nel messaggio
news:73d9eec8-96dc-4cfb...@googlegroups.com...
Il giorno venerd� 3 gennaio 2014 17:40:23 UTC+1, Piero ha scritto:
> "Bruno Campanini" <
brun...@libero.it
> ha scritto nel messaggio
>
> news:52c6e24d$0$23117$4faf...@reader2.news.tin.it...
>
> > After serious thinking Piero wrote :
>
> >> "Bruno Campanini" <
brun...@libero.it
> ha scritto nel messaggio
>
> >> news:52c6dc5f$0$23115$4faf...@reader2.news.tin.it...
>
> >>> Piero formulated on Thursday :
>
> >>>
>
> >>>>> Hai una versione di Office inferiore a 2010?
>
> >>>> 2003
>
> >>>>
>
> >>>>> Intanto correggi in:
>
> >>>>>   Dim NewMail As Object
>
> >>>>
>
> >>>> ok
>
> >>>>
>
> >>>> qui mi da variabile non definita "olMailItem"
>
> >>>
>
> >>> Spiacente, non sono in grado di verificare con Office 2003.
>
> >>> Prova a guardare in Tools==>References (Strumenti==>Riferimenti)
>
> >>> se tutto ? a posto.
>
> >>>
>
> >> ciao Bruno
>
> >> ho un problema in questo punto
>
> >>         .To = RS(FieldName)
>
> >> elemento non trovato in quest'insieme
>
> >
>
> > E con olMailItem... risolto?
>
> no!
>
> al momento ho aggirato l'ostacolo cosi
>
> 'Option Explicit

Quando esegui il codice in late binding (hai dichiarato as Object) non puoi
usare "olMailItem" o qualunque nome appartenente all'oggetto. Devi per forza
usare il numero che lo rappresenta, nel tuo caso 0 (vado a memoria).

grazie Fair87
perch� nel mio casi zero?
da dove lo vedi?


title: invio di posta elettronica con allegati

text:
"Piero" <
Pi...@Piero.Libero.it
> ha scritto nel messaggio
news:52c7c648$0$23125$4faf...@reader2.news.tin.it...

cmq ora non mi chiede piu' di dichiarare la variabile


title: invio di posta elettronica con allegati

text:

Butta un occhio qua

http://www.dicks-clicks.com/excel/olBinding.htm


title: invio di posta elettronica con allegati

text:
"Fair87" <
roby...@gmail.com
> ha scritto nel messaggio
news:eacda1e5-7c5c-4d38...@googlegroups.com...
Il giorno sabato 4 gennaio 2014 09:50:34 UTC+1, Piero ha scritto:
> "Piero" <
Pi...@Piero.Libero.it
> ha scritto nel messaggio
>
> news:52c7c648$0$23125$4faf...@reader2.news.tin.it...
>
> >
>
> > "Fair87" <
roby...@gmail.com
> ha scritto nel messaggio
>
> > news:73d9eec8-96dc-4cfb...@googlegroups.com...
>

> > perch? nel mio casi zero?
>
> > da dove lo vedi?
>
> cmq ora non mi chiede piu' di dichiarare la variabile

Butta un occhio qua

http://www.dicks-clicks.com/excel/olBinding.htm

grazie


title: invio di posta elettronica con allegati

text:
Bruno Campanini wrote :

Questo funziona, testato or ora, con Office 2003 su XP SP3:
===========================================================
Public Sub SendingMailFromTable(RS As Recordset, _
           FieldName As String, _
           Message As String, _
           AttachDoc As String, _
           Optional CCstring, _
           Optional BCCstring)
'
' References:
' ===========
' Visual Basic for Applications
' Microsoft Access 11.0 Object Library
' Microsoft DAO 3.60 Object Library
' Microsoft Outlook 11.0 Object Library
'
Dim olApp As New Outlook.Application
Dim NewMail As Outlook.MailItem

Do Until RS.EOF
    Set NewMail = olApp.CreateItem(olMailItem)
    With NewMail
        .To = RS(FieldName)
        .Body = Message
        .Attachments.Add AttachDoc
        .CC = CCstring
        .BCC = BCCstring
        .Subject = "My Special Subject"
        .Send
    End With
    Set NewMail = Nothing
    RS.MoveNext
Loop

End Sub
===========================================

Bruno


title: invio di posta elettronica con allegati

text:
"Bruno Campanini" <
brun...@libero.it
> ha scritto nel messaggio
news:52c82bc6$0$1375$4faf...@reader1.news.tin.it...
> Bruno Campanini wrote :
>
>> Piero formulated on Thursday :
>>
>>>> Hai una versione di Office inferiore a 2010?
>>> 2003
>>>
>>>> Intanto correggi in:
>>>>   Dim NewMail As Object
>>>
>>> ok
>>>
>>> qui mi da variabile non definita "olMailItem"
>>
>> Spiacente, non sono in grado di verificare con Office 2003.
>> Prova a guardare in Tools==>References (Strumenti==>Riferimenti)
>> se tutto � a posto.

ciao Bruno e grazie
ho l'errore qui:
Dim olApp As New Outlook.Application
Dim NewMail As Outlook.MailItem



title: invio di posta elettronica con allegati

text:
Piero expressed precisely :
> "Bruno Campanini" <
brun...@libero.it
> ha scritto nel messaggio
> news:52c82bc6$0$1375$4faf...@reader1.news.tin.it...
>> Bruno Campanini wrote :
>>
>>> Piero formulated on Thursday :
>>>
>>>>> Hai una versione di Office inferiore a 2010?
>>>> 2003
>>>>
>>>>> Intanto correggi in:
>>>>>   Dim NewMail As Object
>>>>
>>>> ok
>>>>
>>>> qui mi da variabile non definita "olMailItem"
>>>
>>> Spiacente, non sono in grado di verificare con Office 2003.
>>> Prova a guardare in Tools==>References (Strumenti==>Riferimenti)
>>> se tutto ï¿œ a posto.

Sono attivi tutti i Riferimenti che ho indicato?

Bruno


title: invio di posta elettronica con allegati

text:
"Piero" <
Pi...@Piero.Libero.it
> ha scritto nel messaggio
news:52c83c78$0$23124$4faf...@reader2.news.tin.it...

mio errore, non avevo spuntato Microsoft Outlook 11.0 Object Library


title: invio di posta elettronica con allegati

text:
"Piero" <
Pi...@Piero.Libero.it
> ha scritto nel messaggio
news:52c840d8$0$23117$4faf...@reader2.news.tin.it...

ciao Bruno
altro problema :

Set RS = CurrentDb.OpenRecordset("SELECT TbEmailFornitori.* FROM
TbEmailFornitori", dbOpenDynaset)

If RS.RecordCount > 0 Then
MsgBox RS.RecordCount
Else
MsgBox "no"
End If

non � vuoto 1 record c'�

FieldName = "Me!S_EmailFornitori_2.form!Email"

in questo punto mi esce:
        .To = RS(FieldName)

elemento non trovato in questo insieme
e non capisco il perch�.
come posso fare per vedere cosa restituisce la query?


title: invio di posta elettronica con allegati

text:
on 04-01-14, Piero supposed :

> elemento non trovato in questo insieme
> e non capisco il perchï¿œ.
> come posso fare per vedere cosa restituisce la query?

Passo la mano.

Bruno


title: invio di posta elettronica con allegati

text:
"Bruno Campanini" <
brun...@libero.it
> ha scritto nel messaggio
news:52c852e8$0$1380$4faf...@reader1.news.tin.it...
> on 04-01-14, Piero supposed :
>
>> elemento non trovato in questo insieme
>> e non capisco il perch�.
>> come posso fare per vedere cosa restituisce la query?
>
> Passo la mano.
>
> Bruno
>
grazie cmq


title: invio di posta elettronica con allegati

text:
"Piero" <
Pi...@Piero.Libero.it
> ha scritto nel messaggio
news:52c853d2$0$23117$4faf...@reader2.news.tin.it...

ciao Bruno
il problema � qui
        .To = RS(FieldName)
evidentemente Access 2003 non lo riconosce
con cosa posso sostituirlo?
Grazie


title: invio di posta elettronica con allegati

text: access  lo riconosce eccome. il problema é se esiste. ti sta gridando a gran voce " non esiste sta cosa che tenti di farmi leggere". controlla


title: invio di posta elettronica con allegati

text:
"Fair87" <
roby...@gmail.com
> ha scritto nel messaggio
news:0d485aed-4586-47d5...@googlegroups.com...
access  lo riconosce eccome. il problema � se esiste. ti sta gridando a gran
voce " non esiste sta cosa che tenti di farmi leggere". controlla

ciao Fair87
sicuramente, infatti sto cercando di capire dove sbaglio


title: invio di posta elettronica con allegati

author: pfmarro

text:
una domanda

Set RS = CurrentDb.OpenRecordset("SELECT TbEmailFornitori.* FROM
TbEmailFornitori", dbOpenDynaset)

If RS.RecordCount > 0 Then
MsgBox RS.RecordCount
Else
MsgBox "no"
End If

FieldName = "Me!S_EmailFornitori_2.form!Email"

in questo punto mi esce:
        .To = RS(FieldName)

CIOE' APRI UN RECORDSET  e poi leggi il valore del campo Email della maschera?
es. "Me!S_EmailFornitori_2.form!Email" ti restituisce -->
ro...@libero.it

e' logico che non trovi
il campo
ro...@libero.it


title: invio di posta elettronica con allegati

text:
"pfmarro" <
pfm...@gmail.com
> ha scritto nel messaggio
news:e52230c2-2872-4454...@googlegroups.com...

ciao pfmarro
a quel punto mi dovrebbe dare gli indirizzi email che ho poi nella
sottomaschera
Me!S_EmailFornitori_2.form!Email


title: invio di posta elettronica con allegati

text:

non capisco cosa dici

hai aperto il recordset
SELECT TbEmailFornitori.* FROM SELECT TbEmailFornitori.* FROM
>
> > TbEmailFornitori
penso siano le mail dei fornitori

forse allora vorrai filtrare i dati del tuo recordset (TbEmailFornitori) in base al valore della sottomaschera?

se visualizzi
msgbox Me!S_EmailFornitori_2.form!Email  ---> cosa ti restituisce?


title: invio di posta elettronica con allegati

text:
"pfmarro" <
pfm...@gmail.com
> ha scritto nel messaggio
news:fe2c1cc3-1c99-499e...@googlegroups.com...

esatto

>forse allora vorrai filtrare i dati del tuo recordset (TbEmailFornitori) in
>base al valore della sottomaschera?

>se visualizzi
>msgbox Me!S_EmailFornitori_2.form!Email  ---> cosa ti restituisce?

l'oggetto a cui si fa riferimento nell'espressione � stato chiuso o
eliminato
e sinceramente non capisco il perch�


title: invio di posta elettronica con allegati

text:
> >msgbox Me!S_EmailFornitori_2.form!Email  ---> cosa ti restituisce?
>
>
>
> l'oggetto a cui si fa riferimento nell'espressione � stato chiuso o
> eliminato
> e sinceramente non capisco il perch�

se apri la maschera con sottomaschera ci sono dati nella sottomaschera?
come si chiama la sottomaschera ?

prova
msgbox Me!S_EmailFornitori_2.form.caption --> cosa visualizzi?
c'e' la casella di testo Email? hai altre caselle di testo collegate?


title: invio di posta elettronica con allegati

text:
"Piero" <
Pi...@Piero.Libero.it
> ha scritto nel messaggio
news:52cbce56$0$1380$4faf...@reader1.news.tin.it...

aggiungo..
mentre su click di un pulsante nella maschera
msgbox Me!S_EmailFornitori_2.Form!NewEmail
mi mostra il primo indirizzo email che ho nella sottomaschera


title: invio di posta elettronica con allegati

text:
"pfmarro" <
pfm...@gmail.com
> ha scritto nel messaggio
news:e554427f-3965-4d11...@googlegroups.com...

> >msgbox Me!S_EmailFornitori_2.form!Email  ---> cosa ti restituisce?
>
>
>
> l'oggetto a cui si fa riferimento nell'espressione ? stato chiuso o
> eliminato
> e sinceramente non capisco il perch?

>se apri la maschera con sottomaschera ci sono dati nella sottomaschera?
si
� collegata campi secondari e campi master con IdFornitore
>come si chiama la sottomaschera ?
S_EmailFornitori_2

>prova
>msgbox Me!S_EmailFornitori_2.form.caption --> cosa visualizzi?
l'oggetto a cui si fa riferimento nell'espressione ? stato chiuso o
eliminato

>c'e' la casella di testo Email?
no NewEmail
>hai altre caselle di testo collegate?
si, Esclusa (campo boelano si/no)
per escludere o meno una determinata email di quel fornitore


title: invio di posta elettronica con allegati

text:
"Piero" <
Pi...@Piero.Libero.it
> ha scritto nel messaggio
news:52cbcffb$0$1367$4faf...@reader1.news.tin.it...

mentre sul pulsante
MsgBox Me!S_EmailFornitori_2.Form.Caption

da come risultato
SM_EmailFornitori


title: invio di posta elettronica con allegati

text:
Il giorno martedì 7 gennaio 2014 11:26:28 UTC+1, Piero ha scritto:
> "Piero" <
Pi...@Piero.Libero.it
> ha scritto nel messaggio
>
> news:52cbcffb$0$1367$4faf...@reader1.news.tin.it...
>
> >
>
> > "Piero" <
Pi...@Piero.Libero.it
> ha scritto nel messaggio
>
> > news:52cbce56$0$1380$4faf...@reader1.news.tin.it...
>
> >>

>

allora la casella di testo email non esiste

devi usare  Me!S_EmailFornitori_2.Form!NewEmail

fatto questo continuo a non capire perche' apri il rs

Set RS = CurrentDb.OpenRecordset("SELECT TbEmailFornitori.* FROM
TbEmailFornitori", dbOpenDynaset)

If RS.RecordCount > 0 Then
MsgBox RS.RecordCount
Else
MsgBox "no"
End If

FieldName = "Me!S_EmailFornitori_2.form!Email"

in questo punto mi esce:
        .To = RS(FieldName)

e FieldName = nome campo!!! e non valore del campo


title: invio di posta elettronica con allegati

text:
"pfmarro" <
pfm...@gmail.com
> ha scritto nel messaggio
news:38e62c80-d7a4-421b...@googlegroups.com...
Il giorno marted� 7 gennaio 2014 11:26:28 UTC+1, Piero ha scritto:
> "Piero" <
Pi...@Piero.Libero.it
> ha scritto nel messaggio
>
> news:52cbcffb$0$1367$4faf...@reader1.news.tin.it...
>
> >
>
> > "Piero" <
Pi...@Piero.Libero.it
> ha scritto nel messaggio
>
> > news:52cbce56$0$1380$4faf...@reader1.news.tin.it...
>
> >>

>
> >> news:fe2c1cc3-1c99-499e...@googlegroups.com...
>

> >> l'oggetto a cui si fa riferimento nell'espressione ? stato chiuso o
>
> >> eliminato
>
> >> e sinceramente non capisco il perch?
>
> >>
>
> > aggiungo..
>
> > mentre su click di un pulsante nella maschera
>
> > msgbox Me!S_EmailFornitori_2.Form!NewEmail
>
> > mi mostra il primo indirizzo email che ho nella sottomaschera
>
> >
>
> mentre sul pulsante
>
> MsgBox Me!S_EmailFornitori_2.Form.Caption
>
>
>
> da come risultato
>
> SM_EmailFornitori

>allora la casella di testo email non esiste

>devi usare  Me!S_EmailFornitori_2.Form!NewEmail

ok

>fatto questo continuo a non capire perche' apri il rs
cmq � questa il rs
            Set RS = CurrentDb.OpenRecordset _
                ("SELECT
IIf(DLookUp(""Email_ChiusuraCarico"",""Q_EmailFornitori"",""IDFornitore= ""
& [IDFornitore]),[Email]=Null,[Email]) & [Email_ChiusuraCarico] AS NewEmail,
* FROM TbEmailFornitori WHERE
(((IIf(DLookUp(""Email_ChiusuraCarico"",""Q_EmailFornitori"",""IDFornitore=
"" & [IDFornitore]),[Email]=Null,[Email]) & [Email_ChiusuraCarico]) Is Not
Null));", _
                dbOpenDynaset)

>If RS.RecordCount > 0 Then
MsgBox RS.RecordCount   risultato=1
>Else
>MsgBox "no"
>End If

>FieldName = "Me!S_EmailFornitori_2.form!Email"

>in questo punto mi esce:
 >       .To = RS(FieldName)

>e FieldName = nome campo!!! e non valore del campo

consigliami cosa fare


title: invio di posta elettronica con allegati

text:
> >fatto questo continuo a non capire perche' apri il rs
> cmq � questa il rs
>
>             Set RS = CurrentDb.OpenRecordset _
>
>                 ("SELECT
> IIf(DLookUp(""Email_ChiusuraCarico"",""Q_EmailFornitori"",""IDFornitore= ""
>
> & [IDFornitore]),[Email]=Null,[Email]) & [Email_ChiusuraCarico] AS NewEmail,
>
> * FROM TbEmailFornitori WHERE
>
> (((IIf(DLookUp(""Email_ChiusuraCarico"",""Q_EmailFornitori"",""IDFornitore=
>
> "" & [IDFornitore]),[Email]=Null,[Email]) & [Email_ChiusuraCarico]) Is Not
>
> Null));", _
>
>                 dbOpenDynaset)
>
non e' + facile creare una query con

TbEmailFornitori  in relazione con Q_EmailFornitori e crearti un campo che metti la mail che ti interessa o metti null?


title: invio di posta elettronica con allegati

text:
"pfmarro" <
pfm...@gmail.com
> ha scritto nel messaggio
news:89048d91-54e2-480b...@googlegroups.com...

> >fatto questo continuo a non capire perche' apri il rs
> cmq ? questa il rs

grazie pfmarro

io ho pensato a questa soluzione

        Dim RS
        Set RS = Me.S_EmailFornitori_2.Form.RecordsetClone
        Me!Pippo.SetFocus
        Do Until RS.EOF
        Me!Pippo = Me!S_EmailFornitori_2.Form!NewEmail & ";"
        RS.MoveNext
        Loop

ma nel caso di piu' indirizzi, non riesco ad affiancarli
p.e.
ro...@libero.it
;
ve...@libero.it


title: invio di posta elettronica con allegati

text:

per me stai scegliendo una strada contorta

prova a vedere questo esempio di query
http://www.swoopshare.com/file/080b7dec15ed54b364fea90353062d6b/MailConcatenate.mdb.html

(e' un file .mdb)


title: invio di posta elettronica con allegati

text:
cut
>>
>> ma nel caso di piu' indirizzi, non riesco ad affiancarli
>>
>> p.e.
ro...@libero.it
;
ve...@libero.it

>
> per me stai scegliendo una strada contorta
>
> prova a vedere questo esempio di query
>
http://www.swoopshare.com/file/080b7dec15ed54b364fea90353062d6b/MailConcatenate.mdb.html

>
> (e' un file .mdb)

complimenti!!!

aiutami a realizzare anche questa
in modo piu' semplice



title: invio di posta elettronica con allegati

text:

COSA INTENDI PER COMPLIMENTI?

prova ad inviarmi il file con 2 dati
utilizza pure
http://www.swoopshare.com
 per inviarlo


title: invio di posta elettronica con allegati

text:
"pfmarro" <
pfm...@gmail.com
> ha scritto nel messaggio
news:769c54d2-cfdb-4048...@googlegroups.com...
Il giorno marted� 7 gennaio 2014 18:07:14 UTC+1, Piero ha scritto:
> cut
>
> >>
>
> >> ma nel caso di piu' indirizzi, non riesco ad affiancarli
>
> >>
>
> >> p.e.
ro...@libero.it
;
ve...@libero.it

>
> >
>
> > per me stai scegliendo una strada contorta
>
> >
>
> > prova a vedere questo esempio di query
>
> >
http://www.swoopshare.com/file/080b7dec15ed54b364fea90353062d6b/MailConcatenate.mdb.html

>
> >
>
> > (e' un file .mdb)
>
>
>
> complimenti!!!
>
>
>
> aiutami a realizzare anche questa
>
> in modo piu' semplice
>
> SELECT IIf(DLookUp("Email_ChiusuraCarico","Q_EmailFornitori","IDFornitore=
> "
>
> & [IDFornitore]),[Email]=Null,[Email]) & [Email_ChiusuraCarico] AS
> NewEmail,
>
> *
>
> FROM TbEmailFornitori
>
> WHERE
> (((IIf(DLookUp("Email_ChiusuraCarico","Q_EmailFornitori","IDFornitore=
>
> " & [IDFornitore]),[Email]=Null,[Email]) & [Email_ChiusuraCarico]) Is Not
>
> Null));

COSA INTENDI PER COMPLIMENTI?
che hai capito il problema � risolto
con una ottima query.
confesso che per me era improponibile  questa soluzione.

prova ad inviarmi il file con 2 dati
utilizza pure
http://www.swoopshare.com
 per inviarlo
ok


title: invio di posta elettronica con allegati

text:
"Bruno Campanini" <
brun...@libero.it
> ha scritto nel messaggio
news:52c852e8$0$1380$4faf...@reader1.news.tin.it...
> on 04-01-14, Piero supposed :
>
>> elemento non trovato in questo insieme
>> e non capisco il perch�.
>> come posso fare per vedere cosa restituisce la query?
>
> Passo la mano.
>
> Bruno

ciao Bruno
volevo ringraziarti, perch� il tuo programma fuziona.
Il problema lo creava il codice per trasformare il report
in pdf.

Ancora grazie.


title: invio di posta elettronica con allegati

text:
Piero formulated the question :
> "Bruno Campanini" <
brun...@libero.it
> ha scritto nel messaggio
> news:52c852e8$0$1380$4faf...@reader1.news.tin.it...
>> on 04-01-14, Piero supposed :
>>
>>> elemento non trovato in questo insieme
>>> e non capisco il perchï¿œ.
>>> come posso fare per vedere cosa restituisce la query?
>>
>> Passo la mano.
>>
>> Bruno
>
> ciao Bruno
> volevo ringraziarti, perchï¿œ il tuo programma fuziona.
> Il problema lo creava il codice per trasformare il report
> in pdf.
>
> Ancora grazie.

Funziona col solito warning di Outlook 2003: qualcuno sta tentando di
usare il tuo client di posta elettronica...?
Problema di Programmatic Access che ha fatto tribolare tanti utenti di
Outlook 2003 e che nessuno ï¿œ riuscito a risolvere, almeno a quei tempi,
in modo definitivo.

Bruno


title: Stampe Report

author: News ALice

text:
Mi succede una cosa abbastanza strana a cui non riesco dare una
spiegazione..
Ho creato un report dove controllo, tramite il carattere di Windows
"Courier New" la larghezza esatta dei caratteri stampati.
Mi spiego meglio.
Ho creato un report di una fattura dove è il cliente stesso che sceglie
se stampare la colonna Quantità piuttosto che la colonna Pz Unitario
piuttosto che la colonna Totale Ecc. Ecc.
In più riesce anche a decidere quanti caratteri ogni colonna deve poter
stampare.
In questo modo ogni cliente a la sua fattura con le colonne a piacimento.
Funziona tutto Perfettamente tranne che se stampo il report su una
stampante laser a colori. in quel caso gli spazi che prima erano uguali
su cinque stampanti differenti si allargano creando una fuori uscita di
dati dalle colonne....
Qualcuno sa come risolvere ???
Spero di essermi spiegato bene...
Graize
Enrico Pietrobon


title: Stampe Report

author: Michele (Giò)

text:
"News ALice" <
enrico.p...@tiscali.it
> ha scritto nel messaggio
news:46176673$0$10627$4faf...@reader2.news.tin.it...

Non è che per caso possa centrare qualcosa l'opzione "Stampa Laser Rapida" settata a Si?


title: Stampe Report

author: Enrico Pietrobon

text:
Michele (Giò) ha scritto:

penso di aver capito cosa inganna la stampante.
Nel programma ho anche inserito la possibilità di Scegliere la grandezza
del carattere..
8, 9, 10 con grandezza 8 e 10 tutto OK. ma quando scelgo la grandezza 9
fà casino. penso sia il carattere Courier che non è stato studiato per
essere impostato a 9..
Mi sbaglio ???


title: Stampe Report

text:
"Enrico Pietrobon" <
enrico.p...@tiscali.it
> ha scritto nel messaggio
news:461786d0$0$10622$4faf...@reader2.news.tin.it...
> penso di aver capito cosa inganna la stampante.
>
> Nel programma ho anche inserito la possibilità di Scegliere la grandezza del carattere..
>
> 8, 9, 10 con grandezza 8 e 10 tutto OK. ma quando scelgo la grandezza 9 fà casino. penso sia il
> carattere Courier che non è stato studiato per essere impostato a 9..
>
> Mi sbaglio ???
Eh va la.... va a vedere che è proprio quello....
Anche io per le fatture uso il Courier New in quanto trattasi di carattere a spaziatura fissa.
Io le variabili larghezza colonna (più che altro n_caratteri colonna) le imposto come costanti
globali via VBA ma non do all'utente la possibilità di giocare a suo piacimento. Penso sia una cosa
che compete solo a me.


title: Richiesta database

author: GIOVANNIFERRARI

text:
qulacuno mi sa dire se esiste un database in access che mi permetta di
gestire le schede dei contatti dei clienti e poter impostare le date in
automatico delle visite
grazie


title: Richiesta database

author: cidi

text:
"GIOVANNIFERRARI" <
giov.f...@tin.it
> ha scritto nel messaggio
news:43b55794$0$1071$4faf...@reader4.news.tin.it...

Nei modelli di access ci trovi una gestione contatti
Daniele


title: lista controlli form database esterno

author: AleC

text:
Ho un problema che non riesco a risolvere:
vorrei poter via codice aprire un mdb esterno, sfogliare le form di
quel mdb e fare l'elenco dei controlli che ci sono in ognuna.
Ho provato a cercare in tutti i siti che si occupano di Access e fatto
delle ricerche nei NGs.
Ho provato con i vari oggetti DAO database e di lì con l'insieme
containers ma non c'è alcuna proprietà che consenta l'accesso ai
controlli.
Ho provato a creare un oggetto Access.Application e agire tramite
automazione COM, non riesco a trovare la strada giusta.
Ho provato ad usare la tabella nascosta MsSysObjects, niente.
L'oggetto CodeProject consente l'accesso all'insieme AllForms che però
non ha la proprietà Controls.
C'è qualcuno che può indirizzarmi sulla giusta strada ?
Grazie...


title: lista controlli form database esterno

author: Carlo Costarella

text:
"AleC" <
alessandr...@novameta.it
> ha scritto nel messaggio
news:3a71b4da-8220-4594...@l62g2000hse.googlegroups.com...







Grazie...
-------------------------------
Prova a mettere il db secondario tra i riferimenti...poi agisci come se
fosse in locale.
Ciao, Carlo


title: lista controlli form database esterno

author: Alessandro Baraldi

text:

Secondo me sbagli... qualche cosa...!
L'insieme Forms fa parte dell'Oggetto Application.
Se non sono fuori allenamento... prova questo:
Dim ctl as Access.Control
Dim appAccess As Object
Set appAccess = CreateObject("Access.Application")
appAccess.OpenCurrentDatabase "Percorso del tuo DB"
For Each ctl in appAccess.Forms("NomeForm").Controls
     Debug.Print ctl.Name
Next
Ciao
@Alex


title: lista controlli form database esterno

text:
On 21 Ott, 13:40, Alessandro Baraldi <
ik2...@libero.it
> wrote:
> On 21 Ott, 11:48, AleC <
alessandro.cappe...@novameta.it
> wrote:
>
...
>
> Secondo me sbagli... qualche cosa...!
> L'insieme Forms fa parte dell'Oggetto Application.
>
> Se non sono fuori allenamento... prova questo:
...
>
Funziona!
Non so cosa sbagliassi ma avevo già tentato questa strada, l'unica
cosa è che provavo in modalità interruzione esplorando gli oggetti e
le proprietà da finestra immediata.
Grazie amico.
AleC


title: lista controlli form database esterno

text:
On 21 Ott, 13:26, "Carlo Costarella"
<
carloantoniocostare...@gmail.com
> wrote:
> "AleC" <
alessandro.cappe...@novameta.it
> ha scritto nel messaggionews:3a71b4da-8220-4594...@l62g2000hse.googlegroups.com...

Aggiungendolo ai riferimenti riesco a vedere solo i moduli (degli
oggetti, di classe o meno) le variabili e le routines (anche le
costanti) ma non maschere report ecc., in pratica lo tratta come una
libreria esterna di cui usare le varie funzioni.
Salvo che non mi sfugga qualcosa.
Il codice di Alessandro Baraldi comunque funziona perfettamente.
Grazie
AleC
AleC


title: lista controlli form database esterno

text:

Non funziona :(
Al primo tentativo sembrava funzionasse perché aprendo il db veniva
aperta la maschera denominata frmMain, quindi nel tuo codice
sostituivo semplicemente fra virgolette il nome della maschera che
prima mi veniva in mente che per lìappunto era quella aperta. Ma come
è noto l'insieme Forms restituisce solo le maschere caricate visibili
o meno.
Siccome ho nidificato due For each il primo che cicla le maschere e il
secondo i controlli appena il primo For Each incontra una maschera non
aperta va in errore.
Ecco perché a me non funzionava.
Qualche idea ?
AleC


title: lista controlli form database esterno

text:
"AleC" <
alessandr...@novameta.it
> ha scritto
>
> Prova a mettere il db secondario tra i riferimenti...poi agisci come se
> fosse in locale.
>
> Ciao, Carlo
Aggiungendolo ai riferimenti riesco a vedere solo i moduli (degli
oggetti, di classe o meno) le variabili e le routines (anche le
costanti) ma non maschere report ecc., in pratica lo tratta come una
libreria esterna di cui usare le varie funzioni.
Salvo che non mi sfugga qualcosa.
Il codice di Alessandro Baraldi comunque funziona perfettamente.
Grazie
AleC
--------Risposta-------------
E' necessario che le maschere siano aperte...
Ritorniamo al mio esempio: aggiungi tra i riferimenti il db che ti interessa
esplorare.
In questo db (il db referenziato) scrivi un codice che somiglia a questo:
Public Function ApriMaschereElencaControlli()
DoCmd.SetWarnings False
DoCmd.RunSQL "Delete * from TblNomiControlli;"
DoCmd.SetWarnings True
Dim rcs As Recordset
Dim ctl As Access.Control
Dim F As Object
Set rcs = CurrentDb.OpenRecordset("TblNomiControlli")
For Each F In Application.CodeProject.AllForms
     DoCmd.OpenForm F.Name, , , , , acHidden
     For Each ctl In Forms(F.Name).Controls
     With rcs
     .AddNew
     !NomeMaschera = F.Name
     !NomeControllo = ctl.Name
     .Update
     End With
     Next
DoCmd.Close acForm, F.Name
Next
rcs.Close
Set rcs = Nothing
End Function
Sempre a questo db aggiungi una tabella (TblNomiControlli) con due campi:
NomeMaschera  Testo 255
NomeControllo   Testo 255
Salva e chiudi il db.
Ora apri il principale e allega la tabella "TblNomiControlli" dal secondo
db.
A questo punto se chiami la funzione "ApriMaschereElencaControlli" con:
Call ApriMaschereElencaControlli
da qualsiasi parte del db principale, le tabella si popolerà con tutti i
nomi dei controlli e ci fai quello che vuoi.
In pratica ho fatto il percorso inverso: ho aperto le maschere in modo
nascosto sfruttanto l'elenco di AllForms e poi ho elencato i controlli e
infine ho chiuso le Forms.
Mi interessava mostrare come si possano elencare anche le maschere chiuse
con AllForms ma si poteva benissimo aprire una query del genere evitando
gran parte del codice:
SELECT MSysObjects.Name
FROM MSysObjects
WHERE (((MSysObjects.Type)=-32768));
Ciao, Carlo


title: lista controlli form database esterno

text:

Valgono sempre le considerazioni di Carlo... vale a dire che puoi
accedere agli Oggetti solo se apri le Form... di cui come ti ha
suggerito Carlo puoi ottenere l'elenco con la stringa SQL sulla
Tabella di sistema.
A quel punto usi il metodo Docmd.OpenForm sull'Oggetto Application in
questione per aprire la Form ed a quel punto cicli gli Oggetti
interni.
@Alex


title: lista controlli form database esterno

text:

Funziona tutto, l'unica cosa che ho modificato (a parte gli ovvi
adattamenti ai miei db) è che le form le apro in modalità
Visualizzazione struttura (acDesign) perché se le maschere contengono
del codice in aprtura oppure gli si passa qualcosa in OpenArgs è
facile che si blocchi tutto.
E' una bella trovata quella del codice "cavallo di troia" che si trova
nel db remoto e lo si attiva da quello locale.
Sbizzarrendosi si potrebbe tale codice inserirlo in automatico in un
modulo del db remoto e poi cancellarlo al termine dell'operazione.
Ciao e grazie mille.
AleC


title: lista controlli form database esterno

text:

Si blocca tutto perchè nello sviluppo non hai previsto la possibilità
di non avere valorizzato il parametro... cosa che mi pare da valutare
in quanto se avessi un MDE saresti a piedi...
@Alex


title: lista controlli form database esterno

text:
"AleC" <
alessandr...@novameta.it
> ha scritto
cut
...
Funziona tutto, l'unica cosa che ho modificato (a parte gli ovvi
adattamenti ai miei db) è che le form le apro in modalità
Visualizzazione struttura (acDesign) perché se le maschere contengono
del codice in aprtura oppure gli si passa qualcosa in OpenArgs è
facile che si blocchi tutto.
----risposta------
Hai fatto bene. Ma occhio anche ai suggerimenti di Alex.
--------------
E' una bella trovata quella del codice "cavallo di troia" che si trova
nel db remoto e lo si attiva da quello locale.
Sbizzarrendosi si potrebbe tale codice inserirlo in automatico in un
modulo del db remoto e poi cancellarlo al termine dell'operazione.
------------risposta--------------
Tutto dipende da chi scrive il codice e dal tipo di database.
Se si tratta di un mde...puoi fare ben poco.
Poi non si tratta di un "cavallo di troia" ma di una vera e propria sinergia
e dialogo tra due db.
Una domanda: ma a cosa ti serve tutto sto ambaradan?
Ciao e grazie mille.
AleC
.................................
Prego.
Ciao, Carlo


title: lista controlli form database esterno

text:

> @Alex- Nascondi testo citato
>
> - Mostra testo citato -
La soluzione di Carlo funziona ma funziona anche quella di creare un
oggetto Access.Application
Sub provaautomazione()
Dim ctl As Access.Control
Dim frm As Variant
Dim appAccess As Object
Set appAccess = CreateObject("Access.Application")
appAccess.OpenCurrentDatabase "C:\miodb.mdb"
For Each frm In appAccess.CurrentProject.AllForms
  appAccess.DoCmd.OpenForm frm.Name, acDesign, , , , acHidden
  For Each ctl In appAccess.Forms(frm.Name).Controls
     Debug.Print ctl.Name
  Next
  appAccess.DoCmd.Close acForm, frm.Name
Next
Set frm = Nothing: Set ctl = Nothing: Set appAccess = Nothing
End Sub
L'unica variazione rispetto al tuo codice è che l'insieme AllForms
deve essere recuperato da un altro oggetto diverso da Application e le
maschere devono essere aperte in Visualizzazione struttura perché in
caso di codice che viene eseguito in apertura (o passaggio di valori
in OpenArgs) potrebbe bloccarsi tutto.
L'unica controindicazione che non so se ci siano dei rimedi è che
l'applicazione viene aperta con esecuzione di tutto il codice previsto
durante il suo normale avvio (opzioni di avvio, autoexec eccetera).
Grazie comunque
AleC


title: lista controlli form database esterno

text:

> @Alex- Nascondi testo citato
>
> - Mostra testo citato -
Di solito la prevedo :))))
Comunque per esempio un errore incontrato è stato quando in apertura
della maschera fa delle operazioni su una tabella che però non trova
perché la cerca sul db locale.
AleC


title: lista controlli form database esterno

text:
"AleC" <
alessandr...@novameta.it
> ha scritto
cut
L'unica variazione rispetto al tuo codice è che l'insieme AllForms
deve essere recuperato da un altro oggetto diverso da Application e le
...
 mi permetto un piccolo inserimento...
la differenza non è l'altro oggetto che è pure una differenza, ma sta nel
fatto che con AllForms puoi leggere il nome di tutte le maschere e non solo
di quelle aperte.
Prima avevi bisogno di trovare la maschera aperta per leggere il contenuto.
Ripeto, il codice ha una validità didattica e operativa anche perchè puoi
leggere l'elenco delle maschere in altro modo.
L'importante è che hai risolto.
Aspetto sempre di sapere a cosa ti serve tutto ciò.
Ciao, Carlo


title: lista controlli form database esterno

text:
> Una domanda: ma a cosa ti serve tutto sto ambaradan?
>
> Ciao e grazie mille.
>
> AleC
> .................................
>
> Prego.
>
> Ciao, Carlo
Poiché sto implementando un sistema di accessi a privilegi agli
applicativi che intenderei basato sull'abilitazione dei pulsanti di
ogni maschera a seconda dell'utente collegato.
Intendo centralizzare il database della sicurezza in modo da avere una
tabelle uniche degli utenti degli oggetti e dei privilegi. Mi piaceva
poter avere del codice che in maniera automatica potesse recuperare su
un db o su tanti o su tutti i pulsanti presenti in tutte le form.
AleC


title: lista controlli form database esterno

text:
>
> L'importante è che hai risolto.
> Aspetto sempre di sapere a cosa ti serve tutto ciò.
>
> Ciao, Carlo
Il motivo è postato sempre in questo thread in risposta alla tua prima
domanda.
Ciao
AleC


title: lista controlli form database esterno

text:
"AleC" <
alessandr...@novameta.it
> ha scritto nel messaggio
news:3dbb7074-8e89-493c...@m44g2000hsc.googlegroups.com...
>
> L'importante č che hai risolto.
> Aspetto sempre di sapere a cosa ti serve tutto ciň.
>
> Ciao, Carlo
Il motivo č postato sempre in questo thread in risposta alla tua prima
domanda.
Ciao
AleC
Sě ho visto.
Ciao, Carlo


title: runtime 2010

author: Xymôx

text:
Quando apro un applicativo compare sempre la finestra "Informazioni
sulla sicurezza per Microsoft Access", a questo punto devo
obbligatoriamente premere "Apri".
Nella versione runtime ï¿œ possibile fare in modo che non faccia piï¿œ
questa domanda?
grazie
--
ciao marco
www.marcosanti.it


title: runtime 2010

author: Ammammata

text:
=?ISO-8859-15?Q?Xym=F4x?= <marco...@togliQUESTOpeople.it> wrote in
news:97gfdr...@mid.individual.net
:
> Nella versione runtime � possibile fare in modo che non faccia pi�
> questa domanda?
>
post del 29 aprile
ACCESS 2010
Citazione da:
http://answers.microsoft.com/it-it/office/forum/office_2010-access/access-
2010-avvisi-di-protezione/fe6d4643-fd6c-e011-8dfc-68b599b31bf5
In Access 2010 il percorso della chiave �:
HKEY_CURRENT_USER\Software\Microsoft\Office\14.0\Access\Security
\Trusted Locations\NomeCheVuoiTu
al posto di NomeCheVuoiTu puoi mettere ad esempio il nome della
procedura che vai ad installare.
Il nome della chiave � Path e come valore devi inserire il percorso in
cui risiede il file di Access da aprire.
Il valore deve essere fisso (Es: "C:\MioProgramma") altrimenti non si
pu� utilizzare l'impostazione della chiave dalla creazione pacchetto
di Access 2010.
--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
-=- -=- -=- -=- -=- -=- -=- -=- - -=-
>>>>>
http://www.bb2002.it
 :)  <<<<<
........... [ al lavoro ] ...........


title: Formato dati in una funzione

author: Giacomo Smarrazzo

text:
In una funzione che esegue deversi calcoli, vorrei definire il formato di
memorizzazione dei dati (non di sola visualizzaizone). Mi servirebbero solo
due decimali.
Qualcuno puņ aiutarmi.
Giacomo


title: Formato dati in una funzione

author: Emyr

text:


vedi Karl
Function arrotondaeuro(varNr As Double, Optional varPl = 2) As Double
' by Konrad Marfurt + ? + Karl Donaubauer + Fanton Emanuele
'varNr: numero da arrotondare
'varPI: numero di decimali (due predefinito)
varNr = Nz(varNr, 0)
   arrotondaeuro = Fix("" & varNr * (10 ^ varPl) + Sgn(varNr) * 0.5) /
(10 ^ varPl)
End Function
Saluti.
Emanuele.


title: operazione su data...

author: norica

text:
Ho una data nel formato yyyyddmm per esempio 20041501
devo aggiungergli 1 anno e cambargli il giorno mettendolo a fine mese.
come fo ?!

--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: operazione su data...

author: Roberto dalla campagna

text:
"norica" <
nor...@libero.it
> ha scritto nel messaggio
news:81Z112Z191Z154Y...@usenet.libero.it...
> Ho una data nel formato yyyyddmm per esempio 20041501
> devo aggiungergli 1 anno e cambargli il giorno mettendolo a fine mese.
>
>
> come fo ?!
Quale č il tipo dato del campo o della variabile che contiene la data in un
formato cosě strano?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: form dove voglio io

author: il mago galbusera

text:
ciao
sto cercando di aprire delle form pop up sotto al mouse, ma senza grandi
risultati
con MouseMove e docmd.moveSize riesco a muovere la detta formpop in funzione
della posizione del mouse
peccato che mousemove mi fornisca le coordinate relative al controllo in
questione
come posso sapere il top e il left di una form ?
form.top e form.left non esistono! eppure il manuale dice il contrario.. ma
non riesco più a ripescare quella pagina..
mi sapete aiutare?
grazie ciao!


title: form dove voglio io

author: Alex

text:
"il mago galbusera" <galb...@katamail.com.INDOVINACOSADEVITOGLIERE>
wrote in message news:ajqh2l$sck$
1...@fe1.cs.interbusiness.it
> ciao
> [CUT]
> come posso sapere il top e il left di una form ?
> form.top e form.left non esistono! eppure il manuale dice il contrario.. ma
> non riesco più a ripescare quella pagina..
> mi sapete aiutare?
>
> grazie ciao!
Arrabattando tra le API...., trovi alcune Routine che ricavano le
coordinate reali della Form e la sua posizione all'interno della
risoluzione prevista....!
@Alessandro.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: form dove voglio io

text:
"il mago galbusera" <galb...@katamail.com.INDOVINACOSADEVITOGLIERE> ha
scritto nel messaggio news:ajqh2l$sck$1...@fe1.cs.interbusiness.it...

Questo il codice da copiare in un modulo pubblico:
Prevede che sia stata creata una maschera da aprire e (solo per esempio) si
chiama "TuaFormScelta":
Option Compare Database
Option Explicit
    Type POINTAPI
          X As Long
          y As Long
          End Type
      Global Const GWL_STYLE = (-16)
      Global Const WS_DLGFRAME = &H400000
      Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) _
           As Long
      Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" _
          (ByVal hwnd As Long, ByVal nIndex As Long) As Long
      Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" _
          (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong _
          As Long) As Long
Function ShowPopup()
         Dim coord As POINTAPI
         Dim attr&
         GetCursorPos coord
         DoCmd.OpenForm "TuaFormScelta"
         attr& = GetWindowLong(Forms![TuaFormScelta].hwnd, GWL_STYLE)
         attr& = SetWindowLong(Forms![TuaFormScelta].hwnd, GWL_STYLE, _
                    attr& And Not WS_DLGFRAME)
         DoCmd.MoveSize (coord.X * 14), (coord.y * 14), , 1100
         End Function
Questo un esempio che apre laform scelta al passaggio del mouse su di un
pulsante e la posiziona sotto il mouse:
Private Sub Pulsante3_MouseMove(Button As Integer, Shift As Integer, X As
Single, Y As Single)
        Call ShowPopup
End Sub
Ovviamente Call ShowPopup la puoi mettere in qualsiasi evento tu voglia, per
esempio su click dello sfondo.
Ciao, Carlo


title: form dove voglio io

text:
>
> Function ShowPopup()
>
>          Dim coord As POINTAPI
>          Dim attr&
>          GetCursorPos coord
>          DoCmd.OpenForm "TuaFormScelta"
>          attr& = GetWindowLong(Forms![TuaFormScelta].hwnd, GWL_STYLE)
>          attr& = SetWindowLong(Forms![TuaFormScelta].hwnd, GWL_STYLE, _
>                     attr& And Not WS_DLGFRAME)
>          DoCmd.MoveSize (coord.X * 14), (coord.y * 14), , 1100
>          End Function
>
wow!
era esattamente quello che mi serviva.. grazie mille :)
Volevo chiedere una cosa:
Dim attr&
^^^^^^^^^
che significa quella "&" ? è un puntatore?
nell'help in linea che ho io (che non funziona troppo bene.. mi mancano un
sacco di pagine e non so come mai come già notificato in un altro post) non
c'è nulla a riguardo
e cmq a che servono le funzioni GET e SET WindowLong a che servono?
Dove posso trovare della documentazione per "Arrabattanrmi tra le API" sotto
access?
grazie mille


title: form dove voglio io

text:
"il mago galbusera" <galb...@katamail.com.INDOVINACOSADEVITOGLIERE> ha
scritto nel messaggio news:ajquq2$sto$1...@fe2.cs.interbusiness.it...
>
> Volevo chiedere una cosa:
>
> Dim attr&
> ^^^^^^^^^
> che significa quella "&" ? è un puntatore?
>
> nell'help in linea che ho io (che non funziona troppo bene.. mi mancano un
> sacco di pagine e non so come mai come già notificato in un altro post)
non
> c'è nulla a riguardo
>
> e cmq a che servono le funzioni GET e SET WindowLong a che servono?
>
>
> Dove posso trovare della documentazione per "Arrabattanrmi tra le API"
sotto
> access?
>
> grazie mille
>
>
Charles Simonyi è un programmatore ungherese della Microsoft. Questo
illustre Conosciuto si è inventato la "Notazione Ungherese" che è un insieme
di prefissi o paroline chiave che indicano, per esempio, un tipo di
variabile.
Per esempio % indica un integer, & indica un long, $ indica una variabile di
tipo stringa.
Il tutto serve per velocizzare la scrittura del codice.
Per un elenco completo ti rimando ad un buon libro sulle API come Visual
Basic Win32 API - guida del programmatore -
Intanto comuncia a linkare questo sito:
http://www.marcominerva.com/vbcorner/whatsapi.htm
GetWindowsLong e SetWindowLong rispettivamente ottengono e settano dei
parametri nella struttura di maschere o finestre.
Ciao, Carlo


title: form dove voglio io

author: Maurizio Borrelli

text:
> "Carlo Costarella" [...]:
> Charles Simonyi č un programmatore ungherese della Microsoft. Questo
> illustre Conosciuto si č inventato la "Notazione Ungherese" che č un
> insieme
> di prefissi o paroline chiave che indicano, per esempio, un tipo di
> variabile.
> Per esempio % indica un integer, & indica un long, $ indica una variabile
> di tipo stringa.
> Il tutto serve per velocizzare la scrittura del codice.
[...]
    Scusa il disturbo ma c'e' qualcosa che non quadra: in BASIC tipizzare le
variabili mediante un carattere qualificatore non e' una convenzione ma un
elemento della sintassi. Facoltativo in Visual Basic, che conserva questa
possibilita' per compatibilita verso il basso.
    La Notazione Ungherese invece e' una convenzione di scrittura del
codice. Non obbligatoria, quindi, e non facente parte della sintassi del
linguaggio. Vedi per esempio, per Visual Basic:

http://makeashorterlink.com/?O31C23F81
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------


title: form dove voglio io

text:
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:ajs4os$1dsput$1...@ID-52090.news.dfncis.de...
>     Scusa il disturbo ma c'e' qualcosa che non quadra: in BASIC tipizzare
le
> variabili mediante un carattere qualificatore non e' una convenzione ma un
> elemento della sintassi. Facoltativo in Visual Basic, che conserva questa
> possibilita' per compatibilita verso il basso.
>
>     La Notazione Ungherese invece e' una convenzione di scrittura del
> codice. Non obbligatoria, quindi, e non facente parte della sintassi del
> linguaggio. Vedi per esempio, per Visual Basic:
>
>
http://makeashorterlink.com/?O31C23F81
>
> --
> Ciao.
> Maurizio
Quello che dici è solo in parte vero. Infatti alcune paroline aggiunte alla
variabili, come & $ %, sono state adottate dai programmatori di VB proprio
per ricalcare lo stile della notazione ungherese che era precedente.
Se oggi vuoi spiegare il significato dei caratteri speciali, per specificare
il tipo di variabile, devi ricorrere alla notazione ungherese che
all'origine del tipo di programmazione.
Questo è stato chiesto...
Ciao, Carlo


title: form dove voglio io

text:
> "Carlo Costarella" [...]:
> > "Maurizio Borrelli" [...]:
> >     Scusa il disturbo ma c'e' qualcosa che non quadra: in BASIC
> > tipizzare le
> > variabili mediante un carattere qualificatore non e' una convenzione ma
> > un
> > elemento della sintassi. Facoltativo in Visual Basic, che conserva
> > questa
> > possibilita' per compatibilita verso il basso.
> >     La Notazione Ungherese invece e' una convenzione di scrittura del
> > codice. Non obbligatoria, quindi, e non facente parte della sintassi del
> > linguaggio. Vedi per esempio, per Visual Basic:
> >
http://makeashorterlink.com/?O31C23F81
> Quello che dici è solo in parte vero. Infatti alcune paroline aggiunte
> alla
> variabili, come & $ %, sono state adottate dai programmatori di VB proprio
> per ricalcare lo stile della notazione ungherese che era precedente.
> Se oggi vuoi spiegare il significato dei caratteri speciali, per
> specificare
> il tipo di variabile, devi ricorrere alla notazione ungherese che
> all'origine del tipo di programmazione.
> Questo è stato chiesto...
    Scusa se insisto ma siccome non sono d'accordo con te mi sembra piu'
corretto dirsele certe cose che lasciar perdere, visto che sono alla base
del linguaggio che usiamo in questo ng.
    Era stato chiesto:
"Dim attr&
^^^^^^^^^
che significa quella "&" ? è un puntatore?"
    Secondo me l'unica risposta possibile e' nella guida in linea di Access:
**************************************************************
Tipo di dati Long
Le variabili di tipo Long (a intero lungo) sono memorizzate come numeri con
segno a 32 bit (4 byte) compresi nell'intervallo fra -2.147.483.648 e
2.147.483.647. Il carattere di dichiarazione del tipo per Long è la "e"
commerciale (&).
**************************************************************
    Dici anche che i caratteri di dichiarazione del tipo sono stati adottati
dai programmatori di VB per ricalcare lo stile della notazione ungherese.
Ma, ammesso sia vero questo, e se e' vero spero che almeno uno di questi
tizi si faccia vivo, allora questi signori semplicemente si sbagliano,
perche' non siamo nell'ambito della "notazione", ne' ungherese ne'
ostrogota, ma del puro e semplice uso di un elemento facoltativo della
sintassi del linguaggio. Come usare o non usare Let. O Call. Quali che siano
le motivazioni addotte.



title: form dove voglio io

text:
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:ajt2b6$1e0mgd$1...@ID-52090.news.dfncis.de...
> "Dim attr&
> ^^^^^^^^^
> che significa quella "&" ? è un puntatore?"
>
>     Secondo me l'unica risposta possibile e' nella guida in linea di
Access:
ops.. dopo questa magra figura vado a nascondermi.. :)
>
> **************************************************************
> Tipo di dati Long
>
> Le variabili di tipo Long (a intero lungo) sono memorizzate come numeri
con
> segno a 32 bit (4 byte) compresi nell'intervallo fra -2.147.483.648 e
> 2.147.483.647. Il carattere di dichiarazione del tipo per Long è la "e"
> commerciale (&).
> **************************************************************
sarà..
però se non so che & significa "as long" come faccio a leggerlo sulla guida?
devo leggermi tutta la guida per scoprire che si parlava di un rifermiento a
long?
nota: dalla "ricerca libera" digitando  "&" ottengo solo dei link
al'operatore di concatenazione
mentre dalla "ricerca per indice" la "&" non è menzionata..
>     Dici anche che i caratteri di dichiarazione del tipo sono stati
adottati
> dai programmatori di VB per ricalcare lo stile della notazione ungherese.
> Ma, ammesso sia vero questo, e se e' vero spero che almeno uno di questi
> tizi si faccia vivo, allora questi signori semplicemente si sbagliano,
> perche' non siamo nell'ambito della "notazione", ne' ungherese ne'
> ostrogota, ma del puro e semplice uso di un elemento facoltativo della
> sintassi del linguaggio. Come usare o non usare Let. O Call. Quali che
siano
> le motivazioni addotte.
bha.. per quanto ne so io la notazione ungherese era fatta di prefissi (e
non postfissi come la & nel caso che mi ha indicato carlo) e funzionava
grossomodo così:
intVar per una variabile intera
sVar per una stringa
chVar per un char
e così via
in ogni caso era un qualcosa di cui avevo sentito solo parlare, ma non ne
avevo mai fatto uso.. voi la usate?
io la uso (se "uso" è la parola corretta) solo per i controlli delle form
che non contengono campi
es
tbRicerca per una textbox dove inserire il testo di una ricerca
lstArticoli per una list box di articoli in elenco
saluti
Galbusera


title: form dove voglio io

text:
> "il mago galbusera" [...]:
> > "Maurizio Borrelli" [...]:
> > **************************************************************
> > Tipo di dati Long
[...]
> > Il carattere di dichiarazione del tipo per Long è la "e"
> > commerciale (&).
> > **************************************************************
> sarà..
> però se non so che & significa "as long" come faccio a leggerlo sulla
> guida?
> devo leggermi tutta la guida per scoprire che si parlava di un rifermiento
> a long?
> nota: dalla "ricerca libera" digitando  "&" ottengo solo dei link
> al'operatore di concatenazione
> mentre dalla "ricerca per indice" la "&" non è menzionata..
    Noto, noto... Ma... Perdindirindina!... Ammettilo, ti prego, altrimenti
vado in depressione: quelle pagine non dovrebbero mai essere ricercate, ne'
per indice ne' per medio ne' per alluce. Perche', da un certo punto in poi
della nostra esistenza "Accessoria", dovrebbero essere semplicemente *gia'
state lette*. E scolpite nel DNA. Parliamo dei tipi delle variabili, dei
mattoncini primigenii di qualsiasi linguaggio di programmazione, m'intendi?
Sta scritto: la casa costruita sulla sabbia...
[...]
> bha.. per quanto ne so io la notazione ungherese era fatta di prefissi (e
> non postfissi come la & nel caso che mi ha indicato carlo) e funzionava
> grossomodo così:
> intVar per una variabile intera
> sVar per una stringa
> chVar per un char
> e così via
    E' come la so anch'io.
> in ogni caso era un qualcosa di cui avevo sentito solo parlare, ma non ne
> avevo mai fatto uso.. voi la usate?
    Io si', ne faccio uso smodato.
> io la uso (se "uso" è la parola corretta) solo per i controlli delle form
> che non contengono campi
> es
> tbRicerca per una textbox dove inserire il testo di una ricerca
> lstArticoli per una list box di articoli in elenco
--



title: form dove voglio io

text:
Maurizio Borrelli wrote:
>
>     Noto, noto... Ma... Perdindirindina!... Ammettilo, ti prego,
>     altrimenti
> vado in depressione: quelle pagine non dovrebbero mai essere ricercate,
> ne' per indice ne' per medio ne' per alluce. Perche', da un certo punto in
> poi della nostra esistenza "Accessoria", dovrebbero essere semplicemente
> *gia' state lette*. E scolpite nel DNA. Parliamo dei tipi delle variabili,
> dei mattoncini primigenii di qualsiasi linguaggio di programmazione,
> m'intendi? Sta scritto: la casa costruita sulla sabbia...
hai perfettamente ragione
però concedimi che ci sono cose assodate e che non ci possiamo permettere il
lusso di rileggerle per il solo gusto di farlo. almeno con me il tempo è
sempre tiranno! Ne è passata di acqua sotto i ponti da quando programmavo
il mio primo C64 per gestire tramite la sua porta una serie di luci e
motorini passo-passo per rallegrare i miei festini! ne ho passati di
manuali e linguaggi, e se ogni volta avessi dovuto soffermarmi più di un
attimo sul concetto di variabile, sua definizione etc.. bhe.. forse starei
ancora ad usare il turbo pascal 7!
[ora vado un po ot]
a volte penso a come si sia sviluppato il mestiere di programmatore in
questi ultimi anni. Non ho visto tutto, ma nei miei 25 anni o visto nascere
varie tecnologie dalla oop al java, dal web al rad, dai linguaggi di
scripting alle varie shell.. e tutto questo sta crescendo e maturando con
una ovvia velocità esponenziale. E questi sono gli anni in cui un persona
normale (cioè che ha ancora una vita solciale oltre che professionale) non
può fisicamente seguire con l'attenzione che merita ogni argomento. Allora
tocca fare delle scelte, ma io non sono mai stato bravo a fare scelte, sono
sempre stato capriccioso ed arrogante, ho voluto sempre tutto. Il risultato
è questo: so un po' di tutto e non sono un esperto in niente
Se mi è quindi concesso, un consiglio a chi più giovane di me sta leggendo
queste righe, bhe forse è meglio chiarirsi un po' le idee prima, magari
parlandone OT anche sui ng, per avere qualche consiglio e concentrarsi su
quei pochi ma decisivi argomenti
Ricordo che una volta, all'università, durante un corso di fisica
quantistica il prof mi disse: ".. ormai gli esperimenti portano via anni, è
finità l'era degli esperimenti di galileo che duravano al più qualche ora,
adesso, finiti gli studi, un ricercatore neolaureato in fisica comincia a
lavorare ad un eseprimento assegnatogli dall'università, se gli va bene
avrà fama e successo, se gli va male, quando se ne accorge, è troppo
vecchio per rientrare le giro e si è giocato la carriera."
Ecco è estattamente quello che sta succedendo a chi lavora a stretto
contatto con l'informatica
mamma mia.. rileggendo mi sembra un po' pessimistica, ma non importa, adesos
vi saluto: ho un bel " Advanced Bash Scripting Guide, an in-depth
exploration of the art of shell scripting" da leggere
--
****************************************
saluti
Il mago galbusera


title: form dove voglio io

text:
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:ajt2b6$1e0mgd$1...@ID-52090.news.dfncis.de...

Caro Maurizio, ecco quello che dice Daniel Appleman (che sono sicuro
conosci) riguardo al nostro dire:
Many Visual Basic programmers have adopted the Hungarian notation style over
the traditional Basic typing which consists of adding a special character
after the variable name (for example, % indicates an integer, & indicates a
long, $ indicates a string, and so forth). You will find that the code
samples in this book tend to use the traditional Basic type characters
instead of Hungarian notation.
Non sempre le proprie "convinzioni" sono completamente corrette. Se poi
pensi che elemnti del calibro di Daniel Appleman possano saperne meno di me
o di te, "semplicemente ti sbagli".
Ciao, Carlo


title: form dove voglio io

text:
> "Carlo Costarella" [...]:
> > "Maurizio Borrelli" [...]:
> Caro Maurizio, ecco quello che dice Daniel Appleman (che sono sicuro
> conosci) riguardo al nostro dire:
> Many Visual Basic programmers have adopted the Hungarian notation style
over
> the traditional Basic typing which consists of adding a special character
> after the variable name (for example, % indicates an integer, & indicates
a
> long, $ indicates a string, and so forth). You will find that the code
> samples in this book tend to use the traditional Basic type characters
> instead of Hungarian notation.
> Non sempre le proprie "convinzioni" sono completamente corrette. Se poi
> pensi che elemnti del calibro di Daniel Appleman possano saperne meno di
me
> o di te, "semplicemente ti sbagli".
    Carissimo Carlo. A me non piace fare polemica ma sostenere le mie giuste
convinzioni. Quelle cioe' che ritengo giuste. E se capisco di aver sbagliato
lo ammetto e se lo ritengo il caso mi scuso anche. Tu sei capace di fare
altrettanto? Vedremo. Perche', caspiterina, mi stai proprio tirando per i
capelli!...
    Sai cosa c'e' scritto, secondo me, nella tua citazione? Traduco come
posso:
"Molti programmatori Visual Basic hanno adottato lo stile della Notazione
ungherese *in luogo* *al posto* *invece* della tradizionale tipizzazione del
Basic che consiste nell'aggiungere caratteri speciali dopo i nomi delle
variabili (per esempio, % indica un integer, & indica un long, $ indica uno
string, e cosi' via) Troverete che nel codice degli esempi di questo libro
si preferisce l'uso dei caratteri di tipo tradizionali del Basic invece
della Notazione ungherese."
    Che facciamo? Ci spostiamo su it.cultura.linguistica.inglese?
    ;-)



title: form dove voglio io

text:
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:ajvh2t$1efu57$1...@ID-52090.news.dfncis.de...

Hai ragione.
Ciao, Carlo


title: form dove voglio io

text:
> "Carlo Costarella" [...]:
> > "Maurizio Borrelli" [...]:
> > se capisco di aver sbagliato lo ammetto
[...]
> > Tu sei capace di fare altrettanto? Vedremo.
[...]
> Hai ragione.
    Perdonami ma a casa mia la ragione si da' ai fessi. Devo dedurre che non
sei capace di ammettere di aver sbagliato oppure ho interpretato male le tue
intenzioni?



title: form dove voglio io

text:
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:ajvqmb$1eic7g$1...@ID-52090.news.dfncis.de...

Ciao Maurizio, sarò più chiaro.
Hai ragione perchè non sono stato preciso nella definizione.
Ecco quello che scriverei oggi, dovendo rispondere alla stessa domanda.
L'unico modo per spiegare cosa significa "Dim attr&" (almeno l'unico modo
che mi viene in mente), è quello della Notazione Ungherese.
E' a questa che si rifà la LOGICA o lo STILE di usare prefissi, suffissi o
caratteri speciali per identificare tipi, oggetti ecc.
Ovviamente il tutto serve a velocizzare la comprensione e/o la stesura del
codice: dire Dim Attr as Long è più lungo di Dim attr&
Dire Call, Left, If...Then...Else, o meglio spiegare il perchè di questi
termini risulta più facile con la traduzione letterale dei termini.
Spiegare IL PERCHE' di Dim attr& e del perché si sia usato questo carattere
speciale per specificare un tipo di dati Long, è meno agevole della
traduzione letterale dei termini stessi.
"&" in VBA congiunge, concatena, somma. Se si cerca "&" nella guida non
trovi una risposta alla domanda, almeno non la trovi agevolmente.
Quando si adottò la parola "gravità" nessuno pensò che fino a quel momento
la gravità era inesistente: semplicemente si usò la "nuova" parola per
spiegare anche fenomeni precedenti alla definizione. Ecco perchè questa
spiegazione risulta più comprensibile se ci si rifà alla notazione
ungherese.
Ciao, Carlo


title: form dove voglio io

text:
> "Carlo Costarella" [...]:
> sarò più chiaro.
> Hai ragione perchè non sono stato preciso nella definizione.
> Ecco quello che scriverei oggi, dovendo rispondere alla stessa domanda.
> L'unico modo per spiegare cosa significa "Dim attr&" (almeno l'unico modo
> che mi viene in mente), è quello della Notazione Ungherese.
    E no, dai! Questa affermazione e' propriamente un errore concettuale
oltre che storico. Sembra che tu nemmeno sappia cosa sia un interprete BASIC
e come funzioni. Possibile? O lo fai apposta per farmi soffrire?
> E' a questa che si rifà la LOGICA o lo STILE di usare prefissi, suffissi o
> caratteri speciali per identificare tipi, oggetti ecc.
> Ovviamente il tutto serve a velocizzare la comprensione e/o la stesura del
> codice: dire Dim Attr as Long è più lungo di Dim attr&
> Dire Call, Left, If...Then...Else, o meglio spiegare il perchè di questi
> termini risulta più facile con la traduzione letterale dei termini.
> Spiegare IL PERCHE' di Dim attr& e del perché si sia usato questo
> carattere
> speciale per specificare un tipo di dati Long, è meno agevole della
> traduzione letterale dei termini stessi.
> "&" in VBA congiunge, concatena, somma. Se si cerca "&" nella guida non
> trovi una risposta alla domanda, almeno non la trovi agevolmente.
> Quando si adottò la parola "gravità" nessuno pensò che fino a quel momento
> la gravità era inesistente: semplicemente si usò la "nuova" parola per
> spiegare anche fenomeni precedenti alla definizione. Ecco perchè questa
> spiegazione risulta più comprensibile se ci si rifà alla notazione
> ungherese.
    Ok, questa e' la tua opinione.
    Ora dico un'altra cosa sola poi direi di chiudere qui. Almeno io chiudo,
perche' mi sembra che ci stiamo avvitando.
    Queste le informazioni che con una rapidissima spazzolata della rete
sono riuscito a trovare:
    Charles Simonyi, il padre della Notazione ungherese, e' nato a Budapest
nel 1948.
    La data di nascita piu' accreditata di tale notazione pare essere il
1972 ma la sua ufficializzazione dovrebbe risalire al 1981, quando fu
adottata in Microsoft.
    Come vedi parliamo di una data successiva, e di molto, a quelle di
nascita dei vari dialetti BASIC che gia' usavano la tipizzazione a
carattere. Ma questo non ti convince per via della tua "gravita'".
    Secondo me dovrebbe pero' convincerti il fatto che una cosa e' una
notazione, ovvero uno stile di scrittura, e altra cosa e' la *necessita'
tecnica* degli interpreti del linguaggio, la necessita' cioe' di informare
l'interprete riguardo come dovra' trattare le variabili. E tale sintassi,
(sintassi, non notazione!) e' stata mantenuta in Visual Basic per
compatibilita' proprio con quegli antichi dialetti BASIC.
    ZX80 o C64 ti dicono niente?
    Chiudo.



title: form dove voglio io

text:
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:ak0579$1ekve2$1...@ID-52090.news.dfncis.de...
...
Cut
>     Chiudo.
>
> --
> Ciao.
> Maurizio
> --------
> ?SPQR(C)
>  X
> --------
Anch'io.
Ciao, Carlo


title: Report:Non visualizzare dati uguali a zero

author: Luca

text:
Salve a tutti,
ho un report con otto valori numerici associati ad ogni persona ma spesso
gli ultime cinque o sei sono uguali a zero quindi vorrei che il report non
li visualizzasse riducendo lo spazio occupato, è possibile?
Grazie mille per ogni suggerimento.


author: VedoTondo

text:
"Luca" <
thech...@hotmail.com
> ha scritto nel messaggio
news:452b6...@x-privat.org...

Con la mia logica elementare ti direi che non vedo il motivo di tale
sviluppo, al limite potresti filtrare tramite una query i dati della
maschera e poi mandare in stampa i dati filtrati.
Saluti Andrea


text:
Luca ha scritto:

Ciao, ho poca esperienza con access ma secondo potrebbe funzionare
inserendo nella query, nel campo criteri della colonna che mostra i
dati uguali a zero,  la funzione Not Is Null.
Ciao


author: PBsoft

text:
> ho un report con otto valori numerici associati ad ogni persona ma
> spesso gli ultime cinque o sei sono uguali a zero quindi vorrei che
> il report non li visualizzasse riducendo lo spazio occupato,
> è possibile?
Il suggerimento che ti è stato dato relativamente alla modifica dell'origine
dati del report non fa al caso tuo perché tu non dovresti filtrare sui record,
bensì sulle colonne, ma quest'ultime non possono essere variabili all'interno
dello stesso recordset, quindi nisba.
Quello che vuoi ottenere è fattibile, ma dipende molto da come hai disposto
gli 8 controlli nel corpo del report.
Cerco di spiegarmi: se li hai messi uno sotto l'altro, allora puoi anche
impostare il corpo del report come "espandibile" e "riducibile", quindi,
tramite codice, sfrutti l'evento Detail_Format per impostare a Visible=False
i controlli la cui origine dati è zero.
Comunque, bisogna che tu faccia delle prove prima di poter dire di avere
risolto.
Se, invece, hai distribuito gli 8 controlli in orizzontale, all'interno del
report (cosa che mi aspetto più probabile), non puoi giocare sull'espandibilità/riducibilità
orizzontale del report (non esiste); puoi solo, sempre tramite codice, fare
in modo che non sia visualizzato il valore "0" con la stessa tecnica che
ho riportato poco sopra.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution


title: Ultimo giorno del mese

author: Claudio Aleotti

text:
Domandina facile facile,, (credo)
Avendo come dati il mese e l'anno e' possibile ottenere senza troppi calcoli
( funzione di Access )
l'ultimo giorno del mese/anno ( Considerando naturalmente le date del
calendario ...bisestile ec...)
Grazie per la collaborazione.
Claudio.


title: Ultimo giorno del mese

author: RoDAgo

text:
Claudio Aleotti scrisse...

Ciao Claudio, questa che trovi anche nell'help di  Access, funzia sempre:
Public Function GiorniMese(Una_Data As Date)
'   Restituisce in base ad una qualsiasi data, l'ultimo giorno del mese
corrispondente alla data.
'   Ex:  Una_Data = 04/03/99 restituisce 31/03/99
'        Una_Data = 16/02/99 restituisce 28/02/99
    GiorniMese = DateDiff("d", Una_Data, DateAdd("m", 1, Una_Data)) & "/" &
DatePart("m", Una_Data) & "/" & DatePart("yyyy", Una_Data)
End Function
Ciao RoDAgo


title: Ultimo giorno del mese

author: Dani

text:
Claudio Aleotti <
c.al...@esedra.it
> wrote in message
tFur4.13817$317.1...@news.infostrada.it...
> Domandina facile facile,, (credo)
>
> Avendo come dati il mese e l'anno e' possibile ottenere senza troppi
calcoli
> ( funzione di Access )
> l'ultimo giorno del mese/anno ( Considerando naturalmente le date del
> calendario ...bisestile ec...)
>
> Grazie per la collaborazione.
>
> Claudio.
 Prova dando in pasto alla funzione la tua data.
Function FineMese(ByVal data As Date) As Variant
   FineMese = DateSerial(Year(data), Month(data) + 1, Day(data) - 1)
End Function
Ciao Daniela


title: Ultimo giorno del mese

author: Lorenzo Coronati

text:
Scrisse "Dani" <
daniela....@tin.it
>:
>   FineMese = DateSerial(Year(data), Month(data) + 1, Day(data) - 1)
Forse volevi dire:
FineMese = DateSerial(Year(data), Month(data) + 1, 1) - 1
Benvenuta su icaa ;-)
--
Lorenzo Coronati
--
<<Nessuno sa che questa affermazione e' vera>>
(John D. Barrow)
--


title: Ultimo giorno del mese

author: Maurizio Spada

text:
Claudio Aleotti <
c.al...@esedra.it
> wrote in message
tFur4.13817$317.1...@news.infostrada.it...
> Domandina facile facile,, (credo)
>
Bastava telefonarmi... :-)
===============
Maurizio Spada
m.s...@esedra.it
Bergamo - Italy
===============


title: Guida in linea per un programma.

author: Alex De Rossi

text:
Ciao a tutti,
mi piacerebbe sapere che cosa utilizzate voi come guida in linea per i
programmi che create per i vs clienti.
Io normalmente allego nella cartella del programma un file htm in quanto
trovo un pò ostico Html Help Workshop o Microsoft Help Workshop  ,
soprattutto perché non sono un perfetto traduttore di inglese, anche se
penso che forse siano gli elementi più adatti per associare un file guida ad
una form o all' intero applicativo.
Grazie a chi mi consiglia.
Ale


title: Guida in linea per un programma.

text:
"Alex De Rossi" <omis...@SPAMlibero.it> ha scritto nel messaggio
news:M5%fa.47807$Lr4.1...@twister2.libero.it...

cerca su internet HELPBreeze


title: Guida in linea per un programma.

text:
> cerca su internet HELPBreeze
>
>
Grazie !
Ho trovato anche qualcosa di interessante qua:
http://members.tripod.com/Giorgio_Bernardi/rubriche/guida/lez_guida0.htm


title: ACCESS PORTA SERIALE ASINCRONA

author: Mimmo

text:
Ho il problema di comunicare con uno strumento che usa la posta
seriale in modalità Asincrona half duplex.
Il programma si deve occupare di inviare delle richieste di
elaborazione allo strumento e lo strumento risponde con un ack.
Completata la fase di caricamento lo strumento inizia l'elaborazione,
alla fine inizia un flusso di ritorno dei risultati al pc.
Ho il problema che la documentazione sulla comunicazione asincrona con
porte seriali in access non se ne trova.
Avrei bisogno di qualcuno che ha già avuto esperienza simili.
CIao e grazie,
Mimmo


title: ACCESS PORTA SERIALE ASINCRONA

author: Cinzia

text:
"Mimmo" <
dnav...@gmail.com
> ha scritto nel messaggio
news:a604f8a9-95a5-4d20...@25g2000prz.googlegroups.com...



CIao e grazie,
Mimmo
>>>>>>>>>>>>>RISPOSTA
Ciao mimmo,
non so se hai già dato un'occhiata qui e se ti può essere utile
http://www.riolab.org/viewrisorsa.asp?id=53
--
Cinzia [Office Access MVP]
_______________________

www.riolab.org
http://accessdaziacin.live.spaces.com
----------------------------------------


title: ACCESS PORTA SERIALE ASINCRONA

text:
On 9 Ott, 13:26, "Cinzia" <
cinziapagani-no-spam_ple...@tiscali.it
>
wrote:
> "Mimmo" <
dnava...@gmail.com
> ha scritto nel messaggionews:a604f8a9-95a5-4d20...@25g2000prz.googlegroups.com...
> Ho il problema di comunicare con uno strumento che usa la posta
> seriale in modalità Asincrona half duplex.
> Il programma si deve occupare di inviare delle richieste di
> elaborazione allo strumento e lo strumento risponde con un ack.
> Completata la fase di caricamento lo strumento inizia l'elaborazione,
> alla fine inizia un flusso di ritorno dei risultati al pc.
>
> Ho il problema che la documentazione sulla comunicazione asincrona con
> porte seriali in access non se ne trova.
>
> Avrei bisogno di qualcuno che ha già avuto esperienza simili.
>
> CIao e grazie,
> Mimmo>>>>>>>>>>>>>RISPOSTA
>
> Ciao mimmo,
> non so se hai già dato un'occhiata qui e se ti può essere utilehttp://
www.riolab.org/viewrisorsa.asp?id=53
>
> --
> Cinzia [Office Access MVP]
> _______________________
>          www.riolab.orghttp://
accessdaziacin.live.spaces.com
> ----------------------------------------
Grazie, purtroppo ero partito proprio da quel sito per le mie prove.
Tutta l'applicazione e l'esempio si basano su comunicazioni sincrone.


title: relazioni: on delete set null

author: mac

text:
ciao
ho una tabella clienti e una tipoClienti
ovviamente ogni cliente ha il campo TipoCliente collegato alla tabella
tipoClienti
Se cancello un record di TipoClienti vorrei che si impostasse a NULL il
campo TipoCliente del cliente. Mi sembra una necessita' corretta la mia.
Non ho trovato come fare nella gestione delle relazioni di access!
Se imposto l'integrita' referenziale mi impedisce di cancellare un
tipocliente perche ci sono dei clienti correlati.
Come fare?
grazie


title: relazioni: on delete set null

author: Alessandro Baraldi

text:
"mac" <
as...@adad.com
> wrote in message
news:4354f77f$0$29545$
4faf...@reader1.news.tin.it
> ciao
>
> ho una tabella clienti e una tipoClienti
> ovviamente ogni cliente ha il campo TipoCliente collegato alla tabella
> tipoClienti
>
[CUT]
>.....perche ci sono dei clienti correlati.
>
> Come fare?
>
> grazie
Hai settato il FLAG Cancella Record Correlati...??
Solitamente non è preferibile cancellare, o non sempre
è una scelta felice, ma si opta per usare un Campo CANCELLATO
di tipo FLAG Si/No che consente la selezione.
@ALex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: relazioni: on delete set null

text:
>
>
> Hai settato il FLAG Cancella Record Correlati...??
> Solitamente non è preferibile cancellare, o non sempre
> è una scelta felice, ma si opta per usare un Campo CANCELLATO
> di tipo FLAG Si/No che consente la selezione.
>
> @ALex
>
>
ciao Alex
come dici tu, se metto il flag "Cancella Record Correlati" e cancello
una categoria di clienti...vengono cancellati tutti i clienti di quel
tipo , quindi e' una cosa che non desidero fare
Non e' possibile fare in modo che se cancello una categoria, tutti i
clienti di quella categoria assumano il valore NULL sul campo
TIPOCLIENTE ??? che sarebbe la cosa piu' corretta anche a livello di
concetto !!
grazie davvero


title: relazioni: on delete set null

text:
"mac" <
as...@adad.com
> wrote in message
news:4355703e$0$29556$
4faf...@reader1.news.tin.it
[CUT]
> come dici tu, se metto il flag "Cancella Record Correlati" e cancello
> una categoria di clienti...vengono cancellati tutti i clienti di quel
> tipo , quindi e' una cosa che non desidero fare
>
> Non e' possibile fare in modo che se cancello una categoria, tutti i
> clienti di quella categoria assumano il valore NULL sul campo
> TIPOCLIENTE ??? che sarebbe la cosa piu' corretta anche a livello di
> concetto !!
>
> grazie davvero
In automatico direi che non è fattibile, o meglio devi intercettare
il DELETE della categoria, e questo è semplice visto che
lo fà l'operatore.
A quel punto fai una Query UPDATE:
UPDATE NomeTabella
SET NomeCampo=Null
WHERE NomeCategoria='TuaCategoria'
Continuo ad insistere perchè invece di metterli a NULL tu
valuti l'uso del campo FLAG, anche metterli a NULL non serve
a NULL...!
@Alex



title: relazioni: on delete set null

author: Sergio MAZZA

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio news:07148a55c16f01811a...@mygate.mailgate.org...
---omissis---
> Continuo ad insistere perchè invece di metterli a NULL tu
> valuti l'uso del campo FLAG, anche metterli a NULL non serve
> a NULL...!
Comico, pure!
> @Alex
Ciao.
--
Sergio MAZZA


title: relazioni: on delete set null

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> wrote in message
news:dj50q3$5rg$
1...@area.cu.mi.it
[CUT]
> Comico, pure!
>
Mi sono sbizzarrito in una nuova performance, che
ne dici potrei avere un futuro come Presidente del "Coniglio" ?
>
> Ciao.



title: relazioni: on delete set null

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio news:1b49d04f3448330021...@mygate.mailgate.org...
>
> Mi sono sbizzarrito in una nuova performance, che
> ne dici potrei avere un futuro come Presidente del "Coniglio" ?
Hi! Hi!
...Nella "casa del pollame"?



title: relazioni: on delete set null

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> wrote in message
news:dj545d$bkk$
1...@area.cu.mi.it

Con l'influenza aviaria in giro non è una bella domanda
da fare...!
;-)



title: relazioni: on delete set null

text:
Alessandro Baraldi ha scritto:
>
> In automatico direi che non è fattibile, o meglio devi intercettare
> il DELETE della categoria, e questo è semplice visto che
> lo fà l'operatore.
> A quel punto fai una Query UPDATE:
>
> UPDATE NomeTabella
> SET NomeCampo=Null
> WHERE NomeCategoria='TuaCategoria'
>
> Continuo ad insistere perchè invece di metterli a NULL tu
> valuti l'uso del campo FLAG, anche metterli a NULL non serve
> a NULL...!
>
> @Alex
>
>
grazie alex, pero' insisto anche io :)
mettere a null una chiave esterna che non punta piu' a nessun record e'
concettualmente corretto, mentre se metto un FLAG 'cancellato' come
proponi tu uso un CAMPO aggiuntivo (spreco di dati superflui) e in piu'
ho delle chiavi esterne che non puntano a nulla.
sbaglio?
ciao e grazie della disponibilita'


title: relazioni: on delete set null

text:
"mac" <
as...@adad.com
> wrote in message
news:4357e049$0$13350$
4faf...@reader2.news.tin.it
[CUT]
> grazie alex, pero' insisto anche io :)
Beh ognuno ha diritto di farlo.

> mettere a null una chiave esterna che non punta piu' a nessun record e'
> concettualmente corretto
Concettualmente per te forse, io dico assolutamente non compatibile
con logiche di normalizzazione oltre che assurdo poichè occupi
spazio realmente INUTILE.
>, mentre se metto un FLAG 'cancellato' come
> proponi tu uso un CAMPO aggiuntivo (spreco di dati superflui) e in piu'
> ho delle chiavi esterne che non puntano a nulla.
>
> sbaglio?
> ciao e grazie della disponibilita'
Mettere a Null occupi sempre spazio, un campo di tipo Si/No
occupa 1Bit.
Ora l'utilità di mettere a NULL è assolutamente inesistente, vanno
eventualmente cancellati con una Query Action.
L'utilità di NON cancellarli è data spesso dall'esperienza di chi
fà gestionali ed ha a che fare con clienti che ti chiedono di
riesumare i dati....!
Che questo occupi più spazio .... assolutamente no, non sarà quel
BIT che ti rode le unghie...!
Le chiavi esterne che non puntano a nulla...?
Supponi di dover dare la possibilità di recuperare dati cancellati
cosa assai probabile, fai una Query Select con condizione
Cancellato=True e dai così la possibilità di recupero.
Non ti voglio convincere, fai come credi sei libero.



title: relazioni: on delete set null

text:
Alessandro Baraldi ha scritto:
>
>>mettere a null una chiave esterna che non punta piu' a nessun record e'
>>concettualmente corretto
>
>
> Concettualmente per te forse, io dico assolutamente non compatibile
> con logiche di normalizzazione oltre che assurdo poichè occupi
> spazio realmente INUTILE.
>
Scusami alex, pero' nella normalizzazione si cerca anche di rendere i
dati meno ridondanti e piu' consistenti, e di norma avere dei "puntatori
a nessun record" e' una forma di informazione superflua e non coerente
con la realta' rappresentata dal db.
Inoltre, se occupo lo stesso spazio mettendo chiave esterna=1345 e
chiave esterna=null , occupero' comunque meno spazio di quanto ne occupo
aggiungendo un ulteriore bit (anche se capisco che un bit e' poco..e ti
do ragione)
ps: onestamente non ero sicuro che  un dato a null occupasse spazio.
In access i campi dei record sono memorizzati fisicamente anche se sono
null?
> Ora l'utilità di mettere a NULL è assolutamente inesistente, vanno
> eventualmente cancellati con una Query Action.
Scusami ma non capisco..cosa dovrei cancellare? l'intero record o solo
il campo? mettere a null la chiave esterna non e' come cancellarne il
contenuto?
> L'utilità di NON cancellarli è data spesso dall'esperienza di chi
> fà gestionali ed ha a che fare con clienti che ti chiedono di
> riesumare i dati....!
ok forse qui hai ragione, non avevo considerato che in tal modo eviti di
cancellare informazione ch epuo' tornare utile....anche se continuo a
chiedermi come puoi riesumare delle informazioni cancellate in questo
modo, visto che si usa questa tecnica per tutti i record cancellati
(anche record cancellati secoli fa)
> Che questo occupi più spazio .... assolutamente no, non sarà quel
> BIT che ti rode le unghie...!
si qui concordo sicuramente, relativamente non e' molto
spazio..relativamente..
>
> Supponi di dover dare la possibilità di recuperare dati cancellati
> cosa assai probabile, fai una Query Select con condizione
> Cancellato=True e dai così la possibilità di recupero.
si ma cosa recupero? tutti i record impostati a cancallato=true da 10
anni fa a oggi???  (in generale cmq ho capito l'utilita' deella tua
tecnica..ma credo si complichino troppo le cose)
>
> Non ti voglio convincere, fai come credi sei libero.
va benissimo...mi bastava avere l'opinione di altri...valutero' come
fare in base poi alle esigenze specifiche del mio caso..che alla fine e'
l'ago della bilancia..a meno che non ci siano motivi di fondo per decidere .
ti ringrazio infinitamente.


title: relazioni: on delete set null

text:
"mac" <
as...@adad.com
> wrote in message
news:4357f659$0$29547$
4faf...@reader1.news.tin.it
[CUT]
>Scusami alex, pero' nella normalizzazione si cerca anche di rendere i
>dati meno ridondanti e piu' consistenti, e di norma avere dei "puntatori
>a nessun record" e' una forma di informazione superflua e non coerente
>con la realta' rappresentata dal db.
Confondi la normalizzazione con qualcos'altro in questo caso.
Il senso della tua affermazione è ineccepibile,
NORMALIZZAZIONE=Minori Ridondanze(semplificando i vari livelli).
Ora il dato considerato "Cancellato" non è ridondante, ma è sempre il
dato di prima unico e solo, al quale abbiamo cambiato una proprietà.
Dove stà l'errore.
L'errore che fai invece sta proprio nel voler conservare un Record
Slegato, che no sarà possibile ricondurre a nulla, che lo teniamo
a fare allora...?
> si ma cosa recupero? tutti i record impostati a cancallato=true da 10
> anni fa a oggi???  (in generale cmq ho capito l'utilita' deella tua
> tecnica..ma credo si complichino troppo le cose)
Replico infine solo a questa ultima.
Supponi di voler proporre all'utente l'elenco degli articoli
fuori produzione(dove fuori produzione o cancellati, per come
intendo io è fatto da un campo SI/NO).
Bene apro una Form con una ListBox a selezione multipla e do all'utente
la possibilità di ripristinare l'articolo cancellato, perchè
quel rompipalle del figlio del proprietario vuole, dopo 10 anni,
rimetterlo in produzione.
Bene, su selezione degli articoli con una Query semplicissima
tolgo il Flag=True, a quel punto quando aprirò l'elenco degli
articoli in produzione sarà tornato quel giocattolo di 10 anni
fà con tutto quello che lo riguardava.....!
Questo è un esempio volutamente stupido.
> > Non ti voglio convincere, fai come credi sei libero.
>
> va benissimo...mi bastava avere l'opinione di altri...valutero' come
> fare in base poi alle esigenze specifiche del mio caso..che alla fine e'
> l'ago della bilancia..a meno che non ci siano motivi di fondo per decidere .
>
>
> ti ringrazio infinitamente.
Non spaventarti che non è affatto complesso, è estremamente banale
e spesso utilissimo.
Saluti



title: relazioni: on delete set null

text:
Alessandro Baraldi ha scritto:
>
> Confondi la normalizzazione con qualcos'altro in questo caso.
> Il senso della tua affermazione č ineccepibile,
> NORMALIZZAZIONE=Minori Ridondanze(semplificando i vari livelli).
NOn dico che la normalizzazione fa solo quello.
Dico che e' una delle tecniche che serve "anche" per eliminare la
ridondanza, in quanto e' poco desiderabile.
> Ora il dato considerato "Cancellato" non č ridondante, ma č sempre il
> dato di prima unico e solo, al quale abbiamo cambiato una proprietą.
> Dove stą l'errore.
secondo me l'errore e' che c'e una chiave esterna che punta a un record
inesistente, ossia contiene un id di una tabella che non avra' mai piu'
un record con quell ID (essendo un contatore..ho cancellato 1 record
quindi quell id mai piu' sara' disponibile)
> L'errore che fai invece sta proprio nel voler conservare un Record
> Slegato, che no sarą possibile ricondurre a nulla, che lo teniamo
> a fare allora...?
Forse non ci siam capiti e mi sono spiegato male.
TABELLA CLIENTI - TABELLA TIPOCLIENTI
1) Cancello un record TIPOCLIENTI CHE HA ID=1
2) i clienti che avevano il campo TIPOCLIENTE = 1 ora 'puntano' a un
record di TIPOCLIENTI che non esiste piu' , ma non per questo il RECORD
CLIENTE e' inutile !!!
>
> Replico infine solo a questa ultima.
> Supponi di voler proporre all'utente l'elenco degli articoli
> fuori produzione(dove fuori produzione o cancellati, per come
> intendo io č fatto da un campo SI/NO).
> Bene apro una Form con una ListBox a selezione multipla e do all'utente
> la possibilitą di ripristinare l'articolo cancellato, perchč
> quel rompipalle del figlio del proprietario vuole, dopo 10 anni,
> rimetterlo in produzione.
> Bene, su selezione degli articoli con una Query semplicissima
> tolgo il Flag=True, a quel punto quando aprirņ l'elenco degli
> articoli in produzione sarą tornato quel giocattolo di 10 anni
> fą con tutto quello che lo riguardava.....!
> Questo č un esempio volutamente stupido.
qui hai pienamente ragione. Ma il mio caso non ha a che vedere con questo.
Nel tuo esempio se hai una tabella TIPOARTICOLI e tu cancelli un record,
tutti gli ARTICOLI che erano di quel tipo ormai non puntano piu' a quel
record di TIPOARTICOLI, e non potrai certo recuperare questa
informazione con la tua tecnica, che e' corretta ma non serve al mio caso.
>
>
> Non spaventarti che non č affatto complesso, č estremamente banale
> e spesso utilissimo.
>
OK , e ti ringrazio della tecnica che potra' essermi utile, tuttavia non
ho paura della difficolta', e' solo che non voglio fare cose oltre cio
che mi serve.
Vorrei solo capire come mai in access non ci sia la possibilita' in
automatico di impostare un trigger che setta a null delle chiavi esterne
che e' naturale che vegano settate a null..
PS: mi rompe sto batti e ribatti..ma e' cmq bello discutere
civilmente... :)  grazie !


title: Codici a barre...

author: Berti Simone

text:
Devo fare per la mia gestione ditta un riconoscimento di codici a barre...
da quando frequento questo NG ho sentito parlare più volte di problemi con i
codici a barre che di altre problematiche... quali sono gli errori a cui
posso andare in contro facendomeli riconoscere da una penna ottica? Saluti
Simone


title: [OT] Smau

author: RobertOne

text:
Ciao a tutti.
Solo una info per vedere se ho capito bene la questione. Ma lo Smau
quest'anno se non erro, era riservato solamente ai visitatori professionali
e non agli smanettoni come può essere il sottoscritto? In definitiva, si
poteva entrare in che modo se non si è professionali?
Grazie
Rob.


title: [OT] Smau

author: luigi Onofrio

text:
RobertOne ha scritto:
> Ciao a tutti.

> Grazie
> Rob.
e non te lo immagini?
come gli altri anni a milano fiere, davanti all'ingresso della fiera vi
sono tanti mamozi che vendono i biglietti di ingresso riservati ai
professionisti, basta pagare!.
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: [OT] Smau

text:
> e non te lo immagini?
> come gli altri anni a milano fiere, davanti all'ingresso della fiera vi
> sono tanti mamozi che vendono i biglietti di ingresso riservati ai
> professionisti, basta pagare!.
Questa non la sapevo, soprattutto perchè non sono un assiduo frequentatore
di fiere... Ricordo di esserci stato tre anni fa per la prima ed unica volta
ma sono entrato tranquillamente facendo regolare coda alle biglietterie, che
fosse un'altra manifestazione...?!
Rob.


title: [OT] Smau

text:
"RobertOne" <
robe...@robort.it
> ha scritto nel messaggio
news:egh28i$2g6$1...@news.task.gda.pl...

Sì l'ingresso era riservato ai soli rivenditori ma le casse per pagare 15
euro ed entrare c'erano; quindi potevi benissimo andare.
Devo deludere Luigi perché anch'io mi sarei aspettato la presenza di
bagarini, invece li ho visti solo una volta e solo il primo giorno
all'uscita della metro; ed era uno solo...
Ciao.
--
Sergio MAZZA


title: [OT] Smau

text:
"Sergio MAZZA"  ha scritto nel messaggio ...
>
> Sì l'ingresso era riservato ai soli rivenditori ma le casse per pagare 15
> euro ed entrare c'erano; quindi potevi benissimo andare.
> Devo deludere Luigi perché anch'io mi sarei aspettato la presenza di
> bagarini, invece li ho visti solo una volta e solo il primo giorno
> all'uscita della metro; ed era uno solo...
>
> Ciao.
> --
> Sergio MAZZA
Grazie Sergio per la risposta.
Ero intenzionato ad andarci visto che dista circa 70 km da dove abito, però
mi ha trattenne  quella questione. Eppure anni fa mi recai, anche se non
ricordo se fosse la stessa manifestazione informatica.
Roberto


title: [OT] Smau

text:
"RobertOne" <
robe...@robort.it
> ha scritto nel messaggio
news:egi8ro$bk5$1...@news.task.gda.pl...
>
>
> Grazie Sergio per la risposta.
>
> Ero intenzionato ad andarci visto che dista circa 70 km da dove abito,
> però mi ha trattenne  quella questione. Eppure anni fa mi recai, anche se
> non ricordo se fosse la stessa manifestazione informatica.
>
> Roberto
Guarda; a parte le mozzarelle di MAssimiliano e un incontro del quinto tipo
con i tipacci dell'NG + MVP, non ti sei perso nulla.
Pur con il casino che c'era, rimpiango la "versione precedente"; dove
c'erano molte occasioni di studio/prove sul campo...
Ciao.
--
Sergio MAZZA


title: [OT] Smau

author: MA

text:

il paradosso è stato proprio questo, ora che c'erano solo tecnici, non
c'erano sessioni tecniche
--
--
Massimiliano Amendola
www.accessgoup.it
Il sito italiano di svilupatori Access
www.donkarl.com/it/cisa


title: [OT] Smau

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:egiif4$q4p$1...@area.cu.mi.it...
> il paradosso è stato proprio questo, ora che c'erano solo tecnici, non
> c'erano sessioni tecniche
> --
> --
> Massimiliano Amendola
>
www.accessgoup.it
> Il sito italiano di svilupatori Access
>
www.donkarl.com/it/cisa
Secondo me non ci dovevano essere neanche i tecnici ma solo rivenditori e
basta...
Ciao.
--
Sergio MAZZA


title: [OT] Smau

author: Pablitomf (Maurizio Facciuti)

text:
> il paradosso è stato proprio questo, ora che c'erano solo tecnici, non
> c'erano sessioni tecniche
Solo  Tecnici? Scusa, ma non c'eravate pure tu e Sergio, o ho capito
male?!!? :-D
--
--
Ciao
Pablitomf (Maurizio Facciuti)
-----------------------------------------------------------------
Access: 97, 2000, XP e 2003
ASP
-----------------------------------------------------------------
http://www.accessgroup.it/
-----------------------------------------------------------------
Il mio motto :
""Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media."


title: [OT] Smau

author: ciroteo

text:
Pablitomf (Maurizio Facciuti) ha scritto:

beh loro studiavano educazione tecnica ... nello zaino avevano la
squadra, il righello e il goniometro.