Newsgroup: it.comp.lang.visual-basic
Titolo: VB 4 32bit -> VB5 e Access 2.0 ... problemi


Newsgroup: it.comp.lang.visual-basic
Data: giovedì 28 maggio 1998 14.23
Oggetto: VB 4 32bit -> VB5 e Access 2.0 (urgente)
Salve a tutti
Ho un'applicazione scritta in VB4 32 bit che riempie un database Access 2.0.
In VB4 funzionava benissimo (circa :-)
Ho portato questa applicazione a VB5 (SP3).
Ora non funziona piu'.
DataDest e' un controllo Data su una form.
RecSrc e' un oggetto RecordSet (query).
I DoEvents servono per permettere di annullare l'operazione.
Il pezzo di codice incriminato e' il seguente:
  DataDest.RecordSource = "Tabella1"
  DataDest.Refresh
  DataDest.Recordset.LockEdits = False
  If Not RecSrc.EOF Then RecSrc.MoveFirst
  For i = 1 To 7
DoEvents
    DataDest.Recordset.AddNew
    If Not RecSrc.EOF Then
      For j = 0 To 3
        DataDest.Recordset.Fields(j).Value = RecSrc.Fields(j).Value
      Next
    End If
    DataDest.UpdateRecord
    If Not RecSrc.EOF Then RecSrc.MoveNext
  Next
  ' Riempie la tabella2 con i dati riepilogativi
  ' sulle consistenze raggruppate per piano.
  Set RecSrc = DBSrc.OpenRecordset("un'altra query, che non interessa...")
DoEvents
  DataDest.RecordSource = "Tabella2"
  DataDest.Refresh
^^^^^^^^^^^^^^^^^^^^^^
  DataDest.Recordset.LockEdits = False
    ...
Inutile dire che Tabella1 e Tabella2 esistono e sono vuote.
Nel progetto ho provato a settare i riferimenti a:
- DAO 3.5: al ^^^^^ (Refresh) mi da' errore 444 (Metodo non applicabile in
questo contesto)
- compatibility DAO 2.5/3.5 stessa cosa
- DAO 3.0 mi da' errore 429 (il componente ActiveX non puo' creare
l'oggetto) Questo forse perche' ho disinstallato VB4 32bit che mi ha anche
disinstallato il DAO 3.0 ???
- DAO 2.5 stessa cosa
- compatibility DAO 2.5/3.0 stessa cosa (logico...)
Qualcuno mi saprebbe dire cosa ci puo' essere che non va????
Se puo' essere utile, sulla form ci sono dei controlli LeadTools 9.0 (OCX) e
l'OCX di Crystal Report 5.0, anche se non credo che influiscano.
Roal Zanazzi
z...@iol.it

 
Prova a sostituire la linea
    DataDest.UpdateRecord
con
    DataDest.recordset.Update
Salutoni
-- 
Hi, Ciao
Ettore                 By -MES-
http://freeweb.aspide.it/freeweb/ilmes
Il sito comune di programmatori VB
http://members.xoom.com/it_lang_vb


Ho provato, ma non e' cambiato nulla, sempre errore 444...
- DAO 3.5: al Data1.Refresh mi da' errore 444 (Metodo non applicabile in
questo contesto)
Quali potrebbero essere i motivi?
Mi bastano delle indicazioni...
Se in VB4-32 funziona e in VB5 no, cosa e' cambiato nel DAO?
Evidentemente c'e' qualcosa che mi sfugge, ma cosa?
--
Roal Zanazzi
z...@iol.it


Non ti so dire cosa e' cambiato nel DAO, a me quell'errore me lo ritrovo
quando
tento di fare un'operazioe (tipo Refresh) quando e' ancora attivo un DS.Edit
(che e non e' stato chiuso da un DS.Update).
Non so com'altro aiutarti....  :-((
Ciao,
Ettore dal lavoro

 Evidentemente c'e' qualcosa che mi sfugge, ma cosa?
Ciao Roal,
Non ci crederai ma non ci dormo la notte (e faresti bene)  :-)
Io sono un tipo piuttosto testardo,
riesci a postarmi (in privato) un esempietto (progettino) spiccio spiccio
con giursto un Datacontrol e poco altro, che riproduce l'errore?
Vorrei vedere se, e come, lo fa sulla mia macchina.
Saluti a tutti
