[VB6] Run-time error 713 con ADO

[fux_vr]

ciao a tutti io ho creato un applicazioni con VB6 Sp6 e un DB creato
con access 2003 uno ADO per collegarmi..sul mio pc funziona se lo provo
su altri PC che hanno win Xp come il mio non funziona mi ha il seguente
errore solo quando richiamo il DB mi da il seguente errore:

Run-time error '713':
Application-defined or object-defined error


ho provato a mettere mdac 2.8 italiano ma non cambia nulla non saprei
cosa devo fare...
ho provato a cercare in giro ma nessuna risposta chi dicono scarica
questo o quello ma non cambia nulla...


helppp

[ladyBlu]

per far sì che un software giri su un pc diverso da quello di progettazione è necessario creare il pacchetto di installazione da eseguire su ogni pc su cui si voglia utilizzare il programma. Solo a questo punto il software è pronto per l'uso.

Tu hai fatto questo pacchetto di installazione?

[fux_vr]

no non l'ho fatto perche non è ancora terminato.. ma non saprei nemmeno come farlo..

io ho messo le ocx che ho usato ma quelle funzionano. unico problem è quando premo i pulsanti che chimano il DB... appena che chiamo il db da quel errore.il db l ho creato con access 2003 uso jet 4 ma negli altri computer non so cosa ci c'e'

helpp

[fux_vr]

helpp

[oregon]

Vedi se questo articolo

http://support.microsoft.com/default...;EN-US;q248055

ti puo' aiutare ...

[fux_vr]

provo a leggere... ma mi sembra strano che nesuno ha creato un programmimo in vb6 con un access 2000 con data environment e gli funzioni.

[oregon]

Ma tu usi il DataReport nel tuo programma o no?

[VanessaInfo]

per creare il paketto d installazione fai
"aggiunte-gestione aggiunte"
scorri la lista
e abiliti la creazione

la voce comparirà ora nel menu Aggiunte


per quel ke riguarda data_environment io ho ristabilito da codice il percorso (ke altriment mi rimaneva fix e con altro pc nn avrebbe funzionato) in un percorso tipo App.path & "\Dati\Nomefile.mdb"


Ciao

VaneX

[VanessaInfo]

Private Sub DataEnvironment_Initialize()
Dim Percorso As String
Dim Stringa As String
Percorso = App.Path & "\Dati\Biblio.mdb"


Stringa = "Provider=MSDataShape.1;Persist Security Info=False;Data Source=" & Percorso & ";Data Provider=MICROSOFT.JET.OLEDB.4.0"



End Sub

[fux_vr]

grazie 1000.. quate cose si imprano qui...

adesso creando il pacchetto di installazione funziona tutto grazie 1000 ah messo un sacco di file dll ecc...