Newsgroup: it.comp.appl.access
Titolo: Molto triste - osservazioni OT

Piccola considerazione, ho richiesto un'aiuto...ho ricevuto 7-8 messaggi di
prese per il culo e cazzate di quoting.
Newbie...quoting...siate piů umani con chi non ha mai frequentato un
news....tutti possono sbagliare.
La cosa piu triste č che alla fine nessuno č riuscito a darmi una risposta a
questo thread:
"Evidenziare il primo dei doppioni in report"
C'č un vero esperto nel chan che possa darmi una mano ?
Grazie mille e scusate.

 Grazie mille e scusate.
In questo ng di veri esperti ce ne sono molti (purtroppo non ne faccio
parte): se nessuno ti ha risposto, ci sono varie possibilità:
1) Nessuno ne aveva voglia (questo non è un helpdesk a pagamento e nulla è
dovuto).
2) Nessuno conosce una soluzione al tuo problema (accade continuamente).
3) Il tuo problema era espresso in termini troppo generici o poco
comprensibili (è solo una possibilità, non mi riferisco al tuo messaggio in
particolare).
4) Tutti ce l'hanno con te.
Ciò detto, non lamentarti perchè qualcuno ti ha "redarguato": è capitato ad
ognuno di noi. Come saprai, questo ng non è moderato, pertanto è necessario
che i frequentatori si diano un minimo di autodisciplina, pena lo scadimento
da inestimabile strumento di studio e lavoro a inutile babele. Per capire
ciò che dico basta dare un'occhiata a quello che succede su altri ng. Le
regole da rispettare sono poche e sono sempre le stesse fin da quando hai
fondato i newsgroups negli anni 80: rispettale e se qualcuno ti può aiutare
lo farà.
Ciao
Galliano.

 prese per il culo e cazzate di quoting.
capisco il tuo sfogo anche se alcune "prese per il culo" non ti riguardavano
direttamente ma era un "gioco" fra MA e ciroteo. Capisco anche che devi
risolvere un " problema" e quindi potresti non essere nello spirito adatto per
"apprezzare". Per esempio personalmente mi leggo quasi tutte le risposte di MA
perche' a me piace il suo spirito satirico-ironico-umoristico-sarcastico
(qualche volta eccede, ma e' "umano")
Se hai la pazienza ed il tempo di guardarti qualche post con soggetto, che
generalmente io definisco "insulso", ti accorgerai che e' sempre la solita
storia. Oltretutto "normalmente" i "soloni" del NG quei post non li guardano
proprio e se qualcuno ti consiglia di mettere un oggetto piu' adatto lo fa per
te non per lui.
Fra le prese in giro hai comunque ricevuto parecchie informazioni utili
1) Usare la formattazione condizionale
2) Dare un sguardo al sitocomume (
www.sistocomune.com
)
3) Cercare, con un qualsiasi motore di ricerca, cose come "evidenziare righe
report" in questo NG
Non sempre si riceve la risposta "precisa", personalmente non lo faccio "quasi"
mai (ovviamente mi riferisco alle poche cose che conosco), preferisco che il
"postante" ci metta sempre qualcosa di suo.
I partecipanti a questo NG, ti posso assicurare, sono molto "umani" e nella loro
umanita' e' prevista anche la possibilita' del "gioco", il solo aspetto tecnico
qualche volta puo' essere molto noioso, sopratutto alla centesima volta che
rispondi, ad esempio, a come si fa a ricavare un valore da una casella combinata
(una delle domande piu' gettonate) 
--
a.cara 
Togli qualcosa dall'email

Guarda se ti puo' essere utile...a me funziona...
' Ipotizziamo di avere una tabella con un elenco valori
' e un report con una casella di testo legata all'unico campo
' Descrizione
Option Compare Database
Option Explicit
Dim matr() As Variant
Dim DinInt As Integer
Dim i As Integer
Private Sub Corpo_Print(Cancel As Integer, PrintCount As Integer)
' Formatta le caselle di testo verificando l'indice
    If (matr(DinInt, 1) = 1) Then
        Descrizione.FontBold = True
    Else
        Descrizione.FontBold = False
    End If
    DinInt = DinInt + PrintCount
End Sub
Private Sub Report_Open(Cancel As Integer)
DinInt = 0
MakeSource
End Sub
Private Sub MakeSource()
Dim db As DAO.Database
Dim rc As DAO.Recordset
Dim st As String
Set db = CurrentDb
st = "SELECT Descrizione FROM Valori ORDER BY Descrizione"
Set rc = db.OpenRecordset(st)
' Ridimensionamento dinamico matrice
ReDim matr(rc.RecordCount, 2) As Variant
' Riempio la matrice con i records
For i = 0 To rc.RecordCount - 1
    matr(i, 0) = rc.Fields(0).Value
    matr(i, 1) = 0 ' Indice per il controllo dei record duplicati
    rc.MoveNext
Next i
' Verifico il primo record duplicato e segno l'indice con 1
If UBound(matr, 1) > 1 Then
For i = 0 To UBound(matr, 1) - 1
    If i = 0 Then
        If (matr(i, 0) = matr((i + 1), 0)) Then
            matr(i, 1) = 1
        Else
            matr(i, 1) = 0
        End If
    ElseIf (matr(i, 0) <> matr((i - 1), 0)) And _
   (matr(i, 0) = matr((i + 1), 0)) Then
            matr(i, 1) = 1
    Else
            matr(i, 1) = 0
    End If
Next
End If
' Imposto l'origine record dei controlli e del report
' puoi anche evitarlo se imposti l'origine record dalla
' progettazione report
End Sub

 ' progettazione report
L'origine record deve essere la stessa della query impostata
nella variabile "st" es:
DataSource = st

 ha scritto nel messaggio
news:jxcbb.94465$hE5.3...@news1.tin.it...

Ti ringrazio vivamente per l'aiuto, lunedi ti sņ dire.
Grazie

 direttamente ma era un "gioco" fra MA e ciroteo. Capisco anche che devi
[...]
Ringrazio anche te per le delucidazioni, in effetti mi sono comportato come
un'utente da help desk...purtroppo questo problema mi ha portato ad una
crisi di nervi...che lunedi risolverò certamente grazie ad HjLlOp.
Grazie

> > DataSource = st
Ti ho scritto DataSource invece di RecordSource...VB lapsus.