BD de win98 à XP

Jac

10/03/2005 à 13:38

Le code est le suivant

Private Sub ImprimerEtiquette(NoStablex As String)
Dim stAppName As String
Dim Arguments As String
Dim Description As String
Dim NoPiece As String
Dim DB As Database
Dim RS As Recordset

Set DB = CurrentDb
Set RS = DB.OpenRecordset("Inventaire")
RS.FindFirst ("NoStablex = """ & NoStablex & """")
Description = RS.Fields("Description")
NoPiece = RS.Fields("NoPiece")
RS.Close

stAppName = "S:PRODUCTNENTRETIEAccessÉtiquettesLabelPrinter.exe"

If Not IsNull(NoStablex) Then
Arguments = "£" + NoStablex + "£"
Else
Arguments = "£Z99Z99ERR£"
End If
If Not IsNull(Description) Then
Arguments = Arguments + " £" + Description + "£"
Else
Arguments = Arguments + " £-----£"
End If
If Not IsNull(NoPiece) Then
Arguments = Arguments + " £" + NoPiece + "£"
Else
Arguments = Arguments + " £-----£"
End If
Arguments = ReplaceString(Arguments, """", "''")
Arguments = ReplaceString(Arguments, "£", """")
Call Shell(stAppName + " " + Arguments, 1)
End Sub

et il s'arrête sur Set DB = CurrentDb

merci

"Jac" wrote in message
news:

Bonjour j'avais une BD en Win98 qui fonctionnait comme il faut et la j'ai
upgradé à Xp et lorsque je clique sur un bouton imprimer créer par moi
même, je reçois l'erreur suivante:

Erreur de compilation:
Fonction ou interface mentionnée avec restrictions, ou la fonction utilise
un type Automation non géré pas Visual Basic

Quelqu'un peut m'aider svp

Merci

Jac

Raymond [mvp]

10/03/2005 à 14:34

Bonjour.

tu parles de windows et jamais de access. as-tu changé de version access ?
remplaces:

Dim DB As Database
Dim RS As Recordset
par

Dim DB As DAO.Database
Dim RS As DAO.Recordset

Tu fais:
Alt+F11
menu outils / références
coche la ligne Microsoft DAO 3.6 object Library
place cette ligne le plus haut possible par les flèches
compiler : debogage / compiler
corriger les erreurs éventuelles.
enregistrer
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" a écrit dans le message de news:

Le code est le suivant

Private Sub ImprimerEtiquette(NoStablex As String)
Dim stAppName As String
Dim Arguments As String
Dim Description As String
Dim NoPiece As String
Dim DB As Database
Dim RS As Recordset

Set DB = CurrentDb
Set RS = DB.OpenRecordset("Inventaire")
RS.FindFirst ("NoStablex = """ & NoStablex & """")
Description = RS.Fields("Description")
NoPiece = RS.Fields("NoPiece")
RS.Close

stAppName = "S:PRODUCTNENTRETIEAccessÉtiquettesLabelPrinter.exe"

If Not IsNull(NoStablex) Then
Arguments = "£" + NoStablex + "£"
Else
Arguments = "£Z99Z99ERR£"
End If
If Not IsNull(Description) Then
Arguments = Arguments + " £" + Description + "£"
Else
Arguments = Arguments + " £-----£"
End If
If Not IsNull(NoPiece) Then
Arguments = Arguments + " £" + NoPiece + "£"
Else
Arguments = Arguments + " £-----£"
End If
Arguments = ReplaceString(Arguments, """", "''")
Arguments = ReplaceString(Arguments, "£", """")
Call Shell(stAppName + " " + Arguments, 1)
End Sub

et il s'arrête sur Set DB = CurrentDb

merci

"Jac" wrote in message
news:
Bonjour j'avais une BD en Win98 qui fonctionnait comme il faut et la j'ai
upgradé à Xp et lorsque je clique sur un bouton imprimer créer par moi
même, je reçois l'erreur suivante:

Erreur de compilation:
Fonction ou interface mentionnée avec restrictions, ou la fonction
utilise un type Automation non géré pas Visual Basic

Quelqu'un peut m'aider svp

Merci

Jac

Bonjour.

tu parles de windows et jamais de access. as-tu changé de version access ?
remplaces:

Dim DB As Database
Dim RS As Recordset
par

Dim DB As DAO.Database
Dim RS As DAO.Recordset

Tu fais:
Alt+F11
menu outils / références
coche la ligne Microsoft DAO 3.6 object Library
place cette ligne le plus haut possible par les flèches
compiler : debogage / compiler
corriger les erreurs éventuelles.
enregistrer
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" <jean-francois.guenet@stablex.com> a écrit dans le message de news:
eP6Vz3WJFHA.1176@TK2MSFTNGP12.phx.gbl...

Le code est le suivant

Private Sub ImprimerEtiquette(NoStablex As String)
Dim stAppName As String
Dim Arguments As String
Dim Description As String
Dim NoPiece As String
Dim DB As Database
Dim RS As Recordset

Set DB = CurrentDb
Set RS = DB.OpenRecordset("Inventaire")
RS.FindFirst ("NoStablex = """ & NoStablex & """")
Description = RS.Fields("Description")
NoPiece = RS.Fields("NoPiece")
RS.Close

stAppName = "S:PRODUCTNENTRETIEAccessÉtiquettesLabelPrinter.exe"

If Not IsNull(NoStablex) Then
Arguments = "£" + NoStablex + "£"
Else
Arguments = "£Z99Z99ERR£"
End If
If Not IsNull(Description) Then
Arguments = Arguments + " £" + Description + "£"
Else
Arguments = Arguments + " £-----£"
End If
If Not IsNull(NoPiece) Then
Arguments = Arguments + " £" + NoPiece + "£"
Else
Arguments = Arguments + " £-----£"
End If
Arguments = ReplaceString(Arguments, """", "''")
Arguments = ReplaceString(Arguments, "£", """")
Call Shell(stAppName + " " + Arguments, 1)
End Sub

et il s'arrête sur Set DB = CurrentDb

merci

"Jac" <jean-francois.guenet@stablex.com> wrote in message
news:OBcRp0WJFHA.2756@TK2MSFTNGP10.phx.gbl...

Bonjour j'avais une BD en Win98 qui fonctionnait comme il faut et la j'ai
upgradé à Xp et lorsque je clique sur un bouton imprimer créer par moi
même, je reçois l'erreur suivante:

Erreur de compilation:
Fonction ou interface mentionnée avec restrictions, ou la fonction
utilise un type Automation non géré pas Visual Basic

Quelqu'un peut m'aider svp

Merci

Jac

Vous avez filtré cet utilisateur ! Consultez son message

Jac

10/03/2005 à 16:03

Je n'ai pas changé d'access...j'utilise access 97

le code que tu m'a dit ne change rien...j'ai toujours la même erreur

merci de ton aide

"Raymond [mvp]" wrote in message
news:

Bonjour.

tu parles de windows et jamais de access. as-tu changé de version access ?
remplaces:
Dim DB As Database
Dim RS As Recordset
par

Dim DB As DAO.Database
Dim RS As DAO.Recordset

Tu fais:
Alt+F11
menu outils / références
coche la ligne Microsoft DAO 3.6 object Library
place cette ligne le plus haut possible par les flèches
compiler : debogage / compiler
corriger les erreurs éventuelles.
enregistrer
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" a écrit dans le message de news:

Le code est le suivant

Private Sub ImprimerEtiquette(NoStablex As String)
Dim stAppName As String
Dim Arguments As String
Dim Description As String
Dim NoPiece As String
Dim DB As Database
Dim RS As Recordset

Set DB = CurrentDb
Set RS = DB.OpenRecordset("Inventaire")
RS.FindFirst ("NoStablex = """ & NoStablex & """")
Description = RS.Fields("Description")
NoPiece = RS.Fields("NoPiece")
RS.Close

stAppName = "S:PRODUCTNENTRETIEAccessÉtiquettesLabelPrinter.exe"

If Not IsNull(NoStablex) Then
Arguments = "£" + NoStablex + "£"
Else
Arguments = "£Z99Z99ERR£"
End If
If Not IsNull(Description) Then
Arguments = Arguments + " £" + Description + "£"
Else
Arguments = Arguments + " £-----£"
End If
If Not IsNull(NoPiece) Then
Arguments = Arguments + " £" + NoPiece + "£"
Else
Arguments = Arguments + " £-----£"
End If
Arguments = ReplaceString(Arguments, """", "''")
Arguments = ReplaceString(Arguments, "£", """")
Call Shell(stAppName + " " + Arguments, 1)
End Sub

et il s'arrête sur Set DB = CurrentDb

merci

"Jac" wrote in message
news:
Bonjour j'avais une BD en Win98 qui fonctionnait comme il faut et la
j'ai upgradé à Xp et lorsque je clique sur un bouton imprimer créer par
moi même, je reçois l'erreur suivante:

Erreur de compilation:
Fonction ou interface mentionnée avec restrictions, ou la fonction
utilise un type Automation non géré pas Visual Basic

Quelqu'un peut m'aider svp

Merci

Jac

Je n'ai pas changé d'access...j'utilise access 97

le code que tu m'a dit ne change rien...j'ai toujours la même erreur

merci de ton aide

"Raymond [mvp]" <XYZ.officesystem.access@free.fr> wrote in message
news:e85rfXXJFHA.904@tk2msftngp13.phx.gbl...

Bonjour.

tu parles de windows et jamais de access. as-tu changé de version access ?
remplaces:

Dim DB As Database
Dim RS As Recordset
par

Dim DB As DAO.Database
Dim RS As DAO.Recordset

Tu fais:
Alt+F11
menu outils / références
coche la ligne Microsoft DAO 3.6 object Library
place cette ligne le plus haut possible par les flèches
compiler : debogage / compiler
corriger les erreurs éventuelles.
enregistrer
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" <jean-francois.guenet@stablex.com> a écrit dans le message de news:
eP6Vz3WJFHA.1176@TK2MSFTNGP12.phx.gbl...

Le code est le suivant

Private Sub ImprimerEtiquette(NoStablex As String)
Dim stAppName As String
Dim Arguments As String
Dim Description As String
Dim NoPiece As String
Dim DB As Database
Dim RS As Recordset

Set DB = CurrentDb
Set RS = DB.OpenRecordset("Inventaire")
RS.FindFirst ("NoStablex = """ & NoStablex & """")
Description = RS.Fields("Description")
NoPiece = RS.Fields("NoPiece")
RS.Close

stAppName = "S:PRODUCTNENTRETIEAccessÉtiquettesLabelPrinter.exe"

If Not IsNull(NoStablex) Then
Arguments = "£" + NoStablex + "£"
Else
Arguments = "£Z99Z99ERR£"
End If
If Not IsNull(Description) Then
Arguments = Arguments + " £" + Description + "£"
Else
Arguments = Arguments + " £-----£"
End If
If Not IsNull(NoPiece) Then
Arguments = Arguments + " £" + NoPiece + "£"
Else
Arguments = Arguments + " £-----£"
End If
Arguments = ReplaceString(Arguments, """", "''")
Arguments = ReplaceString(Arguments, "£", """")
Call Shell(stAppName + " " + Arguments, 1)
End Sub

et il s'arrête sur Set DB = CurrentDb

merci

"Jac" <jean-francois.guenet@stablex.com> wrote in message
news:OBcRp0WJFHA.2756@TK2MSFTNGP10.phx.gbl...

Bonjour j'avais une BD en Win98 qui fonctionnait comme il faut et la
j'ai upgradé à Xp et lorsque je clique sur un bouton imprimer créer par
moi même, je reçois l'erreur suivante:

Erreur de compilation:
Fonction ou interface mentionnée avec restrictions, ou la fonction
utilise un type Automation non géré pas Visual Basic

Quelqu'un peut m'aider svp

Merci

Jac

Vous avez filtré cet utilisateur ! Consultez son message

Je n'ai pas changé d'access...j'utilise access 97

le code que tu m'a dit ne change rien...j'ai toujours la même erreur

merci de ton aide

"Raymond [mvp]" wrote in message
news:

Bonjour.

tu parles de windows et jamais de access. as-tu changé de version access ?
remplaces:
Dim DB As Database
Dim RS As Recordset
par

Dim DB As DAO.Database
Dim RS As DAO.Recordset

Tu fais:
Alt+F11
menu outils / références
coche la ligne Microsoft DAO 3.6 object Library
place cette ligne le plus haut possible par les flèches
compiler : debogage / compiler
corriger les erreurs éventuelles.
enregistrer
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" a écrit dans le message de news:

Le code est le suivant

Private Sub ImprimerEtiquette(NoStablex As String)
Dim stAppName As String
Dim Arguments As String
Dim Description As String
Dim NoPiece As String
Dim DB As Database
Dim RS As Recordset

Set DB = CurrentDb
Set RS = DB.OpenRecordset("Inventaire")
RS.FindFirst ("NoStablex = """ & NoStablex & """")
Description = RS.Fields("Description")
NoPiece = RS.Fields("NoPiece")
RS.Close

stAppName = "S:PRODUCTNENTRETIEAccessÉtiquettesLabelPrinter.exe"

If Not IsNull(NoStablex) Then
Arguments = "£" + NoStablex + "£"
Else
Arguments = "£Z99Z99ERR£"
End If
If Not IsNull(Description) Then
Arguments = Arguments + " £" + Description + "£"
Else
Arguments = Arguments + " £-----£"
End If
If Not IsNull(NoPiece) Then
Arguments = Arguments + " £" + NoPiece + "£"
Else
Arguments = Arguments + " £-----£"
End If
Arguments = ReplaceString(Arguments, """", "''")
Arguments = ReplaceString(Arguments, "£", """")
Call Shell(stAppName + " " + Arguments, 1)
End Sub

et il s'arrête sur Set DB = CurrentDb

merci

"Jac" wrote in message
news:
Bonjour j'avais une BD en Win98 qui fonctionnait comme il faut et la
j'ai upgradé à Xp et lorsque je clique sur un bouton imprimer créer par
moi même, je reçois l'erreur suivante:

Erreur de compilation:
Fonction ou interface mentionnée avec restrictions, ou la fonction
utilise un type Automation non géré pas Visual Basic

Quelqu'un peut m'aider svp

Merci

Jac

Raymond [mvp]

10/03/2005 à 16:12

c'est une erreur typique de références.
n'aurais-tu pas des lignes cochées marquées manquantes ?

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" a écrit dans le message de news:

Je n'ai pas changé d'access...j'utilise access 97

le code que tu m'a dit ne change rien...j'ai toujours la même erreur

merci de ton aide

Jac

10/03/2005 à 16:13

Mais la j'ai le message d'erreur suivant:

"Un composant activex ne peut pas créer un objet "
"Jac" wrote in message
news:

Je n'ai pas changé d'access...j'utilise access 97

le code que tu m'a dit ne change rien...j'ai toujours la même erreur

merci de ton aide

"Raymond [mvp]" wrote in message
news:
Bonjour.

tu parles de windows et jamais de access. as-tu changé de version access
?
remplaces:
Dim DB As Database
Dim RS As Recordset
par

Dim DB As DAO.Database
Dim RS As DAO.Recordset

Tu fais:
Alt+F11
menu outils / références
coche la ligne Microsoft DAO 3.6 object Library
place cette ligne le plus haut possible par les flèches
compiler : debogage / compiler
corriger les erreurs éventuelles.
enregistrer
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" a écrit dans le message de news:

Le code est le suivant

Private Sub ImprimerEtiquette(NoStablex As String)
Dim stAppName As String
Dim Arguments As String
Dim Description As String
Dim NoPiece As String
Dim DB As Database
Dim RS As Recordset

Set DB = CurrentDb
Set RS = DB.OpenRecordset("Inventaire")
RS.FindFirst ("NoStablex = """ & NoStablex & """")
Description = RS.Fields("Description")
NoPiece = RS.Fields("NoPiece")
RS.Close

stAppName = "S:PRODUCTNENTRETIEAccessÉtiquettesLabelPrinter.exe"

If Not IsNull(NoStablex) Then
Arguments = "£" + NoStablex + "£"
Else
Arguments = "£Z99Z99ERR£"
End If
If Not IsNull(Description) Then
Arguments = Arguments + " £" + Description + "£"
Else
Arguments = Arguments + " £-----£"
End If
If Not IsNull(NoPiece) Then
Arguments = Arguments + " £" + NoPiece + "£"
Else
Arguments = Arguments + " £-----£"
End If
Arguments = ReplaceString(Arguments, """", "''")
Arguments = ReplaceString(Arguments, "£", """")
Call Shell(stAppName + " " + Arguments, 1)
End Sub

et il s'arrête sur Set DB = CurrentDb

merci

"Jac" wrote in message
news:
Bonjour j'avais une BD en Win98 qui fonctionnait comme il faut et la
j'ai upgradé à Xp et lorsque je clique sur un bouton imprimer créer par
moi même, je reçois l'erreur suivante:

Erreur de compilation:
Fonction ou interface mentionnée avec restrictions, ou la fonction
utilise un type Automation non géré pas Visual Basic

Quelqu'un peut m'aider svp

Merci

Jac

Mais la j'ai le message d'erreur suivant:

"Un composant activex ne peut pas créer un objet "
"Jac" <jean-francois.guenet@stablex.com> wrote in message
news:efEijIYJFHA.2716@TK2MSFTNGP15.phx.gbl...

Je n'ai pas changé d'access...j'utilise access 97

le code que tu m'a dit ne change rien...j'ai toujours la même erreur

merci de ton aide

"Raymond [mvp]" <XYZ.officesystem.access@free.fr> wrote in message
news:e85rfXXJFHA.904@tk2msftngp13.phx.gbl...

Bonjour.

tu parles de windows et jamais de access. as-tu changé de version access
?
remplaces:

Dim DB As Database
Dim RS As Recordset
par

Dim DB As DAO.Database
Dim RS As DAO.Recordset

Tu fais:
Alt+F11
menu outils / références
coche la ligne Microsoft DAO 3.6 object Library
place cette ligne le plus haut possible par les flèches
compiler : debogage / compiler
corriger les erreurs éventuelles.
enregistrer
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" <jean-francois.guenet@stablex.com> a écrit dans le message de news:
eP6Vz3WJFHA.1176@TK2MSFTNGP12.phx.gbl...

Le code est le suivant

Private Sub ImprimerEtiquette(NoStablex As String)
Dim stAppName As String
Dim Arguments As String
Dim Description As String
Dim NoPiece As String
Dim DB As Database
Dim RS As Recordset

Set DB = CurrentDb
Set RS = DB.OpenRecordset("Inventaire")
RS.FindFirst ("NoStablex = """ & NoStablex & """")
Description = RS.Fields("Description")
NoPiece = RS.Fields("NoPiece")
RS.Close

stAppName = "S:PRODUCTNENTRETIEAccessÉtiquettesLabelPrinter.exe"

If Not IsNull(NoStablex) Then
Arguments = "£" + NoStablex + "£"
Else
Arguments = "£Z99Z99ERR£"
End If
If Not IsNull(Description) Then
Arguments = Arguments + " £" + Description + "£"
Else
Arguments = Arguments + " £-----£"
End If
If Not IsNull(NoPiece) Then
Arguments = Arguments + " £" + NoPiece + "£"
Else
Arguments = Arguments + " £-----£"
End If
Arguments = ReplaceString(Arguments, """", "''")
Arguments = ReplaceString(Arguments, "£", """")
Call Shell(stAppName + " " + Arguments, 1)
End Sub

et il s'arrête sur Set DB = CurrentDb

merci

"Jac" <jean-francois.guenet@stablex.com> wrote in message
news:OBcRp0WJFHA.2756@TK2MSFTNGP10.phx.gbl...

Bonjour j'avais une BD en Win98 qui fonctionnait comme il faut et la
j'ai upgradé à Xp et lorsque je clique sur un bouton imprimer créer par
moi même, je reçois l'erreur suivante:

Erreur de compilation:
Fonction ou interface mentionnée avec restrictions, ou la fonction
utilise un type Automation non géré pas Visual Basic

Quelqu'un peut m'aider svp

Merci

Jac

Vous avez filtré cet utilisateur ! Consultez son message

Mais la j'ai le message d'erreur suivant:

"Un composant activex ne peut pas créer un objet "
"Jac" wrote in message
news:

Je n'ai pas changé d'access...j'utilise access 97

le code que tu m'a dit ne change rien...j'ai toujours la même erreur

merci de ton aide

"Raymond [mvp]" wrote in message
news:
Bonjour.

tu parles de windows et jamais de access. as-tu changé de version access
?
remplaces:
Dim DB As Database
Dim RS As Recordset
par

Dim DB As DAO.Database
Dim RS As DAO.Recordset

Tu fais:
Alt+F11
menu outils / références
coche la ligne Microsoft DAO 3.6 object Library
place cette ligne le plus haut possible par les flèches
compiler : debogage / compiler
corriger les erreurs éventuelles.
enregistrer
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" a écrit dans le message de news:

Le code est le suivant

Private Sub ImprimerEtiquette(NoStablex As String)
Dim stAppName As String
Dim Arguments As String
Dim Description As String
Dim NoPiece As String
Dim DB As Database
Dim RS As Recordset

Set DB = CurrentDb
Set RS = DB.OpenRecordset("Inventaire")
RS.FindFirst ("NoStablex = """ & NoStablex & """")
Description = RS.Fields("Description")
NoPiece = RS.Fields("NoPiece")
RS.Close

stAppName = "S:PRODUCTNENTRETIEAccessÉtiquettesLabelPrinter.exe"

If Not IsNull(NoStablex) Then
Arguments = "£" + NoStablex + "£"
Else
Arguments = "£Z99Z99ERR£"
End If
If Not IsNull(Description) Then
Arguments = Arguments + " £" + Description + "£"
Else
Arguments = Arguments + " £-----£"
End If
If Not IsNull(NoPiece) Then
Arguments = Arguments + " £" + NoPiece + "£"
Else
Arguments = Arguments + " £-----£"
End If
Arguments = ReplaceString(Arguments, """", "''")
Arguments = ReplaceString(Arguments, "£", """")
Call Shell(stAppName + " " + Arguments, 1)
End Sub

et il s'arrête sur Set DB = CurrentDb

merci

"Jac" wrote in message
news:
Bonjour j'avais une BD en Win98 qui fonctionnait comme il faut et la
j'ai upgradé à Xp et lorsque je clique sur un bouton imprimer créer par
moi même, je reçois l'erreur suivante:

Erreur de compilation:
Fonction ou interface mentionnée avec restrictions, ou la fonction
utilise un type Automation non géré pas Visual Basic

Quelqu'un peut m'aider svp

Merci

Jac

Jac

10/03/2005 à 16:25

Non tout ce qui est coché est ok

J'ai dans l'ordre

Visual Basic For Apllications
Microsoft Access 8.0 Object Library
Microsoft DAO 3.6 Object Library
utility
Microsoft Excel 8.0 Object Library
Microsoft Word 8.0 Object Library
Microsoft Data Access Components Ins...

"Raymond [mvp]" wrote in message
news:%

c'est une erreur typique de références.
n'aurais-tu pas des lignes cochées marquées manquantes ?

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" a écrit dans le message de news:

Je n'ai pas changé d'access...j'utilise access 97

le code que tu m'a dit ne change rien...j'ai toujours la même erreur

merci de ton aide

Raymond [mvp]

10/03/2005 à 16:40

en 97, il serait préférable de cocher la DAO 3.5 et non 3.6
est-ce que ça change ?
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" a écrit dans le message de news:

Non tout ce qui est coché est ok

J'ai dans l'ordre

Visual Basic For Apllications
Microsoft Access 8.0 Object Library
Microsoft DAO 3.6 Object Library
utility
Microsoft Excel 8.0 Object Library
Microsoft Word 8.0 Object Library
Microsoft Data Access Components Ins...

"Raymond [mvp]" wrote in message
news:%
c'est une erreur typique de références.
n'aurais-tu pas des lignes cochées marquées manquantes ?

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" a écrit dans le message de news:

Je n'ai pas changé d'access...j'utilise access 97

le code que tu m'a dit ne change rien...j'ai toujours la même erreur

merci de ton aide

Jac

10/03/2005 à 17:03

ben je n'ai pas dao 3.5 dans la liste

commetn on fait pour reinstaller dao 3.6
"Raymond [mvp]" wrote in message
news:%

en 97, il serait préférable de cocher la DAO 3.5 et non 3.6
est-ce que ça change ?
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" a écrit dans le message de news:

Non tout ce qui est coché est ok

J'ai dans l'ordre

Visual Basic For Apllications
Microsoft Access 8.0 Object Library
Microsoft DAO 3.6 Object Library
utility
Microsoft Excel 8.0 Object Library
Microsoft Word 8.0 Object Library
Microsoft Data Access Components Ins...

"Raymond [mvp]" wrote in message
news:%
c'est une erreur typique de références.
n'aurais-tu pas des lignes cochées marquées manquantes ?

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" a écrit dans le message de
news:
Je n'ai pas changé d'access...j'utilise access 97

le code que tu m'a dit ne change rien...j'ai toujours la même erreur

merci de ton aide

Raymond [mvp]

10/03/2005 à 17:10

pour remettre dao3.6, tu coches la ligne microsoft dao 3.6 (dans l'ordre
alpha)
pourquoi as-tu la 3.6 alors que tu as 97 ? recherche si tu ne l'as pas sur
le disque. si tu la trouves tu l'indiques en faisant rechercher dans la
fenêtre.
faudra sûrement la registrer
regsvr32 "c:chemin completdao35......dll"

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" a écrit dans le message de news:

ben je n'ai pas dao 3.5 dans la liste

commetn on fait pour reinstaller dao 3.6
"Raymond [mvp]" wrote in message
news:%
en 97, il serait préférable de cocher la DAO 3.5 et non 3.6
est-ce que ça change ?
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" a écrit dans le message de news:

Non tout ce qui est coché est ok

J'ai dans l'ordre

Visual Basic For Apllications
Microsoft Access 8.0 Object Library
Microsoft DAO 3.6 Object Library
utility
Microsoft Excel 8.0 Object Library
Microsoft Word 8.0 Object Library
Microsoft Data Access Components Ins...

"Raymond [mvp]" wrote in message
news:%
c'est une erreur typique de références.
n'aurais-tu pas des lignes cochées marquées manquantes ?

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" a écrit dans le message de
news:
Je n'ai pas changé d'access...j'utilise access 97

le code que tu m'a dit ne change rien...j'ai toujours la même erreur

merci de ton aide

pour remettre dao3.6, tu coches la ligne microsoft dao 3.6 (dans l'ordre
alpha)
pourquoi as-tu la 3.6 alors que tu as 97 ? recherche si tu ne l'as pas sur
le disque. si tu la trouves tu l'indiques en faisant rechercher dans la
fenêtre.
faudra sûrement la registrer
regsvr32 "c:chemin completdao35......dll"

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" <jean-francois.guenet@stablex.com> a écrit dans le message de news:
OvrdHqYJFHA.3752@TK2MSFTNGP14.phx.gbl...

ben je n'ai pas dao 3.5 dans la liste

commetn on fait pour reinstaller dao 3.6
"Raymond [mvp]" <XYZ.officesystem.access@free.fr> wrote in message
news:%238L18dYJFHA.2136@TK2MSFTNGP14.phx.gbl...

en 97, il serait préférable de cocher la DAO 3.5 et non 3.6
est-ce que ça change ?
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" <jean-francois.guenet@stablex.com> a écrit dans le message de news:
uHPzEVYJFHA.3596@TK2MSFTNGP14.phx.gbl...

Non tout ce qui est coché est ok

J'ai dans l'ordre

Visual Basic For Apllications
Microsoft Access 8.0 Object Library
Microsoft DAO 3.6 Object Library
utility
Microsoft Excel 8.0 Object Library
Microsoft Word 8.0 Object Library
Microsoft Data Access Components Ins...

"Raymond [mvp]" <XYZ.officesystem.access@free.fr> wrote in message
news:%23kCKgOYJFHA.2356@TK2MSFTNGP12.phx.gbl...

c'est une erreur typique de références.
n'aurais-tu pas des lignes cochées marquées manquantes ?

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" <jean-francois.guenet@stablex.com> a écrit dans le message de
news: efEijIYJFHA.2716@TK2MSFTNGP15.phx.gbl...

Je n'ai pas changé d'access...j'utilise access 97

le code que tu m'a dit ne change rien...j'ai toujours la même erreur

merci de ton aide

Jac

10/03/2005 à 17:18

ok j'ai trouvé l'erreur...il manquait des fichier dans le dossier

C:Program FilesCommon FilesMicrosoft SharedDAO

il manquait le fichier DAO350.DLL et DAO2535.TLB

J'ai fait un register du DAO350.DLL et tout est ok maintenant

merci de ton aide

"Raymond [mvp]" wrote in message
news:

pour remettre dao3.6, tu coches la ligne microsoft dao 3.6 (dans l'ordre
alpha)
pourquoi as-tu la 3.6 alors que tu as 97 ? recherche si tu ne l'as pas sur
le disque. si tu la trouves tu l'indiques en faisant rechercher dans la
fenêtre.
faudra sûrement la registrer
regsvr32 "c:chemin completdao35......dll"

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" a écrit dans le message de news:

ben je n'ai pas dao 3.5 dans la liste

commetn on fait pour reinstaller dao 3.6
"Raymond [mvp]" wrote in message
news:%
en 97, il serait préférable de cocher la DAO 3.5 et non 3.6
est-ce que ça change ?
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" a écrit dans le message de
news:
Non tout ce qui est coché est ok

J'ai dans l'ordre

Visual Basic For Apllications
Microsoft Access 8.0 Object Library
Microsoft DAO 3.6 Object Library
utility
Microsoft Excel 8.0 Object Library
Microsoft Word 8.0 Object Library
Microsoft Data Access Components Ins...

"Raymond [mvp]" wrote in message
news:%
c'est une erreur typique de références.
n'aurais-tu pas des lignes cochées marquées manquantes ?

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" a écrit dans le message de
news:
Je n'ai pas changé d'access...j'utilise access 97

le code que tu m'a dit ne change rien...j'ai toujours la même erreur

merci de ton aide

ok j'ai trouvé l'erreur...il manquait des fichier dans le dossier

C:Program FilesCommon FilesMicrosoft SharedDAO

il manquait le fichier DAO350.DLL et DAO2535.TLB

J'ai fait un register du DAO350.DLL et tout est ok maintenant

merci de ton aide

"Raymond [mvp]" <XYZ.officesystem.access@free.fr> wrote in message
news:uI3pyuYJFHA.1292@TK2MSFTNGP09.phx.gbl...

pour remettre dao3.6, tu coches la ligne microsoft dao 3.6 (dans l'ordre
alpha)
pourquoi as-tu la 3.6 alors que tu as 97 ? recherche si tu ne l'as pas sur
le disque. si tu la trouves tu l'indiques en faisant rechercher dans la
fenêtre.
faudra sûrement la registrer
regsvr32 "c:chemin completdao35......dll"

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" <jean-francois.guenet@stablex.com> a écrit dans le message de news:
OvrdHqYJFHA.3752@TK2MSFTNGP14.phx.gbl...

ben je n'ai pas dao 3.5 dans la liste

commetn on fait pour reinstaller dao 3.6
"Raymond [mvp]" <XYZ.officesystem.access@free.fr> wrote in message
news:%238L18dYJFHA.2136@TK2MSFTNGP14.phx.gbl...

en 97, il serait préférable de cocher la DAO 3.5 et non 3.6
est-ce que ça change ?
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" <jean-francois.guenet@stablex.com> a écrit dans le message de
news: uHPzEVYJFHA.3596@TK2MSFTNGP14.phx.gbl...

Non tout ce qui est coché est ok

J'ai dans l'ordre

Visual Basic For Apllications
Microsoft Access 8.0 Object Library
Microsoft DAO 3.6 Object Library
utility
Microsoft Excel 8.0 Object Library
Microsoft Word 8.0 Object Library
Microsoft Data Access Components Ins...

"Raymond [mvp]" <XYZ.officesystem.access@free.fr> wrote in message
news:%23kCKgOYJFHA.2356@TK2MSFTNGP12.phx.gbl...

c'est une erreur typique de références.
n'aurais-tu pas des lignes cochées marquées manquantes ?

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum

"Jac" <jean-francois.guenet@stablex.com> a écrit dans le message de
news: efEijIYJFHA.2716@TK2MSFTNGP15.phx.gbl...

Je n'ai pas changé d'access...j'utilise access 97

le code que tu m'a dit ne change rien...j'ai toujours la même erreur

merci de ton aide

BD de win98 à XP

10 réponses

Veuillez sélectionner un problème