Newsgroup: it.comp.appl.access
Titolo: [ANNUNCIO] - Database free

Ciao dunque, per chi può interessare oggi ho aggiustato il mio db in
modo da eliminare tutti i problemi di runtime relativi all'assenza di
record nel database.
Praticamente gli utenti del mio database potranno accedere alla Scheda
Primo Contatto e alla Scheda Anagrafica Utenti solo se c'è ALMENO un
utente nel database.
Altrimenti con una msgbox sono indirizzati altrove.
Perciò il db è bello che pronto per un primo utilizzo, anche se in
versione Beta 1.
Questo mi ha spinto a scrivere oggi questo secondo post in merito alla
mia intenzione di rilasciare poi questo database in rete, con tutte le
routine documentate, i riferimenti agli autori, ed un manuale utente.
Prego quindi chiunque abbia contribuito fin'ora alla realizzazione del
mio database - eg. chiunque abbia avuto la pazienda di starmi ad
ascoltare :D - a scrivermi in email fenice1976 CHIOCCIOLA hotmail PUNTO
com, con il proprio nome e cognome, ed i riferimenti ai post di aiuto.
Ad.es.
Ciao, sono tizio. In data xx/xx/xxxx ho postato il seg. reply ad un tuo
messaggio
<SEGUE REPLY>
ecc...ecc...
In modo che, una volta rilasciato, nelle routine ci possa essere il
riferimento originale a chi me l'ha data.
Data prevista rilascio - entro il 30/06/2005, ovvero poco prima della
consegna al cliente.
Fatemi sapere in massa!
Un saluto.

 ha scritto nel messaggio 
news:1117372568.5...@f14g2000cwb.googlegroups.com...




Ad.es.

<SEGUE REPLY>
ecc...ecc...


Fatemi sapere in massa!
Un saluto.
Ciao,
lo hai testato relativamente ad ogni utente...rispettandone la cronologia?
utente pippo
1        data1
2        data2
3        data3
4        data4
..
n        datan
utente paperino
1        data1
2        data2
3        data3
4        data4
..
n        datan
Ciao
Gaspare 

[CUT]
Ciao Giulio,
ti consiglio di testare bene la seguente parte
-------
Private Sub Comando154_Click()
Dim progr As Variant
Dim rif As Variant
Dim data As Variant
Dim rec As Recordset
rif = [Forms]![frmSchedaPrimoContatt觔]![id]
If IsNull(rif) Then
    MsgBox "Nessun Utente selezionato!", vbCritical
    Exit Sub
End If
progr = DMax("NumeroIntervento", "tblInterventi", "idUtente = " & rif)
If IsNull(progr) Then
    progr = 1
  Else
    progr = progr + 1
End If
insdata:
data = InputBox("Indicare la data dell'intervento:", "Inserimento Nuovo
Intervento", Date)
If Not IsDate(data) Then
    MsgBox "Inserire una data valida!", vbExclamation
    GoTo insdata
    End If
End If
Set rec = CurrentDb.OpenRecordset("tblIn負erventi")
    rec.AddNew
    rec!idUtente = rif
    rec!NumeroIntervento = progr
    rec!DataIntervento = data
    rec.Update
rec.Close
MsgBox "Inserito nuovo intervento N. " & progr, vbInformation
Me!NumeroIntervento.Requery
Me!NumeroIntervento = progr
End Sub
---------
Buona giornata

 ha scritto nel messaggio
news:1117372568.5...@f14g2000cwb.googlegroups.com...
[CUT]
Ciao Giulio.
Quanto scrivo č solo la mia visione della cosa.
L'idea č lodevole, ma che si debba correre tra i 250 Post
settimanali che hai inviato, per capire a quale si č partecipato
lo trovo un pň BIZZARRO.
Non conviene eventualmente inserire un Elenco di persone
e ringraziare in CORO....!!
Saluti
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------

Ciao ragazzi.
Allora avete ragione. Ci penserò io a fare la ricerca e cmq inizierò
già da ora a catalogare le routine che mi avete mandato.
Documentare con nome e cognome ogni singola routine mi semvra
rispettoso verso chi me le ha date :)
Gaspare: si, l'ho testato per ogni utente. Funziona perfettamente
perchè quel mio amico di Milano mi ha suggerito un altro pezzetto di
codice per far si che la cronologia fosse esatta. Cmq dovrei aggiustare
un pò il codice che gestisce l'eliminazione dei record perchè se è
vero che ora, in assenza di almeno un record la Scheda Primo Contatto
non è visibile, è anche vero che allora qualche riga di codice è
superflua e deve essere modificata.
Ad ogni modo che problemi potrebbe dare il codice che mi hai chiesto di
esaminare? Ora coma ora essendo in un internet point (appena tornato
dal mare, qui ha iniziato a piovere) non sono in grado di fare un
esame, ma posso dirti che il codice degli interventi funziona
perfettamente. Una cosa però devo aggungere: se io elimino tutti gli
utenti, la cronologia rimane uguale in tblInterventi, invece dovrebbe
essere eliminato ogni riferimento. Come posso fare?
Grazie :)

Grazie :)
Cos'è, per caso, l'integrazione referenziale fra le tabelle? Se è quella 
visualizza le relazioni fra tabelle e ne modifichi le condizioni...
Buona serata
 


Poi impostare anche la condizione di eliminare a catena tutti i records 
correlati...se ho ben capito...decidi tu in base a quello che deve fare 
l'applicativo.
Cmq la considerazione di Alex non mi pare male...in fondo  basta inserire un 
Elenco di persone che si è impegnata nella costruzione etc...del db (e 
quindi non ovviamente persone come me comparese all'ultimo e che hanno solo 
espresso delle opinioni...) e poi
 ringraziare in coro giusto per comunicare che l'idea è stata "condivisa" 
:-) 

Tu non sei *solo* comparso all'ultimo perchè sei stato determinante
come loro  :)
e poi questo db è solo all'inizio!
Da domani con il codice preso dal sito comune e (mi pare) scritto da
Roberto, inizierò a scrivere il generatore query universale. Ho capito
come funziona concettualmente e con un pò di tempo dovrei riuscirci :)
Buona serata e non pensate che sia finita qui. Ho mille altre cose da
chiedervi :)