Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal Report... impazzito?

Ho creato un form in cui vengono visualizzati in una datagrid i dati di un
db (3 colonne, codice, descrizione, quantità)
Al momento del form_load faccio pure
FileDB = "magazzino.mdb"
Set wrkDefault = DBEngine.Workspaces(0)
  Set dbNuovaTab = wrkDefault.OpenDatabase(FileDB)
    NomeTabella = "Stampa"
    Set tdfTab = dbNuovaTab.CreateTableDef("" & NomeTabella & "")
    With tdfTab
    .Fields.Append .CreateField("Cliente", dbText)
    .Fields.Append .CreateField("Codice", dbText)
    .Fields.Append .CreateField("Descrizione", dbText)
    .Fields.Append .CreateField("Quantità", dbInteger)
   End With
dbNuovaTab.TableDefs.Append tdfTab
Set tdfTab = Nothing
In questo modo creo una nuova tabella nella quale vado a memorizzare tutti i
record visualizzati a schermo (frutto di una particolare query sul db)
[------]
Do While Not dboriginalerecord.EOF
  DbOriginale.Execute "INSERT INTO Stampa
(Cliente,Codice,Descrizione,Quantità) VALUES ('" & Giacenze2.Combo1.Text &
"', '" & dboriginalerecord!codice & "','" & dboriginalerecord!descrizione &
"','" & dboriginalerecord!Quantità & "')"
  dboriginalerecord.MoveNext
  Loop
Poi stampo il report lanciando         CrystalReport1.PrintReport
Ma la cosa strana è che alcune volte il report si stampa correttamente alla
perfezione, altre volte invece il report stampato è vuoto cioè si stampano
solo le intestazioni ma senza dati.
Andando a vedere nella tabella i dati però ci sono!!!
Come posso fare per evitare il problema.. e soprattutto.... a cosa è
dovuto???
Secondo me neanche voi riuscirete a spiegarlo... io sto cercando una
soluzione da marzo!!!! :-(

 è vuoto cioè si stampano solo le intestazioni ma senza dati.
Prova con un paio di DoEvents prima di CrystalReport1.PrintReport,
eventualmente anche uno Sleep(500)
--
Faber

 ha scritto nel messaggio
news:KZXB8.24815$US3.5...@twister1.libero.it...

ahhhh!!! guarda io con Crystal Reports ne ho viste di tutti i colori...
anche a me è successo qualche volta e qualche altra volta mi è successo che
escono più record del previsto :-(
nel file RPT hai tolto la selection formula ? io avevo alcuni problemi
simili al tuo e poi ho scoperto che lasciando la SelectionFormula nel file
RPT andava in "conflitto" con quella che gli passavo da codice VB... (non
chiedermi perchè)
io ho fatto un piccolo sw che deve stampare 2 reports, uno con un grafico e
l'altro con la descrizione dettagliata del grafico... il primo non funge il
secondo si...
fatto sta che tanto per farti un esempio son dietro da 2 mesi per una
stupidissima applicazione...
ma non c'è nessuna alternativa a crystal reports che faccia anche i grafici
? (ActiveReports non li fa a quanto pare)
Ciao
Alex

Il problema č capitato anche a me. Nel mio caso il crystal č su un
server con la cartella del programma condivisa.Per stabilizzarlo, ab-
biamo fatto cosě:
- mappatura della cartella del programma del server sui clients;
  impostazione dei percorsi del db e reports su un file .ini uguale per
tutti:
  (percorsoDBase = \\nomeserver\cartella condivisa\eventuali
cartelle\nome db.mdb,
  percorso Reports= \\nomeserver\cartella condivisa\eventuali
cartelle\cartella reports)
- Aprendo il report, andare in Database\imposta posizione;
  imposta database\imposta percorso = cercare la query o la tabella 
  manualmente e confermarla;
  imposta posizione = !tabella(o query)\\nomeserver\cartella
condivisa\eventuali cartelle\nome db.mdb,
  chiudere e salvare
Prova cosě e facci sapere.
Ciao
 
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG





 impossessandosi della tastiera ha scritto nel
messaggio news:ab9m0e$gq674$1...@ID-66268.news.dfncis.de...


 Ma sai spiegarmi anche perchč succede questo???
Sě, se la prossima volta che rispondi ad un messaggio quoti
correttamente  :)
Intendo che la tua risposta deve stare *sotto* al testo a cui stai
rispondendo  :)
Cmq, cosě funziona perché dai il tempo al DBMS di memorizzare i dati
nella tabella di stampa (altrimenti CR, a volte, non riesce a leggere i
record che hai appena inserito)
Ciao
--
Faber

 rispondendo  :)
Ooppsss... scusa...
cosi va bene no? :-D

 cosi va bene no? :-D
Sě, molto meglio!  -__^
Ciao
--
Faber