text:
 scusatemi, volevo solo aggiungere 2 cose : nella query se al posto
del percorso [forms]![ricerca]![id] inserisco nei parametri
(manualmente) il numero dell'id (es 85) il codice funziona spuntandomi
solo le caselle di testo riguardanti l'operaio 85 e l'altra cosa è che
se nel codice invece della scritta "queri1" inserisco il codice della
query (select ecc. ecc.) ottengo sempre lo stesso risultato e cioè
"parametri insufficenti previsto 1" ciao ciao


title: Spuntare da codice tutte le caselle di controllo in una sottomaschera

author: Karl Donaubauer

text:
Silvestro wrote:
> ...
> ciao , ho addattato il codice di Vladimiro cos� ma non mi funziona, mi
> dice "parametri insufficenti, previsto 1:
>
> Dim ss As DAO.Recordset
> Set ss = CurrentDb.OpenRecordset("query1")
> Do Until ss.EOF
> ss.Edit
> ss!Tua_Casella = False
> ss.Update
> ss.MoveNext
> Loop
> ss.Close
> Set ss = Nothing
>
> e l'ho fatto perch� non riuscivo ad applicare la soluzione proposta da
> Vladimiro in quanto il recordset che si deve aprire � composto da soli
> 3 campi : "idNominativo" (numerico) , "GenereMateriale" (numerico) e
> la casella di controllo "reso" che spuntata o meno mi reinserisce il
> materiale nell'inventario e questo campi sono rappresentati nella
> query1. Come parametri nella query ho inserito il percorso della
> maschera aperta dove poter prendere "idNominativo" e cioe' :[forms]!
> [ricerca]![id] dove "id" � una casella di testo visibile nella
> maschera. Se apro la query manualmente tutto funziona e cio� mi filtra
> i record perfettamente , ma quando vado ad eseguire il codice scritto
> sopra mi risponde "parametri insufficenti previsto 1", ho provato a
> togliere dalla query il percorso inserito nei parametri e funziona
> togliendo per� la spunta a tutti i records della tabella. cosa pu�
> essere?
Non � chiaro se nella query usa 1 tabella o 2.
Per una sola tabella potrebb'essere sufficiente questo codice
nella maschera "ricerca":
Currentdb.Execute _
"UPDATE TuaTabella SET reso = False" & _
" WHERE idNominativo = " & Me!id
Se non funziona, posta la stringa SQL della tua "query1".
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


author: Silvestro

text:
Grazie karl ho inserito il tuo codice e tutto funziona , grazie grazie
grazie e naturalmente grazie anche a vladimiro per l'interessamento,
ciao ciao


author: Vladimiro Leone

text:

Ciao Silvestro, se uno chiede determinate cose, è bene rileggere
quello che si chiede :-)
Non so se tornerai a leggere il post, comunque quella che ti ha
proposto Karl è una query di aggiornamento e va benissimo, mentre
quella mia è una select che in altre occasioni ti potrebbe far comodo:
Dim ss As DAO.Recordset
Set ss = CurrentDb.OpenRecordset("Select * FROM Tua_Tabella WHERE
Tuo_Id=" & Me.ID)
Do Until ss.EOF
ss.Edit
ss!ss!Tua_Casella = False
ss.Update
ss.MoveNext
Loop
ss.Close
Set ss = Nothing
Ciao Vladimiro


text:
> Ciao Silvestro, se uno chiede determinate cose, è bene rileggere
> quello che si chiede :-)
> Non so se tornerai a leggere il post, comunque quella che ti ha
> proposto Karl è una query di aggiornamento e va benissimo, mentre
> quella mia è una select che in altre occasioni ti potrebbe far comodo:
>
> Dim ss As DAO.Recordset
> Set ss = CurrentDb.OpenRecordset("Select * FROM Tua_Tabella WHERE
> Tuo_Id=" & Me.ID)
> Do Until ss.EOF
> ss.Edit
> ss!ss!Tua_Casella = False
> ss.Update
> ss.MoveNext
> Loop
> ss.Close
> Set ss = Nothing
>
> Ciao Vladimiro
[risposta]
ciao vladimiro e come vedi il post l'ho riletto visto che vi seguo
sempre con molta attenzione, anche perchè da voi ho imparato tanto e
tanto imparerò in seguito. Sinceramente non ho capito a cosa ti
riferisci con la frase "se uno chiede determinate cose, è bene
rileggere quello che si chiede", avevo un problema da risolvere e sia
te che karl mi avete risposto proponendomi due soluzioni diverse ma
ugualmente funzionali solo che la tua ( per colpa dei miei limiti) non
riuscivo ad applicarla e ti confesso una cosa: quando ho provato la
tua soluzione avevo fatto confusione di tabelle, insomma aprivo un
recordset in una tabella dove non c'era la casella di controllo da
usare come parametro e mi dava l'errore, colpa dei nomi di tabelle
forse troppo simili..... comunque ti ringrazio per l'interessamento e
mi auguro che in altre occasioni tu non mi farai mancare il tuo aiuto,
ciao e grazie


text:
On 9 Dic, 15:53, Silvestro <
sergiofa...@hotmail.it
> wrote:
> > Ciao Silvestro, se uno chiede determinate cose, è bene rileggere
> > quello che si chiede :-)
> > Non so se tornerai a leggere il post, comunque quella che ti ha
> > proposto Karl è una query di aggiornamento e va benissimo, mentre
> > quella mia è una select che in altre occasioni ti potrebbe far comodo:
>
> > Dim ss As DAO.Recordset
> > Set ss = CurrentDb.OpenRecordset("Select * FROM Tua_Tabella WHERE
> > Tuo_Id=" & Me.ID)
> > Do Until ss.EOF
> > ss.Edit
> > ss!ss!Tua_Casella = False
> > ss.Update
> > ss.MoveNext
> > Loop
> > ss.Close
> > Set ss = Nothing
>
> > Ciao Vladimiro
>
> [risposta]
>
> ciao vladimiro e come vedi il post l'ho riletto visto che vi seguo
> sempre con molta attenzione, anche perchè da voi ho imparato tanto e
> tanto imparerò in seguito. Sinceramente non ho capito a cosa ti
> riferisci con la frase "se uno chiede determinate cose, è bene
> rileggere quello che si chiede", avevo un problema da risolvere e sia
Ciao Silvestro, quello che chiedevi era questo:
ed io invece avrei la necessità di farlo solo nei record associati al
nominativo
visualizzato nella maschera. come posso fare?
:-)
Ciao Vladimiro
> te che karl mi avete risposto proponendomi due soluzioni diverse ma
> ugualmente funzionali solo che la tua ( per colpa dei miei limiti) non
> riuscivo ad applicarla e ti confesso una cosa: quando ho provato la
> tua soluzione avevo fatto confusione di tabelle, insomma aprivo un
> recordset in una tabella dove non c'era la casella di controllo da
> usare come parametro e mi dava l'errore, colpa dei nomi di tabelle
> forse troppo simili..... comunque ti ringrazio per l'interessamento e
> mi auguro che in altre occasioni tu non mi farai mancare il tuo aiuto,
> ciao e grazie- Nascondi testo citato



text:
Ciao Vladimiro scusami ma continuo a non capire. E' vero che ho
scritto "avrei la necessità di farlo solo nei record associati al
nominativo visualizzato nella maschera" ed è vero che tu mi hai
mandato subito la soluzione, però io non sono riuscito ad applicarla a
causa della mia scarsa preparazione. In seguito karl mi ha mandato
un'altra soluzione ugualmente funzionale ed io la ho applicata con
successo sul mio programma. Questo non significa che io considerassi
la tua sbagliata, è stato semplicemente un diverso approccio per la
soluzione di uno stesso quesito e questo diverso approccio mi ha fatto
capire che sbagliavo nell'applicare il tuo codice. forse sono stato
confuso nell'esporre il mio quesito (e se così fosse me ne scuso) ma
credimi Vladimiro , la mia è stata una semplice richiesta di aiuto e
l'ho fatta nei termini che le mie conoscenze mi permettono. ciao ciao
Vladimiro


text:
On 9 Dic, 20:16, Silvestro <
sergiofa...@hotmail.it
> wrote:
> Ciao Vladimiro scusami ma continuo a non capire. E' vero che ho
> scritto "avrei la necessità di farlo solo nei record associati al
> nominativo visualizzato nella maschera" ed è vero che tu mi hai
> mandato subito la soluzione, però io non sono riuscito ad applicarla a
> causa della mia scarsa preparazione.
Se io scrivo:
Set ss = CurrentDb.OpenRecordset("Select * FROM Tua_Tabella WHERE
Tuo_Id=" & Me.ID)
Significa che la richiesta è quella di selezionare tutti i records
all'interno della tabella uguali all'Id che hai nella maschera aperta
in quel momento. Diciamo che in genere è la soluzione migliore in
quanto con maschera e sottomaschera hai creato sicuramente una
relazione con l'id (indicizzato).
mentre l'altra soluzione:
Set ss = CurrentDb.OpenRecordset("Select * FROM Tua_Tabella WHERE
Nominativo='" & Replace(Me.Nominativo, "'", "''") & "'")
è quella di selezionare tutti i records all'interno della tabella che
hanno nel campo Nominativo il nome  presente nella maschera aperta in
quel momento. Siccome il nome è alfanumerico ( a differenza dell'Id
numerico) e in più potrebbe avere l'apostrofo, le doppie virgolette
ecc..., per non incappare nell'errore, si usa la funzione Replace
oppure la funzione chr (per maggiori informazioni: help o sito di
Karl).
Ciao Vladimiro.


text:
Ciao Vladimiro finalmente ho capito cosa volevi dirmi , in effetti
avevo proprio chiesto la modifica nei record associati al "nominativo"
ma in realtà poi era con l'Id nominativo che tentavo di filtrare il
tutto e quindi il tutto non funzionava. Grazie per la pazienza e la
prossima volta cercherò di stare un pò piu' attento nell'esporre le
mie richieste. Ciao Vladimiro e grazie di nuovo.


title: Gestione Testo

author: Nicolas

text:
Ho la necessità di mettere all'inizio ed alla fine di un campo testo il
carattere " (doppio apice). Per esempio:
Testo = G:\Clienti\Ambrogio\
deve diventare "G:\Clienti\Ambrogio\"
come faccio a mettere " (doppio apice non mi accetta l'istruzione """.
Spero di essermi spiegato.
Nicola
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Gestione Testo

author: Carlo Costarella

text:
"Nicolas" <
nicola....@tin.it
> ha scritto nel messaggio
news:c0kgpm$tc5$1...@news.newsland.it...
>
> Ho la necessità di mettere all'inizio ed alla fine di un campo testo il
> carattere " (doppio apice). Per esempio:
>
> Testo = G:\Clienti\Ambrogio\
>
> deve diventare "G:\Clienti\Ambrogio\"
>
> come faccio a mettere " (doppio apice non mi accetta l'istruzione """.
>
> Spero di essermi spiegato.
> Nicola
>
>
Questa tua necessità potrebbe essere soddisfatta da questa istruzione?
Me.MioTesto = Chr(34) & Me.MioControllo & Chr(34)
By, by Carlo


title: Gestione Testo

text:
Carlo Costarella ha scritto:
> "Nicolas" <
nicola....@tin.it
> ha scritto nel messaggio
> news:c0kgpm$tc5$1...@news.newsland.it...
> >
> > Ho la necessità di mettere all'inizio ed alla fine di un campo testo il
> > carattere " (doppio apice). Per esempio:
> >
> > Testo = G:ClientiAmbrogio
> >
> > deve diventare "G:ClientiAmbrogio"
> >
> > come faccio a mettere " (doppio apice non mi accetta l'istruzione """.
> >
> > Spero di essermi spiegato.
> > Nicola
> >
> >
> Questa tua necessità potrebbe essere soddisfatta da questa istruzione?
> Me.MioTesto = Chr(34) & Me.MioControllo & Chr(34)
> By, by Carlo
Grazie



title: file MDB di Acc2003 funziona con Acc2007

author: Franco

text:
Un db creato con Access97, convertito poi per Access2003,
può dare problemi a farlo funzionare con Access 2007?
grazie


text:
"Franco" <
fc2...@virgilio.it
> ha scritto nel messaggio
news:48fcbb0c$0$18149$4faf...@reader3.news.tin.it...
> Un db creato con Access97, convertito poi per Access2003,
> può dare problemi a farlo funzionare con Access 2007?
> grazie
>
In linea di massima funziona bene...
Ovviamente fai sempre una copia.
Ciao, Carlo


title: Fine del recordset

author: il barbi

text:
Sto facendo passare i record del recordset corrente in VBA
coll'istruzione DoCmd.GoToRecord , , acNext
come faccio per sapere quando sono arrivato alla fine?
il barbi


title: Fine del recordset

author: Maurizio Borrelli

text:
"il barbi" <
ilb...@tin.it
> ha scritto nel messaggio
news:f8cNb.113567$_P.41...@news4.tin.it...
> Sto facendo passare i record del recordset corrente in VBA
> coll'istruzione DoCmd.GoToRecord , , acNext
> come faccio per sapere quando sono arrivato alla fine?
Ciao, il barbi.
    Per esempio quando sei su un nuovo record (me.newrecord=true) se il
recordset e' aggiornabile. Altrimenti quando ottieni errore (e lo puoi
intercettare). Oppure quando il numero del record corrente e' uguale al
numero totale dei record. Pero' potresti usare un sistema... piu' migliore
;-) Per esempio usare DAO e giocare con recordsetclone e bookmarks. (Tutto
questo lo stai facendo in una maschera, giusto?)
--
    (Facci sapere se ed eventualmente come hai risolto. Grazie.)
Ciao :o)
Maurizio Borrelli, Microsoft MVP Access
--------
?SPQR(C)
 X
--------


title: Fine del recordset

author: Neo

text:
"il barbi" <
ilb...@tin.it
> ha scritto nel messaggio news:f8cNb.113567$_P.41...@news4.tin.it...

controllando l'errore
quando fai per passare ad un record inesistente restituisce un errore e si blocca
ora non mi ricordo il numero dell'errore, ma se fai un loop dovrebbe saltarti fuori da solo :-)


title: Fine del recordset

text:
il barbi ha scritto:

Hai provato a clonare il recordset e usare la funzione .EOF (Credo voglia
dire End Of File)??
Ciao
--
Dario
--
Il bello della vita è vivere:
molti esistono, ecco tutto.
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Fine del recordset

author: ALESSANDRO Baraldi

text:
"il barbi" <
ilb...@tin.it
> ha scritto nel messaggio
news:f8cNb.113567$_P.41...@news4.tin.it...

Se stai usando questo sistema in una Form, come dovrebbe essere data
la funzione che stai proponendo, ritengo più indicato fare così:
Ti allego una Funzione che ho fatto per gestire i Pulsanti di spostamento in
una Form,
se metti la Funzione in un Modulo diventa Generica.....!
Questa è in realtà estratta da un Modulo di Classe, quindi magari qualche
ritocco...!
Gestisce GotoFirst, GotoNext, GotoPrevious, GotoLast, GotoN(Da sistemare)
Da richiamare usando le costanti implicite di Access per gli spostamenti:
NavMove Me,acFirst
NavMove Me,,4    (per l'opzione GOTO N)
Public Function NavMove(frm as Form, bytMode As Byte, Optional ByVal lngPos
As Variant)
'******************************************************************
'************* Sezione di Gestione Pulsanti spostamento ***********
'******************************************************************
   Dim rstMove As DAO.Recordset
   Dim lngAbs As Long
   Dim lngPosTo As Long
   Const ErrNoCurrentRow = 3021
   On Error GoTo HandleErrors
   If Not (frm.recordsetClone.Eof AND frm.recordsetClone.Bof)  Then
      Set rstMove = frm.RecordsetClone
      rstMove.Bookmark = frm.Bookmark
      Select Case bytMode
         Case acFirst
             rstMove.MoveFirst
         Case acPrevious
             rstMove.MovePrevious
         Case acNext
             rstMove.MoveNext
         Case acLast
             rstMove.MoveLast
         Case acgoto    'Poichè è un'estratto di un Modulo di Classe questo
devi adattarlo
            'If CLng(c_txt_RecPos) < CLng(Mid$(c_txt_TotalRecs, 3)) And
CLng(c_txt_RecPos) > 0 Then
            '   lngAbs = rstMove.AbsolutePosition + 1
            '   lngPosTo = CLng(lngPos)
            '   lngPosTo = lngPosTo - lngAbs
            '   rstMove.Move (lngPosTo)
            'End If
      End Select
      frm.Bookmark = rstMove.Bookmark
     End If
ExitHere:
      rstMove.close
      Set rstMove = Nothing
  HandleErrors:
    If Err.Number = ErrNoCurrentRow Then Resume Next
End Function
Ciao.
@Alex.


title: Fine del recordset

author: Roberto da casa

text:
"il barbi" <
ilb...@tin.it
> ha scritto nel messaggio
news:f8cNb.113567$_P.41...@news4.tin.it...

If Me.CurrentRecord = _
Me.RecordsetClone.RecordCount Then
    ' il record corrente è l'ultimo quindi non usare
    ' il metodo DoCmd.GoToRecord
Else
    ' il record corrente NON è l'ultimo quindi usare
    ' il metodo DoCmd.GoToRecord per andare
    al record successivo
End
Tieni però presente che così fai uso delle libreie Microsoft DAO che dovrai
aggiungere ai riferimenti del tuo database se usi una versione di Access
successiva ad Access97.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Fine del recordset

text:
"Neo" <senz...@chiedetesul.NG> ha scritto nel messaggio
news:yscNb.250926$vO5.10...@twister1.libero.it...

direi che questa e' la soluzione piu' a buon mercato,
l'errore e' 2105
il barbi


author: Teaching On Line

text:
Corsi on line di programmazione Access, SQL, Visual Basic
La Teaching OnLine organizza Corsi on line di programmazione Access, SQL,
Visual Basic, ASP
Impara a Programmare in VBA per Microsoft Access con i corsi on line
di programmazione Access. Impara secondo i tuoi tempi ed i tuoi ritmi.
Inoltre, corsi di ASP, Visual Basic ed SQL.
Inizio nuovi corsi il 23 Ottobre
Per informazioni, contattare
Teaching On Line
in...@teachingonline.it
http://users.iol.it//ccpardo/Access/Lezioni.htm


title: Valore predefinito in ComboBox

author: Davide D'Amico

text:
Ho una due ComboBox che pescano dati da una Query. Mi piacerebbe mettere un
valore predefinito su entrambi, valore che nel primo dovrebbe andarci il
primo valore restituito dalla query e nel  secondo l'ultimo valore
restituito dalla query.
Come posso ottenere tale risultato?
Grazie 1000.


title: Valore predefinito in ComboBox

author: Sandro

text:
"Davide D'Amico" <
dav...@novasoftonline.it
> ha scritto nel messaggio
news:d19qpg$eev$1...@newsreader.mailgate.org...

Ciao Davide,
su valore predefinito protresti semplicemente applicare le funzioni sui
domini dmin e dmax sulle queries delle combobox.
Es.=DMax("[numero_fattura]";"[T_fattura]")
=DMin("[numero_fattura]";"[T_fattura]")
Ovviamente una sul valore più basso e l'altra sul valore più alto.
Che ne pensi ?
Ciao


title: Valore predefinito in ComboBox

text:
"Sandro" <
sandro...@tin.it
> ha scritto nel messaggio
news:Ct_Zd.663774$b5.30...@news3.tin.it...
> Ovviamente una sul valore più basso e l'altra sul valore più alto.
> Che ne pensi ?
Penso che e' perfetto :-)
Grazie


title: riconoscimento vocale office italiano ci sono novità?

text:
qualcuno sa se hanno rimediato anche all'italiano per il riconoscimento
vocale?
Grazie a tutti


title: Problema con dlookup - dcount

author: Gianni

text:
Ciao ragazzi..
utilizzo il seguente codice per verificare sull'apertura di una form
richiamata da un'altra form l'esistenza di eventuali record...lo scopo è
quello di visualizzare un msg "non esistono record"  nel caso non vi siano
record da visualizzare.....
Private Sub Form_Open(Cancel As Integer)
If IsNull(DCount([IDDettagli], "Ricerche2", [IDDettagli])) Then
        MsgBox "Non Esistono Record"
End If
End Sub
nel caso nn vi siano record l'errore è "you entered an expression that has
no value" RunTime (error2427)
il tutto nn funziona!...dove sbaglio?
Ciao
Gianni


title: Problema con dlookup - dcount

author: Potone

text:
"Gianni" <
giann...@hotmail.com
> ha scritto nel messaggio news:zrfYf.62993$PR2.1...@twister2.libero.it...
[cut]
> Private Sub Form_Open(Cancel As Integer)
> If IsNull(DCount([IDDettagli], "Ricerche2", [IDDettagli])) Then
>         MsgBox "Non Esistono Record"
>
> End If
> End Sub
>
Nel primo argomento di dcount immettendo direttamente [IDDettagli] anzichè "[IDDettagli]" fai riferimento al contenuto del campo
iddettagli sul record corrente all'apertura della maschera. Lo stesso vale per l'argomento criterio dove, oltretutto, non hai
specificato nessun operatore di confronto.
Se iddettagli è uguale a 5 è come se scrivessi
DCount(5, "Ricerche2", 5)
che non ha senso (seppur sintatticamente corretto), il risultato è sempre il conteggio di tutti i record presenti nella tabella ed
ecco che quando è presente almeno un record nella maschera la routine non da errore e permette l'apertura della maschera. Diciamo
che il risultato finale è quello sperato (l'apertura della maschera in presenza di record) ma non perchè conteggi il numero
effettivo di record corrispondenti a iddettagli.
Quello che volevi scrivere era probabilmente:
DCount("[IDDettagli]", "Ricerche2","IDDettagli=" & [IDDettagli])
Rimarrebbe comunque il problema che, nel caso di mancanza di record, non esisterebbe nessun iddettagli sulla maschera (proprio
perchè non ci sono record) ed ecco da dove deriva l'errore 2427.
Potresti usare la proprietà recordcount del recordsetclone della maschera, prova a vedere con F1.
Ciao,
Mat.



title: Problema con dlookup - dcount

text:
"Gianni" <
giann...@hotmail.com
> ha scritto nel messaggio
news:zrfYf.62993$PR2.1...@twister2.libero.it...
> Ciao ragazzi..
> utilizzo il seguente codice per verificare sull'apertura di una form
> richiamata da un'altra form l'esistenza di eventuali record...lo scopo č
> quello di visualizzare un msg "non esistono record"  nel caso non vi siano
> record da visualizzare.....
>
> Private Sub Form_Open(Cancel As Integer)
> If IsNull(DCount([IDDettagli], "Ricerche2", [IDDettagli])) Then
>         MsgBox "Non Esistono Record"
>
> End If
> End Sub
>
> nel caso nn vi siano record l'errore č "you entered an expression that has
> no value" RunTime (error2427)
>
> il tutto nn funziona!...dove sbaglio?
Penso che se leggi l'help non dovresti avere problemi a sapere quale sia la
sintassi esatta della funzione DCount.
Innanzitutto una funzione DCount non restituisce MAI come valore Null, ma
restituisce sempre un valore numerico positivo o uguale a zero.
Poi non si capisce che significato abbia scrivere nei criteri dell funzione
esclusivamente il nome di un campo: i criteri sono una espressione che deve
rappresentare una condizione.
Insomma io fossi int e proverei a scrivere la funzione DCount nel modo
seguente:
Private Sub Form_Open(Cancel As Integer)
If DCount("*", "Ricerche2") = 0 Then
        MsgBox "Non Esistono Record"
End If
End Sub
> Ciao
> Gianni
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: Sottomaschera e tabelle collegate

text:
Salve a tutti,
sto creando un progetto per la gestioni di ordini per un'azienda.
Praticamente ho una maschera per l'anagrafica con una tabella, una maschera con una listbox che mi richiama i dati anagrafici della tabella precedente, una sottomaschera con alcuni campi di testo relativi agli ordini (data, numero etc...) che fa riferimento ad un'altra tabella ed un'altra sottomaschera per la gestione degli articoli. Il tutto, tramite pulsante, va a compilare un foglio excel
In pratica la listbox deve essere popolata con: Ragione sociale (tabella A), numero ordine (tabella B) e data ordine (tabella B) bloccando i campi anagrafici. Non riesco, però a relazionare la sottomaschera perchè il record non viene richiamato tramite selezione nella listbox.
Spero di essere stato chiaro, grazie anticipatamente.
--
Questo articolo e` stato inviato dal sito web
http://www.nonsolonews.it


title: [HELP!!!] Query sempre più complesse

author: PRISCO

text:
Non riesco ancora a risolvere il probloema delle query troppo
complesse. Ricapitolando:
ho creato delle query che prendono dei valori da tabelle e li
elaborano con delle espressioni. Poi ho creato delle altre query che
prendano quei risultati e a loro volta li elaborino con nuove
espressioni.
Non riesco a ripetere questo passaggio per la terza volta.
Ho provato a creare tabelle temporanee trasformando le query di
selezione in query di creazione tabelle, ma dovendo queste
autoaggiornarsi, mi compare ogni volta un fastidioso messaggio di
creazione tabella, che mi chiede il numero di righe o di campi.
Inoltre non saprei dove inserire il comando di esecuzione delle quesry
perchè devo poterle attivare da molte maschere diverse.
Poi ho provato a snellire il DB facendo molte operazioni direttamente
da VBasic ma il risultato non cambia: da un certo punto in poi è
sempre query troppo complessa.
Sono disperato, il tempo stringe! =/
Tnx per qualunque altro suggerimento.
Stefano Priolo
aka PRISCO
aka PRC (on IRC)
ICQ Uin 21971095


title: [HELP!!!] Query sempre più complesse

author: Sergio MAZZA

text:
"PRISCO" <
pri...@tiscalinet.it
> ha scritto nel messaggio
news:39646c59...@news.tin.it...
> Non riesco ancora a risolvere il probloema delle query troppo
> complesse. Ricapitolando:
> ho creato delle query che prendono dei valori da tabelle e li
> elaborano con delle espressioni. Poi ho creato delle altre query che
> prendano quei risultati e a loro volta li elaborino con nuove
> espressioni.
> Non riesco a ripetere questo passaggio per la terza volta.
> Ho provato a creare tabelle temporanee trasformando le query di
> selezione in query di creazione tabelle, ma dovendo queste
> autoaggiornarsi, mi compare ogni volta un fastidioso messaggio di
> creazione tabella, che mi chiede il numero di righe o di campi.
> Inoltre non saprei dove inserire il comando di esecuzione delle quesry
> perchč devo poterle attivare da molte maschere diverse.
> Poi ho provato a snellire il DB facendo molte operazioni direttamente
> da VBasic ma il risultato non cambia: da un certo punto in poi č
> sempre query troppo complessa.
> Sono disperato, il tempo stringe! =/
> Tnx per qualunque altro suggerimento.
>
>
> Stefano Priolo
> aka PRISCO
> aka PRC (on IRC)
> ICQ Uin 21971095
Per farla "semplice"; il fastidioso messaggio puoi disabilitarlo con
Docmd.SetWarnings (vedi help); solo ricordati che se lo disabiliti poi al
termine dell'operazione lo devi riabilitare...
Ciao.


title: [HELP!!!] Query sempre più complesse

author: Roby - Mister NO

text:
Ciao,
>autoaggiornarsi, mi compare ogni volta un fastidioso messaggio di
>creazione tabella, che mi chiede il numero di righe o di campi.
Se questo metodo funiziona puo disabilitare gli avvisi di sistema con
DoCmd.SetWarnings False
in questo modo non dovrebbe chiederti più la conferma di sovrascrivere
la tabella esistente e dei numeri di record (se non ricordo male)
Ciao
------------
Beep Bepp
           Roby
Togliere XXX per rispondere via Email
PGP KEY  Disponibile


title: Access e Protezione

text:
Cari signori ho avuto modo con di vedere con i miei occhi con molto
dispiacere dopo tutto il lavoro fatto per la sicurezza, aprire un mio db
protetto a livello utente con pw e tutte le possibili protezioni.
Non si vedevano tutte le maschere e nemmeno tutti i report, ma i moduli che
erano anche questi protetti da pw e tutto il codice era completamente aperto
e la cosa più spiacevole e che le tabelle erano perfettamente consultabili
con tutti i record inseriti, tempo impiegato 30 SECONDI.
Vedere queste cose fa dubitare notevolmente sulla protezione di access.
Ciao Debora


title: Access e Protezione

text:
"++++Debora++++" <
i...@i.it
> ha scritto nel messaggio
news:fapkf4$31u$1...@nnrp-beta.newsland.it...

Guarda Debora io sono alcuni anni che non uso più la protezione utente, solo
eprchè non uso
più Access come DB, ma ti assicuro che devi aver sbagliato qualche cosa.
Gli oggetti sono gestibili a livello di protezione, ma non capisco perchè
dopo aver integrato il tuo
applicativo non crei un MDE...?????????????
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------


title: Access e Protezione

text:
> Guarda Debora io sono alcuni anni che non uso più la protezione utente,
> solo
> eprchè non uso
> più Access come DB, ma ti assicuro che devi aver sbagliato qualche cosa.
>
> Gli oggetti sono gestibili a livello di protezione, ma non capisco perchè
> dopo aver integrato il tuo
> applicativo non crei un MDE...?????????????
>
Alessandro era un MDE ed è per questo che ne sono rimasta allibita.
Ciao


title: Access e Protezione

author: Access

text:
Ciao "++++Debora++++",
"++++Debora++++" <
i...@i.it
> ha scritto nel messaggio
news:faps05$846$1...@nnrp-beta.newsland.it...

Che qualcuno sia riuscito ad accedere alle tabelle OK.Che poi sia riuscito
ad accedere alla struttura delle maschere o report OK.
ma che in "tempo impiegato 30 SECONDI" riesca a risalire al codice vba è
davvero sbalorditivo.
Ma..
--
Ciao
Access


title: Access e Protezione

text:
> Che qualcuno sia riuscito ad accedere alle tabelle OK.Che poi sia riuscito
> ad accedere alla struttura delle maschere o report OK.
>
> ma che in "tempo impiegato 30 SECONDI" riesca a risalire al codice vba è
> davvero sbalorditivo.
>
> Ma..
Non lo ritengo probabile, anche se possibile, ma decisamente non con queste
modalità...!
Sono quasi convinto che di fondo ci sia un errore di Debora, che però non ho
la più pallida idea
di cosa possa essere...
Sono in tanti a provare ad usare la protezione Utente, ma molti agli inizi
la configurano nel modo
sbagliato, ed il DB sembra non essere protetto..., cosa impossibile se si
segue la cosa
in modo corretto(non intuitivo purtroppo)...!
In ogni caso il Codice in versione MDE non è VISIBILE in quanto compilato in
PCODE, quindi c'è qualche incongruenza con quanto viene detto... che non mi
permetto di ipotizzare.
Avevo letto che la protezione VBA in realtà aveva anomalie in caso di Errori
o Bugs del codice... ma a che serve mettere
la PWD al codice se si crea un MDE...?
Per qunto mi riguarda non ho nulla da suggerire se non di fare attenzione al
lavoro fatto sulla protezione
utente e rivedere bene la conversione in MDE che veramente sia fatta con la
protezione attiva...!
Debora prova a non esagerare con il miscuglio dei sistemi di protezione...
;-)
Di più non so...
> --
> Ciao
> Access



title: Access e Protezione

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:faq0b8$vn9$1...@aioe.org...

l'mde era protetto al punto che nessuno riusciva più ad entrarci dava
errore.
Chiamato una ditta specializzata per il recupero, una cifrata .... di euro,
e poi il resto lo sapete già.
ciao


title: Access e Protezione

text:
> l'mde era protetto al punto che nessuno riusciva più ad entrarci dava
> errore.
> Chiamato una ditta specializzata per il recupero, una cifrata .... di
euro,
> e poi il resto lo sapete già.
> ciao
Adesso l'hai raccontata tutta...



title: Access e Protezione

text:
Ciao Debora,
"++++Debora++++" <
i...@i.it
> ha scritto nel messaggio
news:faq1qt$bhf$1...@nnrp-beta.newsland.it...

bhe ora e tutto chiaro, io una volta ho scaricato un software demo che
sbloccava le maschere, i report ed altro negli mde.
--
Ciao
Access


title: Access e Protezione

author: RobertoA

text:
>> l'mde era protetto al punto che nessuno riusciva più ad entrarci dava
>> errore.
>> Chiamato una ditta specializzata per il recupero, una cifrata .... di
> euro,
>> e poi il resto lo sapete già.
>> ciao
>
> Adesso l'hai raccontata tutta...
E cosa cambierebbe ?
Ciao
RobertoA


title: Access e Protezione

text:
"RobertoA" <
amor...@tiscalinet.it
> ha scritto nel messaggio
news:46d2e970$1...@newsgate.x-privat.org...

Nulla ma è risaputo che ci sono Ditte che a pagamento effettuano il
REVERSING anche
di EXE..., quindi non ci trovo nulla di anomalo fatto da ditte
specializzate.



title: Access e Protezione

text:
>> >> l'mde era protetto al punto che nessuno riusciva più ad entrarci dava
>> >> errore.
>> >> Chiamato una ditta specializzata per il recupero, una cifrata .... di
>> > euro,
>> >> e poi il resto lo sapete già.
>> >> ciao
>> >
>> > Adesso l'hai raccontata tutta...
>>
>> E cosa cambierebbe ?
>> Ciao
>> RobertoA
>
>
> Nulla ma è risaputo che ci sono Ditte che a pagamento effettuano il
> REVERSING anche
> di EXE..., quindi non ci trovo nulla di anomalo fatto da ditte
> specializzate.
Ma cosa stai dicendo ???
Qua si parla di aprire in 30 secondi (o comunque in tempi rapidi), e di
vedere i moduli in formato sorgente
E' chiaro che non si tratta di convertire da un eseguibile in istruzioni il
piu' possibile vicine al sorgente Access
Un convertitore da eseguibile a sorgente genererebbe tanto di quel codice
astruso che sarebbe quasi impossibile da usare
Anche se funzionasse (e funzionerebbe sicuramente), praticamente il
reversato e' senza utilizzo
A meno che tu non voglia eliminare/modificare solo alcune righe o istruzioni
particolari e ricompilarlo
Quello che intendo dire e' che ci deve essere qualche difetto e bello grosso
anche nei metodi di protezione usati per 'chiudere' un mde
Difetto che viene sfruttato da ditte specializzate in quell'attivita' che se
non disponessero di questa possibilita', si attaccherebero a 'sta sima'
La cosa davvero strana e' come mai tali problemi non vengano prontamente
eliminati
Se io fossi il signor microsoft e sapessi che esiste questa possibilita'
cercherei di capire come e' stato possibile e riparerei il problema con
tante scuse ai clienti che hanno cacciato soldi veri per programmi bacati
Ciao
RobertoA


title: Access e Protezione

text:

Roberto prima di parlare e di esprimere concetti tuoi così personali come
fossero verità tecniche ti invito ad informarti
in modo serio e professionale.
Il codice che Access genera con un MDE è PCODE equivalente al formato EXE di
VB6(chi capisce
perdonerà la mia licenza poetica)...!
Un file con protezione MDW in 2 secondi si buca , lo riesci a fare pure
tu...(forse), e questo non è un segreto per
nessuno...
Il file MDE può essere benissimo reingegnerizzato o essere oggetto del
processo di Reversing.
Non stò fornendo mie idee personali, di quanto dico c'è prova PUBBLICA nel
NG con tanto di Esempi fatti da un gruppetto di persone(ne i quali ero
presente anche io, Karl, MA, PablitoMF e molti altri...) mi permetto di
rivolgermi a te con un tono un pò perentorio.
Credo che tu abbia parlato tanto per dare aria alle tue poche idee ma ben
confuse...



title: Access e Protezione

text:
> Roberto prima di parlare e di esprimere concetti tuoi così personali come
> fossero verità tecniche ti invito ad informarti
> in modo serio e professionale.
>
> Il codice che Access genera con un MDE è PCODE equivalente al formato EXE
> di
> VB6(chi capisce
> perdonerà la mia licenza poetica)...!
>
> Un file con protezione MDW in 2 secondi si buca , lo riesci a fare pure
> tu...(forse), e questo non è un segreto per
> nessuno...
>
> Il file MDE può essere benissimo reingegnerizzato o essere oggetto del
> processo di Reversing.
>
> Non stò fornendo mie idee personali, di quanto dico c'è prova PUBBLICA nel
> NG con tanto di Esempi fatti da un gruppetto di persone(ne i quali ero
> presente anche io, Karl, MA, PablitoMF e molti altri...) mi permetto di
> rivolgermi a te con un tono un pò perentorio.
>
> Credo che tu abbia parlato tanto per dare aria alle tue poche idee ma ben
> confuse...
"..in due secondi si buca..."
Allora e' peggio di quel che credevo
Se mi dici che esistono pure delle prove pubbliche della possibilita' di
ricostruzione del sorgente partendo da un mde allora perche' le
funzionalita' legate alla protezione dei sorgenti non vengono corrette in
modo che facciano il loro mestiere ?
Perche' il loro obiettivo dovrebbe essere quello di impedire che, dato un
mde, si possa tirarne fuori il codice sorgente delle strutture contenute al
suo interno o quantomeno per impedire che si riesca a tirare fuori qualcosa
di riutilizzabile
O forse non era questo l'obiettivo delle funzioni di protezione ?
Riguardo le mie idee, puo' anche essere che siano poche e ben confuse
E' per questo che continuo il 3d, per saperne di piu' e per cercare di
ordinare quelle poche
Ciao
RobertoA


title: Access e Protezione

text:
"..in due secondi si buca..."
Allora e' peggio di quel che credevo
[Risposta]
Non credo ma non penserai veramente che esista un SW sicuro...??
Se mi dici che esistono pure delle prove pubbliche della possibilita' di
ricostruzione del sorgente partendo da un mde allora perche' le
funzionalita' legate alla protezione dei sorgenti non vengono corrette in
modo che facciano il loro mestiere ?
[Risposta]
Sei certo che il loro mestiere sia quello che pensi tu...?
NET per dire una piattaforma recente consente il ripristino del Sorgente in
modo Nativo.
Per ovviare servono sistemi di Offuscamento (ce ne sono pochi di seri ed uno
dei migliori sembra di realizzazione IT).
Perche' il loro obiettivo dovrebbe essere quello di impedire che, dato un
mde, si possa tirarne fuori il codice sorgente delle strutture contenute al
suo interno o quantomeno per impedire che si riesca a tirare fuori qualcosa
di riutilizzabile
O forse non era questo l'obiettivo delle funzioni di protezione ?
[Risposta]
Ritengo sia giusto che esistano ditte specializzate per questi lavori,
l'errore
sarebbe dare a tutti questi SW...!
Il SW in genere, deve essere protetto per 2 motivi:
1) Non essendo brevettabile almeno che venga protetto l'intelletto
2) I clienti non devono riuscire a manometterli
Per il 1° ci sono da valutare i costi per l'effettuazione del ripristino...
che sono esponenziali
alla complessità dell'applicazione di solito, per questo non credo che
nessuno di NOI
abbia interesse a spendere soldi per reingegnerizzare SW di altri.
Per il 2° la protezione a livello utente può essere sufficiente se non si
distribuisce il file MDW, quindi se si
rinuncia alla gestione USER(che per altro da 2007 non c'è più da quanto ne
sò...)
Riguardo le mie idee, puo' anche essere che siano poche e ben confuse
E' per questo che continuo il 3d, per saperne di piu' e per cercare di
ordinare quelle poche
Ciao
RobertoA



title: Access e Protezione

text:
> [Risposta]
> Non credo ma non penserai veramente che esista un SW sicuro...??
Pensavo ci volessero un po' di piu' dei trenta secondi per aprirlo
Evidentemente mi sbagliavo
> Se mi dici che esistono pure delle prove pubbliche della possibilita' di
> ricostruzione del sorgente partendo da un mde allora perche' le
> funzionalita' legate alla protezione dei sorgenti non vengono corrette in
> modo che facciano il loro mestiere ?
> [Risposta]
> Sei certo che il loro mestiere sia quello che pensi tu...?
> NET per dire una piattaforma recente consente il ripristino del Sorgente
> in
> modo Nativo.
> Per ovviare servono sistemi di Offuscamento (ce ne sono pochi di seri ed
> uno
> dei migliori sembra di realizzazione IT).
Sono certo che quello che dovevano fare non lo fanno
Se un offuscatore e' una patacca non vuol dire che in origine il suo
obiettivo fosse di "proteggere blandamente i sorgenti"
Chi l'ha scritto non l'ha creato a dovere, se non fa quello che ci si
aspetta vuol dire che e' una patacca
E non stiamo parlando di ditte specializzate nel reverse engineering, stiamo
parlando del fatto che sto 'protettore' deve resistere almeno alle prime
bordate, se cala le braghe appena lo guardi allora vuol dire che e' una
patacca
> Il SW in genere, deve essere protetto per 2 motivi:
> 1) Non essendo brevettabile almeno che venga protetto l'intelletto
> 2) I clienti non devono riuscire a manometterli
Il software in genere viene protetto perche' non si possano produrre delle
copie funzionanti
E quindi rivendibili all'insaputa del legittimo produttore/rivenditore
Poi ognuno lo fa per i fatti suoi, un mio collega ci mette le chiavette
facendole pagare 100 euro l'una
Quel modello lui lo paga 55 euri, quindi in quel caso lo fa per prenderci
altri 45 euro, stop
> Per il 1° ci sono da valutare i costi per l'effettuazione del
> ripristino...
> che sono esponenziali
> alla complessità dell'applicazione di solito, per questo non credo che
> nessuno di NOI
> abbia interesse a spendere soldi per reingegnerizzare SW di altri.
>
> Per il 2° la protezione a livello utente può essere sufficiente se non si
> distribuisce il file MDW, quindi se si
> rinuncia alla gestione USER(che per altro da 2007 non c'è più da quanto ne
> sò...)
Questa dei clienti che modificano il programma non l'ho mai vista ne sentita
Beato te che c'hai un livello di clienti evoluti, almeno quando parli di
creare una directory ti capiscono subito
Ciao
RobertoA


title: Access e Protezione

text:
> Sono certo che quello che dovevano fare non lo fanno
> Se un offuscatore e' una patacca non vuol dire che in origine il suo
> obiettivo fosse di "proteggere blandamente i sorgenti"
> Chi l'ha scritto non l'ha creato a dovere, se non fa quello che ci si
> aspetta vuol dire che e' una patacca
> E non stiamo parlando di ditte specializzate nel reverse engineering,
stiamo
> parlando del fatto che sto 'protettore' deve resistere almeno alle prime
> bordate, se cala le braghe appena lo guardi allora vuol dire che e' una
> patacca
NET è stato messo in vendita senza l'offuscatore .... ti dice nulla
questo...?
Ti dice nulla che MS non lo abbia nemmeno preso in considerazione....?
> > Il SW in genere, deve essere protetto per 2 motivi:
> > 1) Non essendo brevettabile almeno che venga protetto l'intelletto
> > 2) I clienti non devono riuscire a manometterli
>
> Il software in genere viene protetto perche' non si possano produrre delle
> copie funzionanti
> E quindi rivendibili all'insaputa del legittimo produttore/rivenditore
> Poi ognuno lo fa per i fatti suoi, un mio collega ci mette le chiavette
> facendole pagare 100 euro l'una
> Quel modello lui lo paga 55 euri, quindi in quel caso lo fa per prenderci
> altri 45 euro, stop
Quanto dici è vero e nella media delle cose la protezione MDE è efficacie
chi mai spenderebbe 1000€ per fare il Reversing
del tuo applicativo...??????(o del mio ovviamente)
Per il resto sei sicuro di vivere nel mondo reale...?
Sistemi operativi come MS sono copiabili ed installabili a costo ZERO(in
modo PIRATA da anni) e tu ritieni che il tuo applicativo non lo possa
essere...?
Se una casa come la MS non ha mai affrontato realmente il problema credi
veramente che possa essere un problema...?
Come ti dicevo devi scindere la protezione di applicativi come i Nostri che
non servono a nessuno(come oggetto di CRACK)
da SW che invece interessano... e come ti dicevo poi i costi sono
esponenziali....
> Questa dei clienti che modificano il programma non l'ho mai vista ne
sentita
> Beato te che c'hai un livello di clienti evoluti, almeno quando parli di
> creare una directory ti capiscono subito
Io ho la Fortuna(io la ritengo tale) di non avere clienti, ma purtroppo il
mio SW lo usano persone che
pensano di essere programmatori, e sono assai pericolosi... perchè per
scaricare programmini che
ByPassano le protezioni sono maestri, poi fanno macelli...!!!



title: Access e Protezione

author: luigionofrio

text:
Access ha scritto:


anche a me, leggendo il tread, mi è sceso "u cor int e cazett" . e sono
d'accordo che gli "smanettoni" ci sono e fanno più guai degli hackers!
ps  curiosità: ma quale è questo software demo che sbloccava le tabelle, i
report ecc degli mde?  vorrei sapere il nome e scansire tutti i 400 pc
della mia rete per vedere se vi è qualche collega che lo tiene installato
sul suo pc. Il dubbio mi assale! e i miei applicativi sparpagliati in rete
corrono il rischio.
l.
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Access e Protezione

text:
> NET è stato messo in vendita senza l'offuscatore .... ti dice nulla
> questo...?
> Ti dice nulla che MS non lo abbia nemmeno preso in considerazione....?
Veramente l'installazione del mio visual studio porta con se un offuscatore,
di serie
E comunque anche se Microsoft non lo produce/fornisce non vuol dire che non
sia utile, anzi indispensabile
> Quanto dici è vero e nella media delle cose la protezione MDE è efficacie
> chi mai spenderebbe 1000? per fare il Reversing
> del tuo applicativo...??????(o del mio ovviamente)
Allora, tanto per non parlare a vanvera, ho voluto provare personalmente il
tempo necessario per aprire un mde con password su db e su vba
Tempo ricerca programma sprotezione efficace = 20 minuti
Tempo instalazione programam = 2 minuti
Tempo sprotezione = 2 minuti
Non l'avevo mai provata 'sta cosa
Pero' fa rabbrividire pensare che tempo qualche minuto si possa aprire un
file che e' stato, con le apposite procedure, chiuso
Non stiamo parlando di ditte specializzate, stiamo parlando del primo pirla
che si mettesse a provarci, quindi lascia stare il costo e tutte queste
belle storielle
Pensi ancora che la protezione di un mde cosi' com'e' sia sufficientemente
robusta?
> Per il resto sei sicuro di vivere nel mondo reale...?
> Sistemi operativi come MS sono copiabili ed installabili a costo ZERO(in
> modo PIRATA da anni) e tu ritieni che il tuo applicativo non lo possa
> essere...?
E tu pensi che non ci sia motivo se fino a pochissimo tempo fa non si e' mai
perseguita una seria politica contro le copie pirata?
Personalmente credo che una parte del successo di Windows sia dovuta alla
disponibilita' di copie pirata
Per quanto riguarda i nostri applicativi, se pensassi di doverli proteggere
stai sicuro che la sprotezione non costerebbe mezz'oretta di tempo
Tu insisti col fatto che qualsiasi programma possa essere o sprotetto o
rev-ingegnerizzato e fin qua te l'appoggio
Pero' quando riesci a fare l'esperimento di cui sopra (24 minuti netti)
allora pensi "..sta protezione e' proprio na cagata.."
> Se una casa come la MS non ha mai affrontato realmente il problema credi
> veramente che possa essere un problema...?
Questa si che e' bella, e proprio strana la tua logica
E' come dire "..se Microsoft non lo fa vuol dire che non serve.."
Ma fammi il piacere
> Come ti dicevo devi scindere la protezione di applicativi come i Nostri
> che
> non servono a nessuno(come oggetto di CRACK)
> da SW che invece interessano... e come ti dicevo poi i costi sono
> esponenziali....
Beh, veramente i programmi che facciamo noi a qualcuno servono
Senno' non li faremmo
Per quanto riguarda i costi, vedi sopra, sprotezione a costo e tempo
risibile
Magari ho preso degli esempi scarsmente protetti
Se mi potessi inviare un file mde ben protetto, e vista la tua competenza
penso che non lasceresti nulla di intentato, vorrei provare ad aprirlo
Giusto per vedere se magari ho fatto io qualche errore nella chiusura dei
miei esempi
Ciao
RobertoA


title: Access e Protezione

text:
Ciao luigionofrio,
"luigionofrio" <
onofrio...@tin.it
> ha scritto nel messaggio
news:fb0gav$83g$1...@news.newsland.it...

Quello che ho provato si chiama "MDEUnlockerSetup" in versione demo e con
una piccola ricerca su google lo puoi scaricare da vari siti.
--
Ciao
Access


title: Access e Protezione

author: Alessandro Baraldi

text:
[CUT]
> Allora, tanto per non parlare a vanvera, ho voluto provare personalmente il
> tempo necessario per aprire un mde con password su db e su vba
> Tempo ricerca programma sprotezione efficace = 20 minuti
> Tempo instalazione programam = 2 minuti
> Tempo sprotezione = 2 minuti
> Non l'avevo mai provata 'sta cosa
> Pero' fa rabbrividire pensare che tempo qualche minuto si possa aprire un
> file che e' stato, con le apposite procedure, chiuso
> Non stiamo parlando di ditte specializzate, stiamo parlando del primo pirla
> che si mettesse a provarci, quindi lascia stare il costo e tutte queste
> belle storielle
Che prova hai fatto...?
Hai ottenuto un MDB da un MDE completamente aperto Moduli e tutto
quanto...
anche protetto da MDW ...???
Spiega bene il tipo di prova che hai fatto.
> Pensi ancora che la protezione di un mde cosi' com'e' sia sufficientemente
> robusta?
Si nella media delle cose...
> > Per il resto sei sicuro di vivere nel mondo reale...?
> > Sistemi operativi come MS sono copiabili ed installabili a costo ZERO(in
> > modo PIRATA da anni) e tu ritieni che il tuo applicativo non lo possa
> > essere...?
>
> E tu pensi che non ci sia motivo se fino a pochissimo tempo fa non si e' mai
> perseguita una seria politica contro le copie pirata?
> Personalmente credo che una parte del successo di Windows sia dovuta alla
> disponibilita' di copie pirata
> Per quanto riguarda i nostri applicativi, se pensassi di doverli proteggere
> stai sicuro che la sprotezione non costerebbe mezz'oretta di tempo
> Tu insisti col fatto che qualsiasi programma possa essere o sprotetto o
> rev-ingegnerizzato e fin qua te l'appoggio
> Pero' quando riesci a fare l'esperimento di cui sopra (24 minuti netti)
> allora pensi "..sta protezione e' proprio na cagata.."
Si credo che tu abbia centrato il problema, ma non appoggiarmi nulla,
normalmente mi sposto...!
> > Se una casa come la MS non ha mai affrontato realmente il problema credi
> > veramente che possa essere un problema...?
>
> Questa si che e' bella, e proprio strana la tua logica
> E' come dire "..se Microsoft non lo fa vuol dire che non serve.."
> Ma fammi il piacere
No, se MS non lo fà significa che a lei fa comodo non farlo... il
mondo dell'informatica è MS dipendente, e tu come tutti usi gli
strumenti che MS ti mette a disposizione belli, brutti o cagate che
siano... altrimenti ci metti il tuo Intelletto e ti sviluppi qualche
cosa di non ByPassabile...
> > Come ti dicevo devi scindere la protezione di applicativi come i Nostri
> > che
> > non servono a nessuno(come oggetto di CRACK)
> > da SW che invece interessano... e come ti dicevo poi i costi sono
> > esponenziali....
>
> Beh, veramente i programmi che facciamo noi a qualcuno servono
> Senno' non li faremmo
> Per quanto riguarda i costi, vedi sopra, sprotezione a costo e tempo
> risibile
> Magari ho preso degli esempi scarsmente protetti
> Se mi potessi inviare un file mde ben protetto, e vista la tua competenza
> penso che non lasceresti nulla di intentato, vorrei provare ad aprirlo
> Giusto per vedere se magari ho fatto io qualche errore nella chiusura dei
> miei esempi
Posso inviarti tutto, ma personalmente a me è un discorso che mi
interessa poco...
Se vuoi inviami una Mail e vedo che posso fare.
> Ciao
> RobertoA
Saluti
@Alex


title: Access e Protezione

author: Simone Calligaris

text:
"RobertoA"
> E tu pensi che non ci sia motivo se fino a pochissimo tempo fa non si e'
mai
> perseguita una seria politica contro le copie pirata?
> Personalmente credo che una parte del successo di Windows sia dovuta alla
> disponibilita' di copie pirata
> Per quanto riguarda i nostri applicativi, se pensassi di doverli
proteggere
> stai sicuro che la sprotezione non costerebbe mezz'oretta di tempo
> Tu insisti col fatto che qualsiasi programma possa essere o sprotetto o
> rev-ingegnerizzato e fin qua te l'appoggio
> Pero' quando riesci a fare l'esperimento di cui sopra (24 minuti netti)
> allora pensi "..sta protezione e' proprio na cagata.."
Stai esagerando, per varie ragioni.
Anzitutto, anche ammesso  ci fosse una utility in grado d'effettuare il
reverse funzionante di un .MDE (senza interventi manuali, come
presumibilmente fecero gli addetti della societą contattata da Karl Don.)
che se ne farebbero poi dei nostri "preziosi" sorgenti?
Senza le linee commento poi, rimosse in fase di creazione MDE, sarebbero
doppiamente inutilizzabili.
A parte questo, hai scoperto il segreto di pulcinella: come puoi pensare che
un offuscatore risolva i problemi quando perfino gli exe compilati in codice
macchina sono passibili di reverse engineering?
Io di certo non sono in grado di farlo: ma c'č chi lo fa, eccome.
Gli esempi di pubblico dominio sono moltissimi: si va dal reverse di celebri
algoritmi di compressione Video ai formati di Microsoft Office (mai resi di
pubblico dominio da MS eppure supportati da Open Office e altri).
Se leggi bene le clausole d'installazione di molti prodotti commerciali
(compreso win), vietano esplicitamente il reverse engineering, evidentemente
diffuso...
Saluti.


title: Access e Protezione

text:
Che prova hai fatto...?
Hai ottenuto un MDB da un MDE completamente aperto Moduli e tutto
quanto...
anche protetto da MDW ...???
Spiega bene il tipo di prova che hai fatto.
-----------------------------------------------------
Preso file mdb pieno di roba
Attivata protezione password su file
Attivata protezione password su Vba
Creato file mde
Bon
Preso programma xyz e recuperate password su file e su vba
Preso programma abc e sbloccate form e report, no moduli vba
Fine
> Questa si che e' bella, e proprio strana la tua logica
> E' come dire "..se Microsoft non lo fa vuol dire che non serve.."
> Ma fammi il piacere
No, se MS non lo fà significa che a lei fa comodo non farlo... il
mondo dell'informatica è MS dipendente, e tu come tutti usi gli
strumenti che MS ti mette a disposizione belli, brutti o cagate che
siano... altrimenti ci metti il tuo Intelletto e ti sviluppi qualche
cosa di non ByPassabile...
---------------------------------------------------
Ohhh finalmente, mi sembra che adesso il discorso sia un po' diverso da
prima
La verita' e' che ci tocca usarli cosi' questi strumenti, oppure fare in
proprio
Il fatto e' che li paghiamo, non e' che te li danno aggratis e magari uno
spererebbe di trovarli funzionanti
Posso inviarti tutto, ma personalmente a me è un discorso che mi
interessa poco...
Se vuoi inviami una Mail e vedo che posso fare.
--------------------------------------------------
L'indirizzo e' quello col quale scrivo questi messaggi
Comunque da quel po' che ho visto mi sembra di capire che e' meglio
lasciarla in pace la protezione di serie di Access
E quindi pur con tutta la curiosita' del caso, ma credo che approfondire il
discorso porti solo a perdere tempo inutilmente
Inutilmente, nel senso che magari domani salta fuori il programma kjw che ti
mostra anche i moduli
E quindi meglio affidarsi ad altro
Ciao
RobertoA


title: Access e Protezione

text:
> Stai esagerando, per varie ragioni.
> Anzitutto, anche ammesso  ci fosse una utility in grado d'effettuare il
> reverse funzionante di un .MDE (senza interventi manuali, come
> presumibilmente fecero gli addetti della società contattata da Karl Don.)
> che se ne farebbero poi dei nostri "preziosi" sorgenti?
> Senza le linee commento poi, rimosse in fase di creazione MDE, sarebbero
> doppiamente inutilizzabili.
Come 'anche ammesso' ???
Guarda che alla Debora l'hanno aperto...
...il file protetto
E pure con i moduli
E allora vuol dire che c'e' sta benedetta utility
Per quanto riguarda il '..che se ne farebbero..' basta pensare alla modifica
intestazione e rivendita di un prodotto non loro
O semplice prosecuzione utilizzo dopo la scadenza del dimostrativo...
Oppure aumento delle postazioni lavoro concesse in licenza
Oppure modifica/integrazione con altre maschere personalizzate
E via di questo passo, tutte operazioni che il produttore/rivenditore
solitamente intende proibire
> A parte questo, hai scoperto il segreto di pulcinella: come puoi pensare
> che
> un offuscatore risolva i problemi quando perfino gli exe compilati in
> codice
> macchina sono passibili di reverse engineering?
> Io di certo non sono in grado di farlo: ma c'è chi lo fa, eccome.
> Gli esempi di pubblico dominio sono moltissimi: si va dal reverse di
> celebri
> algoritmi di compressione Video ai formati di Microsoft Office (mai resi
> di
> pubblico dominio da MS eppure supportati da Open Office e altri).
> Se leggi bene le clausole d'installazione di molti prodotti commerciali
> (compreso win), vietano esplicitamente il reverse engineering,
> evidentemente
> diffuso...
E dagli co sto reverse engineering
Vedi, una quindicina d'anni fa collaboravo con un'azienda che produceva
videogiochi da bar
Bene, capitava a volte che arrivavano delle schedone di giochi concorrenti
che dovevano essere replicate
Si iniziava col riprodurre lo stampato, poi si disegnava (a colpi di beep
col tester) il circuito, alla fine si attaccavano i componenti programmabili
Tutto questo per creare una scheda che potesse, con le stesse memorie di
programma, funzionare come le originali
Tutto questo portava un team di 5-6 persone a lavorare giorno e notte per
arrivare alla scheda funzionante in breve tempo
Tempo medio 1 mese
Quello era reverse engeenering
Qua stiamo parlando che dopo 30 secondi ti viene mostrato il sorgente del
programma, e' un'altra cosa, qua c'e' qualche gabola di Access che
evidentemente viene sfruttata altrimenti non sarebbe possibile con sistemi
automatici recuperare le informazioni per avere i sorgenti
Quello che posso capire e' che sia anticonveniente mettersi a sproteggere un
mdb rispetto al rifare un sistema con funzionalita' simili
Non e' accettabile che il sistema Microsoft Access possa essere stuprato nel
giro di secondi
Ciao, io mi fermo qua
RobertoA


title: Access e Protezione

text:
On 28 Ago, 14:46, "RobertoA" <
amoro...@tiscalinet.it
> wrote:
> Che prova hai fatto...?
> Hai ottenuto un MDB da un MDE completamente aperto Moduli e tutto
> quanto...
> anche protetto da MDW ...???
> Spiega bene il tipo di prova che hai fatto.
> -----------------------------------------------------
> Preso file mdb pieno di roba
> Attivata protezione password su file
> Attivata protezione password su Vba
> Creato file mde
> Bon
> Preso programma xyz e recuperate password su file e su vba
> Preso programma abc e sbloccate form e report, no moduli vba
> Fine
Beh questo lo potevi fare anche tu... non scherzo... cio ho perso un
pò di tempo qualche anno fà e ti assicuro che è fattibile sia la PWD
di VBA che il ripristino in
automatico di Form e Report...!
Uno spunto:
Se provi ad accedere ad un MDE via Automazione vedi che tutti gli
Oggetti sono
gestibili... e non vado oltre...!
Prova a fare il REVERSING dei Moduli a vedere se trovi qualche cosa di
Free o di economico che lo fà... è questa la differenza...che
sostenevo...!
Senza il VBA dietro i Modulo a ricostruire una Maschera o un Report è
capace anche mio figlio...(e tieni conto che non ho prole)..!
[cut]
> L'indirizzo e' quello col quale scrivo questi messaggi
Si
> Comunque da quel po' che ho visto mi sembra di capire che e' meglio
> lasciarla in pace la protezione di serie di Access
No basta usarla bene e non distribuirla...!
> E quindi pur con tutta la curiosita' del caso, ma credo che approfondire il
> discorso porti solo a perdere tempo inutilmente
E' soggettivo.
> Inutilmente, nel senso che magari domani salta fuori il programma kjw che ti
> mostra anche i moduli
Sarebbe altrettanto soggettivo...!
> E quindi meglio affidarsi ad altro
Non hai ancora capito che non c'è altro...!!!
Nessun linguaggio da ASM a C a NET a JAVA a nulla ... sono tutti
reingegnerizzabili...
> Ciao
> RobertoA
@Alex


title: Access e Protezione

text:
[cut]
> E dagli co sto reverse engineering
> Vedi, una quindicina d'anni fa collaboravo con un'azienda che produceva
> videogiochi da bar
> Bene, capitava a volte che arrivavano delle schedone di giochi concorrenti
> che dovevano essere replicate
> Si iniziava col riprodurre lo stampato, poi si disegnava (a colpi di beep
> col tester) il circuito, alla fine si attaccavano i componenti programmabili
> Tutto questo per creare una scheda che potesse, con le stesse memorie di
> programma, funzionare come le originali
> Tutto questo portava un team di 5-6 persone a lavorare giorno e notte per
> arrivare alla scheda funzionante in breve tempo
> Tempo medio 1 mese
> Quello era reverse engeenering
> Qua stiamo parlando che dopo 30 secondi ti viene mostrato il sorgente del
> programma, e' un'altra cosa, qua c'e' qualche gabola di Access che
> evidentemente viene sfruttata altrimenti non sarebbe possibile con sistemi
> automatici recuperare le informazioni per avere i sorgenti
> Quello che posso capire e' che sia anticonveniente mettersi a sproteggere un
> mdb rispetto al rifare un sistema con funzionalita' simili
> Non e' accettabile che il sistema Microsoft Access possa essere stuprato nel
> giro di secondi
> Ciao, io mi fermo qua
> RobertoA
Roberto la tecnologia avanza...!
Access come VB6 come VC e tutti i linguaggi usano un Compilatore per
riprodurre il tuo EXE(MDE per Access).
Secondo te il Compilatore cos'è...???
E' un programmino cinese che con una logica converte il tuo Codice e
tutto il resto in un formato "COMPILATO"...!
Ma questo benedetto programmino che compila è scritto da UMANI non
dallo spirito santo... e se gli umani scrivono che 3+2=5 significa che
5-2=3...
Chiaro che sono cose, almeno per me, fuori dalla portata e quello che
posso fare è solo pasticciare con eventuali Tool Free, ma come ti
diceva Simone si FA...!
Giusto per farti capire.... i programmi d'installazione protetti male
fino a 10 anni fà con un Editor HEX erano riscrivibili facendogli
ByPassare la protezione della KEY...!
Ovvio che serviva conoscenza del codice ASM equivalente, ma erano cose
che con Z80 e C64 ero in grado di fare anch'io che programmavo in
Assembler(io i giochini per il Commodore e lo Spectrum li facevo...
non li copiavo)
Per quanto mi riguarda chiudo la cosa...!
@Alex


title: Access e Protezione

text:
Alessandro Baraldi ha scritto:



> [cut]

> Si



> E' soggettivo.

> Sarebbe altrettanto soggettivo...!


> > Ciao
> > RobertoA
> @Alex
Praticamente:  o ti mangi questa minestra o ti butti dalla finestra!
dobbiamo solo sperare di non incappare in qualche bastardo che ti fotte il
lavoro e ti danneggi economicamente e intellettualmente (se io fossi
baraldi, massoni, karl, cinzia e altri guru, mi preoccuperei! cacchio se
mi preoccuperei!   :-))) )
l.
luigi



title: Access e Protezione

text:
cut
non è che si deve riscrivere il faqqone del sito comune?   :-))))
l.



title: Access e Protezione

text:
ricut
conclusione:
c'è da piangere!
sic!



title: Access e Protezione

text:
"RobertoA" <
> Come 'anche ammesso' ???
> Guarda che alla Debora l'hanno aperto...
> ...il file protetto
> E pure con i moduli
> E allora vuol dire che c'e' sta benedetta utility
> Per quanto riguarda il '..che se ne farebbero..' basta pensare alla
modifica
> intestazione e rivendita di un prodotto non loro
> O semplice prosecuzione utilizzo dopo la scadenza del dimostrativo...
> Oppure aumento delle postazioni lavoro concesse in licenza
> Oppure modifica/integrazione con altre maschere personalizzate
> E via di questo passo, tutte operazioni che il produttore/rivenditore
> solitamente intende proibire
Ma per favore.
Chi vuoi che si metta a vendere e supportare un sofware fatto da un altro
... quando a malapena (se non si è più che rigorosi) si fatica a rimettere
le mani a distanza di anni sui propri lavori.
Non parliamo poi dei gestionali, che per ragioni fiscali, richiedono una
CONTINUA manutenzione del fornitore: altro che "integrazione con maschere
personalizzate" e monate simili.
Sveglia, su ... qui non siamo su iclvb: l'età media è un pochino più alta
per credere ancora alla befana.
(CUT, CUT, CUT!!!)
> Qua stiamo parlando che dopo 30 secondi ti viene mostrato il sorgente del
> programma, e' un'altra cosa, qua c'e' qualche gabola di Access che
> evidentemente viene sfruttata altrimenti non sarebbe possibile con sistemi
> automatici recuperare le informazioni per avere i sorgenti
> Quello che posso capire e' che sia anticonveniente mettersi a sproteggere
un
> mdb rispetto al rifare un sistema con funzionalita' simili
> Non e' accettabile che il sistema Microsoft Access possa essere stuprato
nel
> giro di secondi
Secondo me stai facendo conclusione: già dieci anni fa si riusciva ad aprire
un .MDE ed accedere al design delle Form.
Con Access 97, addirittura, bastava cancellare con un HEX Editor il flag MDE
ben visibile nel "mucchio".
E questo senza appigliarsi a chissà quale utility miracolosa della
"Deborah".
Ora, qui si parla di un'altra cosa: il REVERSE ENGINEERING del fottuto
P-Code di un MDE.
Fino a sei mesi fa non esisteva nulla di commerciale che, con due semplici
click, operasse questa cosa.
La dimostrazione di REVERSE ENGINEERING  procurata da Karl Don. è stata
effettuata da una ditta specializzata.
Ora, postami il link di questa utility che verifichiamo se effettivamente
effettua il REVERSE ENGINEERING del P-Code di Access AUTOMATICAMENTE.
Saluti.


title: Access e Protezione

text:
> Ma per favore.
> Chi vuoi che si metta a vendere e supportare un sofware fatto da un altro
> ... quando a malapena (se non si è più che rigorosi) si fatica a rimettere
> le mani a distanza di anni sui propri lavori.
>
> Non parliamo poi dei gestionali, che per ragioni fiscali, richiedono una
> CONTINUA manutenzione del fornitore: altro che "integrazione con maschere
> personalizzate" e monate simili.
>
> Sveglia, su ... qui non siamo su iclvb: l'età media è un pochino più alta
> per credere ancora alla befana.
;-) Attento a queste affermazioni.... il nemico ti ascolta...!
> (CUT, CUT, CUT!!!)
>
> Secondo me stai facendo conclusione: già dieci anni fa si riusciva ad
aprire
> un .MDE ed accedere al design delle Form.
> Con Access 97, addirittura, bastava cancellare con un HEX Editor il flag
MDE
> ben visibile nel "mucchio".
Già ricordo bene... ma non svelare tutti i trucchi...!
Addirittura con il 97 la PWD del DB era in chiaro spezzettata in posizioni
fisse del File
e bastava aprirlo in Binary leggere i Byte da XX a YY intervallati di ZZ per
trovarla...
;-)
> E questo senza appigliarsi a chissà quale utility miracolosa della
> "Deborah".
>
> Ora, qui si parla di un'altra cosa: il REVERSE ENGINEERING del fottuto
> P-Code di un MDE.
> Fino a sei mesi fa non esisteva nulla di commerciale che, con due semplici
> click, operasse questa cosa.
>
> La dimostrazione di REVERSE ENGINEERING  procurata da Karl Don. è stata
> effettuata da una ditta specializzata.
Questo è il Blog di Alex che si prestò a suo tempo al Test:
http://alexdyb.blogspot.com/2005/01/how-to-hide-procedure-in-library-mde.html
> Ora, postami il link di questa utility che verifichiamo se effettivamente
> effettua il REVERSE ENGINEERING del P-Code di Access AUTOMATICAMENTE.
Dalle mie parti dicono PERLE ma non di saggezza... ;-)
> Saluti.
Ciao Simone.



title: Access e Protezione

text:
OPSSS avevo sbagliato riferimento di Alex...!
Questo:
http://alexdyb.blogspot.com/2006/08/news-on-access-mde-to-mdb-conversion.html



title: Access e Protezione

text:
> Praticamente:  o ti mangi questa minestra o ti butti dalla finestra!
> dobbiamo solo sperare di non incappare in qualche bastardo che ti fotte il
> lavoro e ti danneggi economicamente e intellettualmente (se io fossi
> baraldi, massoni, karl, cinzia e altri guru, mi preoccuperei! cacchio se
> mi preoccuperei!   :-))) )
> l.
> luigi
Che sia questa la differenza...??
A me non frega nulla se mi aprono i miei applicativi, perchè la cosa è a suo
rischio
e pericolo...
Chi apre i miei applicativi e dovesse metterci le mani con cognizione di
causa merita di avere i sorgenti
ma sono sicuro che avendo quelle capacità di certo non perderebbe tempo ...!
;-)
Queste preoccupazioni sono nella maggior parte dei casi patemi d'animo per
chi vede nel lavoro
degli altri un bersaglio dal quale copiare... è una mentalità che sviluppa
chi non sviluppa, ma che vivacchia
sul lavoro di altri...(IMHO)



title: Access e Protezione

text:
"ALESSANDRO Baraldi"
> > Sveglia, su ... qui non siamo su iclvb: l'età media è un pochino più
alta
> > per credere ancora alla befana.
> ;-) Attento a queste affermazioni.... il nemico ti ascolta...!
Ma è la verità: più sei giovane e più tendi a dar peso a cose che non ne
meritebbero affatto   ;-)
Saluti.


title: Access e Protezione

text:
"Simone Calligaris" <
simo...@libero.it
> ha scritto nel messaggio
news:46d48473$0$37201$4faf...@reader3.news.tin.it...

Se giocassi a calcio saresti meglio di Maradona...
;-)



title: uso di select case

author: FANCIULLO

text:
Salva sono Fanciullo,
è possibile tramutare questo  questa condizione if in un costrutto select
case?
Private Sub Corpo_Print(Cancel As Integer, PrintCount As Integer)
 If terzePrimoC = "3" And terzeUltimoC = "r" And IsNull(Me.bocciato) Then
        Me.etQUALIFICA.Caption = "Qualif. Ricevimento"
        Else
         Me.etQUALIFICA.Caption = ""
        End If
......seguono altri if similari
end sub
ovvero si può legare diversi case con l'operatore AND??
dovrei dire a rigor di paragone
case is terzePrimoC = "3" and terzeUltimoC = "r"
Me.etQUALIFICA.Caption = "Qualif. Ricevimento"
grazie


title: uso di select case

author: Antonio Biso

text:
"FANCIULLO" <
vito...@libero.it
> ha scritto nel messaggio
news:nDjHh.14919$zG1.1...@twister2.libero.it...

No.
il select case serve per eseguire lo stesso test sulla stessa espressione
corpontandosi a seconda dei valori trovati
Antonio


title: uso di select case

text:
"Antonio Biso" <ch...@NOSPAMetruria.net> ha scritto nel messaggio
news:E4kHh.15205$J11.3...@twister1.libero.it...

> grazie Antonio


title: uso di select case

author: Michele (Giò)

text:
"FANCIULLO" <
vito...@libero.it
> ha scritto nel messaggio
news:nDjHh.14919$zG1.1...@twister2.libero.it...
> Salva sono Fanciullo,
>
> è possibile tramutare questo  questa condizione if in un costrutto select
> case?
>
> Private Sub Corpo_Print(Cancel As Integer, PrintCount As Integer)
>
> If terzePrimoC = "3" And terzeUltimoC = "r" And IsNull(Me.bocciato) Then
>        Me.etQUALIFICA.Caption = "Qualif. Ricevimento"
>        Else
>         Me.etQUALIFICA.Caption = ""
>        End If
>
> ......seguono altri if similari
> end sub
Oddio, se proprio vuoi sofisticarti la vita, potresti fare una cosa del genere:
select case terzePrimoC & terzeUltimoC & IIf(IsNull(Me.bocciato),"Nullo","NonNullo")
case "3rNullo"
    ......
    .....
case "4cNonNullo"
    ......
    .....
case ecc..
    .....
end select
Michele


title: uso di select case

text:
"Michele (Giò)" <
joyl...@alice.it
> ha scritto nel messaggio
news:45ede734$0$37200$4faf...@reader3.news.tin.it...

> No, non mi complico la vita......(ritorno alla mia sfliza di if) anche
perché non ho capito bene..........che cosa rappresenta
case "3rNullo"?
 la concatenazione dei miei tre if in una sola stringa??.........
Ciao Michele
>


title: uso di select case

text:
"FANCIULLO" <
vito...@libero.it
> ha scritto nel messaggio
news:XACHh.16139$J11.3...@twister1.libero.it...
>> No, non mi complico la vita......(ritorno alla mia sfliza di if) anche
> perché non ho capito bene..........che cosa rappresenta
> case "3rNullo"?
> la concatenazione dei miei tre if in una sola stringa??.........
>
Si, diciamo che rappresenterebbe in una sola stringa 3 condizioni, il "Nullo" e "NonNullo" è una
maniera che ho deciso io di utilizzare per valorizzare la condizione IsNull.
Se prendi mano, può risultare molto comodo.
Michele


title: Aiuto con pulsante di comando

author: Velio Pazzagli

text:
Salve, ho un problema con microsoft access. Io non me ne intendo molto di
programmazione, quindi magari è più semplice di quanto penso, ad ogni modo
non ci sono riuscito.
allora, il mio problema è questo: io gestisco il database di
un'associazione, con circa 2000 records.
Quello di cui ho bisogno, è che da una maschera, tramite un pulsante di
comando venga aperta una sessione di Word, con un modello di documento
caricato, nella fattispecie una lettera, che abbia nell'intestazione
(caro...) il nome ed il cognome del record visualizzato nella maschera
quando si è premuto il pulsante.
E' possibile fare una cosa del genere? grazie in anticipo a tutti.
Velio Pazzagli


title: Aiuto con pulsante di comando

author: LaLo

text:
"Velio Pazzagli" <
we...@libero.it
> ha scritto nel messaggio
news:vUl86.51363$eB2.4...@news.infostrada.it...

Se intendi stampare una lettera nella quale variare solo i dati personali
(nome, indirizzo, quota iscrizione ...) allora potresti agire come segue:
- Ti crei un documento Word che sarà la tua lettera tipo;
- Sul menu strumenti, seleziona stampa unione (meglio se dai uno sguardo
all'help a tale voce);
- Se vuoi richiamare il documento Word alla pressione di un tasto sulla
maschera Access, il codice da inserire è il seguente:
    Dim oApp As Object
    Set oApp = CreateObject("Word.Application")
    oApp.Visible = True
    oApp.WindowState = 1
    oApp.Run MacroName:="Macro per stampa"
dove la macro indicata all'ultima riga effettua la stampa unione e dovrebbe
contenere un'istruzione del genere:
    With ActiveDocument.MailMerge
        .Destination = wdSendToNewDocument
        .MailAsAttachment = False
        .MailAddressFieldName = ""
        .MailSubject = ""
        .SuppressBlankLines = True
        With .DataSource
            .FirstRecord = wdDefaultFirstRecord
            .LastRecord = wdDefaultLastRecord
        End With
        .Execute Pause:=True
    End With
Ciao
LaLo


title: Aiuto con pulsante di comando

text:
Allora, grazie per l'aiuto, ma c'è qualcosa che non capisco.
Il documento word è ok, la stampa unione non è un problema.
per inserire il codice che mi hai detto in access, devo selezionare le
proprietà del comando, scegliere routine evento su clic e inserire il codice
nella finestra dell'editor visual basic, giusto?
ma ora, come faccio a dire che deve aprire proprio il documento word che io
ho creato in precedenza? e soprattutto, il codice della macro, dove devo
inserirlo?
grazie.


title: Aiuto con pulsante di comando

text:
"Velio Pazzagli" <
we...@libero.it
> ha scritto nel messaggio
news:Avz86.54916$eB2.4...@news.infostrada.it...
> Allora, grazie per l'aiuto, ma c'è qualcosa che non capisco.
> Il documento word è ok, la stampa unione non è un problema.
> per inserire il codice che mi hai detto in access, devo selezionare le
> proprietà del comando, scegliere routine evento su clic e inserire il
codice
> nella finestra dell'editor visual basic, giusto?
Esatto. Ad esempio sull'evento clic di un pulsante di comando.
> ma ora, come faccio a dire che deve aprire proprio il documento word che
io
> ho creato in precedenza? e soprattutto, il codice della macro, dove devo
> inserirlo?
> grazie.
>
La pacro successiva è una macro di Word. Prima della stampa unione devi
aprire il documento con un comando del genere:
    Documents.Open FileName:="Lettera.doc", ConfirmConversions:=False, _
        ReadOnly:=False, AddToRecentFiles:=False, PasswordDocument:="", _
        PasswordTemplate:="", Revert:=False, WritePasswordDocument:="", _
        WritePasswordTemplate:="", Format:=wdOpenFormatAuto
La macro puoi scriverla con il VBA di Word (Strumenti-> Macro->Editor di
Visual Basic).
HTH
LaLo


title: Aiuto con pulsante di comando

text:
"LaLo" <reg...@LLtin.it> ha scritto nel messaggio
news:93ukuc$t5l$1...@pluto.sm.dsi.unimi.it...
[CUT]
Scusa ma mi sono accorto che non ho spiegato bene. La riga:
oApp.Run MacroName:="Macro per stampa"
che ti ho postato precedentemente, esegue una macro di Word. In questa macro
devi aprire il documento che ti interessa (vedi il post precedente) e poi
eseguire una stampa unione.
LaLo


title: Aiuto con pulsante di comando

author: ILC CARRARA

text:
Ciao, io ho risolto in questo modo:

ho creato un a query che praticamente fa da filtro impostando
nel campo Id il criterio (attraverso il generatore di espressione)
[Forms]![Mia_Maschera]![ID], dove ovviamente Mia_Maschera (che contiene, Nome,
cognome...) è quella nella quale ho inserito un pulsante di comando generando,in
parte con l'ausilio della creazione guidata, il seguente Codice a fronte
dell'evento click:

Private Sub Comando21_Click()
On Error GoTo
Err_Comando21_Click

     Dim oApp As Object

    Set oApp =
CreateObject("Word.Application")
   'questo comando ti permette di
eseguire l'applicazione word aprendo
StampaUnione.doc

   oApp.Application.Documents.Open
"c:\documenti\StampaUnione.doc"
    oApp.Visible =
True

Exit_Comando21_Click:
    Exit
Sub

Err_Comando21_Click:
    MsgBox
Err.Description
    Resume Exit_Comando21_Click

End Sub
E' sicuramente più rozzo della soluzione
offerta da Lalo, anzi rozzissimo ma assicura il funzionamente per chi come noi
due( scusa se mi permetto) ne capiscono poco di programmazzione e cercano di
ottenere un risultato;

forse è questa la differenza fra un programmatore ed un Buon
programmatore,

Ciao


title: Aiuto con pulsante di comando

text:
""ILC CARRARA"" <
ilc...@ilccarrara.com
> ha scritto nel messaggio
news:000601c07f15$78eccec0$0700...@tiscalinet.it...
Ciao, io ho risolto in questo modo:
ho creato un a query che praticamente fa da filtro impostando nel campo Id
il criterio (attraverso il generatore di espressione)
[Forms]![Mia_Maschera]![ID], dove ovviamente Mia_Maschera (che contiene,
Nome, cognome...) č quella nella quale ho inserito un pulsante di comando
generando,in parte con l'ausilio della creazione guidata, il seguente Codice
a fronte dell'evento click:
Private Sub Comando21_Click()
On Error GoTo Err_Comando21_Click
    Dim oApp As Object
    Set oApp = CreateObject("Word.Application")
   'questo comando ti permette di eseguire l'applicazione word aprendo
StampaUnione.doc
   oApp.Application.Documents.Open "c:\documenti\StampaUnione.doc"
   oApp.Visible = True
Exit_Comando21_Click:
   Exit Sub
Err_Comando21_Click:
   MsgBox Err.Description
   Resume Exit_Comando21_Click
End Sub
E' sicuramente piů rozzo della soluzione offerta da Lalo, anzi rozzissimo ma
assicura il funzionamente per chi come noi due( scusa se mi permetto) ne
capiscono poco di programmazzione e cercano di ottenere un risultato;
forse č questa la differenza fra un programmatore ed un Buon programmatore,
Ciao
==============
La soluzione che hai proposto non č dissimile da quella che avevo postato.
La differenza č che dopo aver creato l'oggetto Word, apri il documento,
mentre io avevo proposto di eseguire una macro di Word.
Ciao
LaLo


title: Aiuto con pulsante di comando

text:
"LaLo" <reg...@LLtin.it> ha scritto nel messaggio
news:940scn$r80$1...@pluto.sm.dsi.unimi.it...
> ==============
> La soluzione che hai proposto non è dissimile da quella che avevo postato.
> La differenza è che dopo aver creato l'oggetto Word, apri il documento,
> mentre io avevo proposto di eseguire una macro di Word.
> Ciao
> LaLo
>
Invece direi il contrario; la tua soluzione prevede l'uso di codice da parte
access + word, mentre quella proposta da "ILC CARRARA" solo da parte access.
Questo ti porta ad avere una semplificazione della "costruzione" del
documento word preoccupandoti solamente dell'abbinare la giusta fonte dati e
i campi necessari per la stampa unione...
Ciao.


title: Aiuto con pulsante di comando

text:
Allora, inserendo il codice suggerito da ILC CARRARA, riesco ad aprire il
documento, ma la stampa unione non avviene automaticamente con il nome che č
presente in quel momento sulla maschera, bensě con il primo record del
database.
Non ho ben capito dove va inserito il codice [Forms]![Mia_Maschera]![ID]
ti dispiacerebbe rispiegarmelo? tu fai una query, giusto? ma poi devi anche
aggiungere il campo ID al database?


title: Aiuto con pulsante di comando

text:
"Velio Pazzagli" <
we...@libero.it
> ha scritto nel messaggio
news:0Ze96.71296$eB2.5...@news.infostrada.it...

Oltre al fatto che sul sito comune trovi quello che cerchi (e ancora di
piů), questo č un altro esempio:
'---------------------
Sub ApriWordperMailmerge()
Dim oDoc As Word.Document
Set oDoc = CreateObject("Word.Document")
oDoc.Application.Documents.Open "c:\documenti\NomeDocumento.doc"
With oDoc.MailMerge
    .Destination = wdSendToNewDocument
    .Execute
End With
oDoc.Close
Set oDoc = Nothing
End Sub
'--------------------
Ciao.


title: Aiuto con pulsante di comando

text:
> Oltre al fatto che sul sito comune trovi quello che cerchi (e ancora di
> più)
Io sul sito comune non sono riuscito a trovarlo...


title: Aiuto con pulsante di comando

text:
"Velio Pazzagli" <
we...@libero.it
> ha scritto nel messaggio
news:8nh96.72000$eB2.5...@news.infostrada.it...
> > Oltre al fatto che sul sito comune trovi quello che cerchi (e ancora di
> > più)
>
> Io sul sito comune non sono riuscito a trovarlo...
>
http://members.xoom.it/_XOOM/it_db_access/tips34.htm
Ciao.


title: Aiuto con pulsante di comando

text:
Perfetto, quel codice lo avevo trovato.
adesso, il mio problema è che non deve scrivere un testo dl nulla (hello
word, nell'esempio) bensì inserire nell'intestazione della lettera che già
esiste, nome e cognome presenti sulla maschera nel momento in cui io premo
il pulsante...
si può fare?


title: Aiuto con pulsante di comando

text:
"Velio Pazzagli" <
we...@libero.it
> ha scritto nel messaggio
news:OaU96.87040$eB2.6...@news.infostrada.it...

Secondo me il problema è un'altro; forse non sai come funziona la stampa
unione di word.
- prepari una query (chiamiamola informativa) che contiene i dati che dovrai
visualizzare sul documento word;
- nella struttura della query ci inserisci il riferimento al controllo sulla
maschera che ti serve per filtrare i dati; per esempio la casella di testo
[nominativo]. Il riferimento nella colonna (della query) con il campo
"nominativo" alla riga "criteri" ci inserisci: (esempio)
forms!nomeMaschera!nominativo;
- con word prepari il documento, diciamo che si chiama "informativa.doc";
- scrivi il testo della lettera: "Egr. la informiamo che il suo abbonamento
scade il , restiamo a sua disposizione...";
- poi menù Strumenti - stampa unione - "documento principale" crea lettera
tipo - finestra attiva - dati - apri origine dati - tipo file *.mdb - ci
associ l'mdb e scegli la query "informativa" - ok - chiudi; ti sarai accorto
che si è aggiunta una barra strumenti che presenta (da sinistra a destra) li
bottone "inserisci campo unione"; lo premi e vedrai l'elenco dei campi che
avevi inserito nella query.
Non fai altro che posizionarti nel punto dove vuoi inserire i dati e
inserire il campo unone, es: "Egr. <<Nominativo>> la informiamo che il suo
abbonamento scade il <<dataScadenza>>, restiamo a sua disposizione...";
chiudi e salvi;
L'esempio che ti ho inviato non scrive nulla sul documento perché ci pensa
word a leggere i dati e crearti il nuovo documento tramite la "stampa
unione" (mailmerge).
Ciao.


title: funzione 'date?

author: ferruccio

text:
Ciao a tutti,
ho fatto una Query di aggiornamento di un campo data
per aggiornarlo alla data corrente con la seguente espressione "Date()"
come risultato mi viene restituito in seguente errore:
funzione 'date' non definita nell'espressione
scusate e grazie per l'eventuale aiuto.


title: funzione 'date?

author: Napoleone

text:
"ferruccio" <
wbl...@inwind.it
> ha scritto nel messaggio
news:OJxbe.66526$IN.11...@twister2.libero.it...

Prova cosi
 =Date()
Ciao Napoleone


title: funzione 'date?

text:
"ferruccio" <
wbl...@inwind.it
> wrote in message
news:OJxbe.66526$
IN.11...@twister2.libero.it

Sembrerebbe un tipico errore dovuto all'errata assegnazione
o alla mancanza di qualche Libreria.
Verifica nei Riferimenti se trovi qualche MANCA:......Nome
Dalla pagina VBA strumenti--->Riferimenti
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: [?] Creazione guidata grafico

author: Amadeus

text:
Salve a tutti da Amadeus,
Qualcuno sa spiegarmi cosa vuol dire, come mai e come ovviare ?
Mi succcede questo : nell' IDE di Access nella finestra oggetto seleziono
'Report'
quindi dal menu scelgo 'Nuovo' e poi 'Creazione guidata grafico'. Ebbene non
riesco
a creare un report con un grafico perche' mi da sempre questo messaggio di
errore:
"Argomento Classe non valido nella funzione CreateObject della routine di
 VisualBasic che si sta cercando di eseguire".
Sarei grato a chiunque potesse aiutarmi.
Amadeus


title: [?] Creazione guidata grafico

text:
"Amadeus" <
Ama...@fan.com
> ha scritto nel messaggio
news:8bdlec$q7$1...@nslave2.tin.it...

Controlla i riferimenti alle librerie...
Ciao.


title: [?] Creazione guidata grafico

text:
Scusa Sergio, ma quale libreria devo caricare per il grafico ?
Ciao
Sergio MAZZA ha scritto nel messaggio <8bdlr0$ib7$
1...@suite03.caspur.it
>...



title: [?] Creazione guidata grafico

text:
"Amadeus" <
Ama...@fan.com
> ha scritto nel messaggio
news:8bdmsq$m57$1...@nslave1.tin.it...

Presumo che sia questo il problema; ho provato a fare la stessa operazione
che hai descritto tu (creare un report + grafico con il wizard) e non mi ha
dato nessun problema. Io ho installato (access'97 completo) i riferimenti
alle librerie:
- Visual Basic for Application
- Microsoft Access 8.0 Object library
- Microsoft DAO 3.5 Object library
- Microsoft Excel 8.0 Object library (non credo sia influente)
i riferimenti li trovi entrando nella struttura dei moduli e con il menů
strumenti - riferimenti.
Ciao.


title: Corrispondente vba della procedura guidata collegamento tabelle  Outlook

author: ciroteo

text:
Ciao a tutti, vorrei capire quale è la sintassi in vba per collegare
una o più tabelle ( in particolare i contatti) presenti in un outlook
con profilo exchange.
Con la procedura guidata (collega tabelle) selezionando il tipo
database outlook funziona, ma non riesco a trovare il corrispondente
in vba.
Spero di essere stato chiaro.
Buona giornata
m


author: MA

text:

Ciao testina...
converti in vba la macro corrispondente...
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


text:

testolina bella ... !
non c'è il comando nelle macro ... avevo provato pure io!
c'è trasferisci database, trasferisci foglio di calcolo, delimitato.
ma nel db non c'è il tipo Outlook.
:-)


author: giorgio rancati

text:
"ciroteo" <
matteo...@gmail.com
> ha scritto nel messaggio
news:674c3439-0ee2-4349...@m3g2000hsc.googlegroups.com...

Ciao Matteo,
La sintassi VBA è la stessa che usi per allegare tabelle da qualsiasi db
(Access,ODBC ecc),  quello che cambia è proprietà Connect.
es per allegare i contatti da Outlook2002 no profilo Exchange.
----
Dim db As DAO.Database
Dim Tdf As TableDef
Set db = CurrentDb
Set Tdf = db.CreateTableDef("Contatti")
Tdf.SourceTableName = "Contatti"
Tdf.Connect = "Outlook 9.0;MAPILEVEL=Cartelle
personali|;PROFILE=Outlook;TABLETYPE=0;TABLENAME=Contatti;DATABASE=C:\Dati\;TABLE=Contatti"
db.TableDefs.Append Tdf
Set Tdf = Nothing
Set db = Nothing
---
(DATABASE=C:\Dati\  è solo il percorso in cui viene creato il file
Schema.ini)
per conoscere la stringa di connessione collega la tabella con la procedura
guidata, poi nella finestra immediata di VBA scrivi:
----
? Currentdb.TableDefs("Contatti").Connect
----
fatto questo cancella la tabella e prova ad allegarla da VBA.
Non ho Exchange quindi ho provato con i contatti di Outlook ma non credo ci
siano problemi.
Ciao
--
Giorgio Rancati
[Office Access MVP]


text:
On 8 Apr, 14:46, "giorgio rancati"
<
giorgio_No_Spalmer_ranc...@tiscali.it
> wrote:
> "ciroteo" <
matteo.ci...@gmail.com
> ha scritto nel messaggionews:674c3439-0ee2-4349...@m3g2000hsc.googlegroups.com...

grande giorgio ... provo subito!


text:

> grande giorgio ... provo subito!- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
funziona è un po' lunga la stringa perchè mi collego ad una
sottocartella ma ho capito bene il meccanismo.
grazie giorgio.
spero a questo punto di non avere cali di prestazioni nel leggere
tabelle di exchange, ma mi sembrano abbastanza buone.
fortuna che sono solo una ventina di client.


text:
ciroteo wrote:
> On 8 Apr, 13:18, "MA" <
mas...@massimilianoamendola.it
> wrote:
>> ciroteo wrote:
>>> Ciao a tutti, vorrei capire quale è la sintassi in vba per collegare
>>> una o più tabelle ( in particolare i contatti) presenti in un
>>> outlook con profilo exchange.
>>> Con la procedura guidata (collega tabelle) selezionando il tipo
>>> database outlook funziona, ma non riesco a trovare il corrispondente
>>> in vba.
>>> Spero di essere stato chiaro.
>>
>>> Buona giornata
>>> m
>>
>> Ciao testina...
>> converti in vba la macro corrispondente...
>>
>
> testolina bella ... !
> non c'è il comando nelle macro ... avevo provato pure io!
> c'è trasferisci database, trasferisci foglio di calcolo, delimitato.
> ma nel db non c'è il tipo Outlook.
>
> :-)
E io che mi metto a sprecare il tempo a far battute...
volevo crearti la sindrome
"porc.. è vero!!! Come ho fatto a non pensarci " e poi
"Non lo trovo!!! Sarò io che sbaglio?!!"
--
--
MAssimiliano Amendola
www.accessgroup.it



title: Date

author: MASSIMO COLUZZI

text:
Scusate ragazzi, ho passato in rassegna il sito comune ma non riuscito a
trovare ciò che mi serve.
ho la necessità di eseguire una query di selezione che mi chieda il mese da
ricercare su un campo che ha il formato "data in cifre"
Grazie
--
Massimo Coluzzi
colu...@tin.it
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access


title: Date

author: Lbo

text:
>ho la necessità di eseguire una query di selezione che mi chieda il mese da
>ricercare su un campo che ha il formato "data in cifre"
nella query di selezione dovrai avere una espressione che "converta"
la data nel valore numerico del mese, o, meglio ancora, come suggeriva
Karl pochi giorni fa, nel valore numerico meseanno.  infatti se tu
avessi record da marzo 1998 a marzo 2000 e chiedessi i record che
hanno mese 04 ti arriverebbero quelli di aprile 1998 e aprile 1999.
se per te va bene così comunque, allora è diverso.
l'espressione per visualizzare il mese è format(nomecampo, "mm").  per
visualizzare anche l'anno è format(nomecampo, "mmyyyy").  se hai
problemi prova a sostituire la virgola col punto e virgola.
se per default vuoi considerare il mese dell'anno in corso setta
un'altra colonna in cui l'espressione sia format(nomecampo, "yyyy") e
il criterio sia format(now, "yyyy").
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------



title: Suggerimenti (o aiuto) pe runa transcodifica che non so fare.

text:
buongiorno a tutti.
1° problema
Ho due tabelle di dati riferiti a circa 2500 [nome proprio di ufficio]
sulle quali devo analizzare moltitudini di dati.
Ho un altra tabella "Uffici" dove ciascun ufficio [con relativo nome
proprio] ha un proprio [codice immobile] univoco.
Ad esempio, nelle due tabelle di cui sopra potrò trovare un centinaio
di record riferiti a "Granozzo con monticello" [nome proprio
dell'ufficio] che tramite una query dovrei aggiornare in tabella con
il corrispettivo [codice immobile] proveniente dalla tabella "uffici"
che risulterà "CNL123456789"

2° problema
Non sempre troverò perfetta corrispondenza tra il [nome proprio
ufficio] e quello proveniente dalla tabella [uffici] quindi dovrei
pure capire come poter fare (presumo una query) per modificare a mano
i nomi in modo tale da poter ottenere per ciascun ufficio il proprio
codice immobile.

grazi einfinite a tutti pe rl'attenzione e in modo particolare a chi
potràvorrà aiutarmi.
grazie


author: BFS

text:
Il 02/02/2012 10:42, ignazio.pilone ha scritto:
> buongiorno a tutti.
> 1° problema
> Ho due tabelle di dati riferiti a circa 2500 [nome proprio di ufficio]
> sulle quali devo analizzare moltitudini di dati.
> Ho un altra tabella "Uffici" dove ciascun ufficio [con relativo nome
> proprio] ha un proprio [codice immobile] univoco.
> Ad esempio, nelle due tabelle di cui sopra potrò trovare un centinaio
> di record riferiti a "Granozzo con monticello" [nome proprio
> dell'ufficio] che tramite una query dovrei aggiornare in tabella con
> il corrispettivo [codice immobile] proveniente dalla tabella "uffici"
> che risulterà "CNL123456789"

se la tabella uffici  ha nome proprio e codice immobile univoci puoi fare:

update tabella1 set codiceimmobile=(select codiceimmobile from
tabellaUffici where tabella1.nomeproprio=tabellauffici.nomeproprio)

ovviamente adatta il nome della tabella e il nome dei cambi in base ai
tuoi dati

>
> 2° problema
> Non sempre troverò perfetta corrispondenza tra il [nome proprio
> ufficio] e quello proveniente dalla tabella [uffici] quindi dovrei
> pure capire come poter fare (presumo una query) per modificare a mano
> i nomi in modo tale da poter ottenere per ciascun ufficio il proprio
> codice immobile.
>

qui si complica la cosa....i nomi per cosa possono differire? punti?
virgole? spaziature?

> grazi einfinite a tutti pe rl'attenzione e in modo particolare a chi
> potràvorrà aiutarmi.
> grazie

ciao
BFS


text:

ciao BFS.
grazie davvero per l'aiuto.

Per adesso sto procedendo così:
Premetto che la mia intraprendenza è solo per capire e non insegnare
nulla, magari sbaglio e ti ringrazio anticipatamente per l'aiuto.
Ho realizzato una query "transcodifica" che prende dalla tabella
"uffici" [codice immobile],[ il nome proprio ufficio] e [nome del
corrispondente ufficio da andare a ricercare nelle tabelle dei dati].
In pratica se l'[ufficio] di "Granozzo con monticello"  [codice
immobile] "CNL123456789" verrà indicato nelle due tabelle di dati con
il nome "Granozzo"
la query mi indicherà:
[codice immobile][nome proprio ufficio][nome del corrispondente
ufficio da andare a ricercare nelle tabelle dei dati].

A questo punto dalle due tabelle di dati avrei bisogno, (probabilmente
il tuo codice è proprio quello di cui ho bisogno ma non ho capito dove
metterlo o come lanciarlo) che nel campo [codicimmobile]
(originariamente vuoto) al nome "Granozzo" corrisponda il codice
"CNL123456789"...

grazie davvero per l'aiuto.


text:

se ho capito bene:
la query (che chiamo NomeTuaQuery) ha i campi: codiceImmobile,
nomeproprioufficio, nomecorrispondente
compilati con: "CNL123456789","Granozzo con monticello","Granozzo"

la tabella (che chiamo NomeTuaTabella) ha due colonne:
nomecorrispomdente, codice immobile
con nomecorrispomdente="granozzo"  e codiceufficio=vuoto

se vuoi aggiornare la tabella con i codiceufficio presente nella query,
devi crearti una nuova query, andare in visualizzazione sql e scrivere:

update NomeTuaTabella set codiceufficio=(select codiceufficio from
NomeTuaQuery where
nomeTuaTabella.nomecorrispondente=nometuaquery.nomecorrispondente)

la salvi e la apri

ciao
BFS


text:

> BFS- Nascondi testo citato
>
> - Mostra testo citato -

davvero complimenti, hai capito perfettamente il mio problema.
Ora sono impegnato con la compilazione della tabella di trancodifica,
appena ultimato provo e ti faò sapere.
grazie davvero per la tempestività, competenza e cortesia.

ciao.


text:

> ciao.- Nascondi testo citato
>
> - Mostra testo citato -

ciao ancora,
ti chiamo da sotto un manto di neve...stasera non so se vado a casa...
purtroppo non funziona...e avrai capito che non sono un
programmatore...ma ci provo.

Allora cerco di spiegare.
Quando lancio la query mi chiede di inserire un valore parametro e
precisamente :

QRY_TRANSCODIFICA_TRIBUTI.UfficioSAP

che poi con un altro textbox mi dice : " per l'operazione è necessaria
una query aggiornabile."

il codice che ho scritto nella query è:

UPDATE TRIBUTI SET Codiceimmobile = (SELECT Codiceimmobile from
QRY_TRANSCODIFICA_TRIBUTI WHERE TRIBUTI.UfficioSAP)=
(QRY_TRANSCODIFICA_TRIBUTI.UfficioSAP);

dove TRIBUTI è la tabella originaria che contiene i campi
"Codiceimmobile" (vuoto) e il campo UfficioSAP (Granozzo)

QRY_TRANSCODIFICA_TRIBUTI contiene Codiceimmobile (CN123456789) e
UfficioSAP (Granozzo)

La mia query riconoscendo granozzo dovrebbe riportare il relativo
codiceimmobile in tabella.

Sicuramente faccio casino ma non capisco l'istruzione...
Hai ancora un attimo di pazienza ?

grazie ciao


text:

forse non ci capiamo con i dati....andiamo di codice allora.
apri un nuovo modulo... incollaci dentro:

Private Sub test()
Dim db As Database
Set db = CurrentDb()
Dim tuaquery As DAO.Recordset
Dim tributi As DAO.Recordset

Set tributi = db.OpenRecordset("tributi")
While Not tributi.EOF
     Set tuaquery = db.OpenRecordset("select * from
QRY_transcodifica_tributi where ufficiosap='" &
tributi.Fields("ufficiosap") & "'")
     tributi.Edit
     tributi.Fields("codiceimmobile") = tuaquery.Fields("codiceimmobile")
     tributi.Update
     tributi.MoveNext
     Set tuaquery = Nothing
Wend
Set tributi = Nothing
Set db = Nothing
End Sub

mandala in esecuzione e vedrai che funziona

prima:
http://imageshack.us/photo/my-images/513/prima.png/

dopo:
http://imageshack.us/photo/my-images/192/dopoh.png/

ciao
BFS


text:
On 3 Feb, 10:31, "ignazio.pilone" <
ignazio.pil...@gmail.com
> wrote:

> Scusami ma ho davvero qualche problema...
> Sono riuscito (spero perlomeno ...forse..) ad adattare il codice del
> modulo senza che mi dichiari errori di compilazione.(avevo dei campi
> che non combinavano)
> Mi chiarisci solo, sempre se ne hai ancora voglia come posso lanciare
> il modulo e farlo eseguire da una maschera ?
> Ho provato a farlo da una macro ma non mi sembra la strada giusta...
>
> grazie ancra e scusami per l'insistenza
>
> ok grazie ancora- Nascondi testo citato
>
> - Mostra testo citato -

proprio non ci riesco....

Provo a riepilogare:

la tabella TRIBUTI, quella con tutti  i dati da analizzare secondo il
Codice immobilare, contiene al campo Ufficio la voce "Granozzo".
La tabella UFFICI, utilizzata come interfaccia, contiene il campo
Ufficio (Granozzo) e il suo Codiceimmobile univoco.
La query QRY_TRANSCODIFICA_TRIBUTI associa al campo Ufficio (Granozzo)
il suo Codiceimmobile univoco (CNL12345678).

Purtroppo dopo mille prove, dovute alla mia inesperienza e ignoranza
in materia, in tabella TRIBUTI  mi scrive solo tutti i codici immobile
relativi al primo Ufficio e poi probabilmente al passaggioa al secondo
Ufficio mi da' errore di sintassi, operatore mancante.
Questo è il mio codice:

Private Sub test()
Dim db As Database
Set db = CurrentDb()
Dim QRY_TRANSCODIFICA_TRIBUTI As DAO.Recordset
Dim TRIBUTI As DAO.Recordset

Set TRIBUTI = db.OpenRecordset("TRIBUTI")
While Not TRIBUTI.EOF
     Set QRY_TRANSCODIFICA_TRIBUTI = db.OpenRecordset("select * from
QRY_TRANSCODIFICA_TRIBUTI where Ufficio='" & TRIBUTI.Fields("Ufficio")
& "'")
     TRIBUTI.Edit
     TRIBUTI.Fields("Codiceimmobile") =
QRY_TRANSCODIFICA_TRIBUTI.Fields("Codiceimmobile")
     TRIBUTI.Update
     TRIBUTI.MoveNext
     Set QRY_TRANSCODIFICA_TRIBUTI = Nothing
Wend
Set TRIBUTI = Nothing
Set db = Nothing
End Sub

grazie di cuore a chiunque vorrà e potrà aiutarmi...
un caro saluto.


text:

> un caro saluto.- Nascondi testo citato
>
> - Mostra testo citato -

Spero ancora nell'aiuto di qualche buon cuore....perchè da solo non
riesco più a venirne fuori.

In pratica dovrei scrivere nella tabella TRIBUTI al campo
Codiceimmobile il campo Codiceimmobile
risultante dalla query QRY_TRANSCODIFICA_TRIBUTI
Ho provato una query aggiornabile con il seguente codice:

UPDATE QRY_TRANSCODIFICA_TRIBUTI RIGHT JOIN TRIBUTI ON
QRY_TRANSCODIFICA_TRIBUTI.Ufficio=TRIBUTI.Ufficio SET
TRIBUTI.Codiceimmobile = QRY_TRANSCODIFICA_TRIBUTI.Codiceimmobile;

Purtroppo mi dice che per l'operazione è necessaria una query
aggiornabile...non ci capisco più nulla...
E' graditissimo ogni aiuto.....
grazie


text:

>>>> tributi.Fields("ufficiosap")&  "'")

puoi mandarmi il file che te lo faccio io direttamente?
se si ti contatto in mail

ciao
BFS


text:

Certo che si...grazie infinite, basta che non ti aspetti di trovare
chissa cosa, sono un principiante.
spiegami solo come condividere il file.

grazie
ciao.


text:

ti ho mandato mail
ciao
BFS


title: Quesito.

author: LC

text:
ERSA-FVG Gorizia
****************
Ho creato alcune applicazioni (non critiche) in LAN (dati sul server,
programma sui client) e tutto funziona per benino, quando punto ai dati sia
utilizzando tabelle allegate che aprendo il database da codice, riesco a far
andare tutto. Tra breve viene attivata una WAN permanente(WinNT), prima di
fare danni e/o perdere ore ed ore per capire eventuali problemi legati al
viaggiare dei dati tra una rete e l'altra vorrei sapere se qualcuno di voi
ha già affrontato questo lavoro ed i problemi riscontrati e magari risolti.
So benissimo che passare ad Oracle o SQL sarebbe meglio, forse sarà la
soluzione ma come al solito "per fare presto" sarebbe l'ideale poter
utilizzare immediatamente l'esistente.
Vi ringrazio per l'attenzione.
Luigi
lco...@bigfoot.it
GSI.c...@ersa.fvg.it


title: Quesito.

author: Sib

text:
"LC" <
lco...@bigfoot.com
> ha scritto nel messaggio
news:8pi37h$eq2$1...@pinco.nettuno.it...

Certamente per una WAN sarebbe meglio un SQL Server, comunque, il problema
che ti devi porre e' la velocità della WAN.
Tieni presente che Access, quando apri una query ti scarica tutto il
Recordset generando un discreto traffico di rete. Via modem, ad esempio, e'
impensabile lavorare con access soltanto, si deve almeno pensare a pagine
ASP se non a SQL.
Comunque, anche se usi SQL o altro come BE, Access rimane comunque un buon
FE (A2000 legge nativamente i db SQL Server).
Comunque considera l'uso delle transazioni se esegui query di
modifica/aggiornamento da codice.
Ciao, Sib


title: Quesito.

text:
ERSA-FVG Gorizia
****************
Grazie, è quello che immaginavo, le transazioni mi sono abituato ad usarle e
le consiglio vivamente a tutti per lavorare da codice sui dati, mi hanno
salvato dalle conseguenze di alcuni miei antipatici errori; dovrò comunque
modificare alcune cose per ridurre la grandezza dei recordset scaricati.
Luigi.