OVH Cloud OVH Cloud

Connexion avec FoxPro

4 réponses
Avatar
Eddie
Bonjour,
Je n'arrive pas =E0 me connecter =E0 une base Foxpro. J'ai=20
contr=F4ler la path de la base ainsi que le nom du driver=20
ODBC. Mais au moment d'ex=E9cuter ou de compiler j'obtiens=20
le message "Erreur de compilation Permission refus=E9e".
Voici une partie du code:
Public Function OpenFoxPro() As Boolean
On Error GoTo ERR_FIN
cn.Connect =3D "SourceType=3DDBF;" _
& "SourceDB=3D" & PathBaseFoxPro _
& "Driver=3D{Microsoft Visual FoxPro Driver}"
=20
cn.CursorDriver =3D rdUseOdbc
cn.EstablishConnection "rdDriverNoPrompt"
OpenFoxPro =3D True
Exit Function
ERR_FIN:
MsgBox "La connexion avec FoxPro n'a pu se faire",=20
vbOKOnly & vbCritical, "Pas d'bol"
OpenFoxPro =3D False
End Function

En fait j'ai fait un essai chez moi avec une copie de la=20
base et tout allait bien et au boulot =E7a foire.
L'ajout des r=E9f=E9rences au projet est correcte.

Quelqu'un a une id=E9e ?
D'avance merci.

4 réponses

Avatar
Stéphane Maillard
Bonjour,

Vous ne devez âs êtres Administrateur de votre poste.

--

Cordialement

Stéphane Maillard
Rixy Software
Saint Malo

"Eddie" a écrit dans le message de news: 016401c3c482$abb11e50$
Bonjour,
Je n'arrive pas à me connecter à une base Foxpro. J'ai
contrôler la path de la base ainsi que le nom du driver
ODBC. Mais au moment d'exécuter ou de compiler j'obtiens
le message "Erreur de compilation Permission refusée".
Voici une partie du code:
Public Function OpenFoxPro() As Boolean
On Error GoTo ERR_FIN
cn.Connect = "SourceTypeÛF;" _
& "SourceDB=" & PathBaseFoxPro _
& "Driver={Microsoft Visual FoxPro Driver}"

cn.CursorDriver = rdUseOdbc
cn.EstablishConnection "rdDriverNoPrompt"
OpenFoxPro = True
Exit Function
ERR_FIN:
MsgBox "La connexion avec FoxPro n'a pu se faire",
vbOKOnly & vbCritical, "Pas d'bol"
OpenFoxPro = False
End Function

En fait j'ai fait un essai chez moi avec une copie de la
base et tout allait bien et au boulot ça foire.
L'ajout des références au projet est correcte.

Quelqu'un a une idée ?
D'avance merci.


---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.552 / Virus Database: 344 - Release Date: 15/12/2003
Avatar
Eddie
Merci Stéphane pour ton aide.
Si j'ai bien compris, il faut être administrateur du poste
mais j'espère uniquement pour la compilation parce que je
crée un utilitaire qui devra être utilisé par d'autres
utilisateurs.
Peux-tu m'en dire plus ? Merci
-----Message d'origine-----
Bonjour,

Vous ne devez âs êtres Administrateur de votre poste.

--

Cordialement

Stéphane Maillard
Rixy Software
Saint Malo

"Eddie" a écrit


dans le message de news: 016401c3c482$abb11e50
$
Bonjour,
Je n'arrive pas à me connecter à une base Foxpro. J'ai
contrôler la path de la base ainsi que le nom du driver
ODBC. Mais au moment d'exécuter ou de compiler j'obtiens
le message "Erreur de compilation Permission refusée".
Voici une partie du code:
Public Function OpenFoxPro() As Boolean
On Error GoTo ERR_FIN
cn.Connect = "SourceTypeÛF;" _
& "SourceDB=" & PathBaseFoxPro _
& "Driver={Microsoft Visual FoxPro Driver}"

cn.CursorDriver = rdUseOdbc
cn.EstablishConnection "rdDriverNoPrompt"
OpenFoxPro = True
Exit Function
ERR_FIN:
MsgBox "La connexion avec FoxPro n'a pu se faire",
vbOKOnly & vbCritical, "Pas d'bol"
OpenFoxPro = False
End Function

En fait j'ai fait un essai chez moi avec une copie de la
base et tout allait bien et au boulot ça foire.
L'ajout des références au projet est correcte.

Quelqu'un a une idée ?
D'avance merci.


---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.552 / Virus Database: 344 - Release Date:


15/12/2003


.



Avatar
Eddie
J'ai aussi essayé en administrateur de mon poste et j'ai
le même problème
-----Message d'origine-----
Bonjour,

Vous ne devez âs êtres Administrateur de votre poste.

--

Cordialement

Stéphane Maillard
Rixy Software
Saint Malo

"Eddie" a écrit


dans le message de news: 016401c3c482$abb11e50
$
Bonjour,
Je n'arrive pas à me connecter à une base Foxpro. J'ai
contrôler la path de la base ainsi que le nom du driver
ODBC. Mais au moment d'exécuter ou de compiler j'obtiens
le message "Erreur de compilation Permission refusée".
Voici une partie du code:
Public Function OpenFoxPro() As Boolean
On Error GoTo ERR_FIN
cn.Connect = "SourceTypeÛF;" _
& "SourceDB=" & PathBaseFoxPro _
& "Driver={Microsoft Visual FoxPro Driver}"

cn.CursorDriver = rdUseOdbc
cn.EstablishConnection "rdDriverNoPrompt"
OpenFoxPro = True
Exit Function
ERR_FIN:
MsgBox "La connexion avec FoxPro n'a pu se faire",
vbOKOnly & vbCritical, "Pas d'bol"
OpenFoxPro = False
End Function

En fait j'ai fait un essai chez moi avec une copie de la
base et tout allait bien et au boulot ça foire.
L'ajout des références au projet est correcte.

Quelqu'un a une idée ?
D'avance merci.


---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.552 / Virus Database: 344 - Release Date:


15/12/2003


.



Avatar
Axel Guerrier [MS]
Je t'ai répondu dans le forum Accès aux Données...

Filemon + Regmon de www.sysinternals.com


--
Axel GUERRIER
Microsoft France
--------------------
Merci de bien vouloir répondre à ce message dans le newsgroup où il a été
posté. Je le consulte régulièrement.

"Eddie" wrote in message
news:041101c3c4af$4430de00$
J'ai aussi essayé en administrateur de mon poste et j'ai
le même problème
-----Message d'origine-----
Bonjour,

Vous ne devez âs êtres Administrateur de votre poste.

--

Cordialement

Stéphane Maillard
Rixy Software
Saint Malo

"Eddie" a écrit


dans le message de news: 016401c3c482$abb11e50
$
Bonjour,
Je n'arrive pas à me connecter à une base Foxpro. J'ai
contrôler la path de la base ainsi que le nom du driver
ODBC. Mais au moment d'exécuter ou de compiler j'obtiens
le message "Erreur de compilation Permission refusée".
Voici une partie du code:
Public Function OpenFoxPro() As Boolean
On Error GoTo ERR_FIN
cn.Connect = "SourceTypeÛF;" _
& "SourceDB=" & PathBaseFoxPro _
& "Driver={Microsoft Visual FoxPro Driver}"

cn.CursorDriver = rdUseOdbc
cn.EstablishConnection "rdDriverNoPrompt"
OpenFoxPro = True
Exit Function
ERR_FIN:
MsgBox "La connexion avec FoxPro n'a pu se faire",
vbOKOnly & vbCritical, "Pas d'bol"
OpenFoxPro = False
End Function

En fait j'ai fait un essai chez moi avec une copie de la
base et tout allait bien et au boulot ça foire.
L'ajout des références au projet est correcte.

Quelqu'un a une idée ?
D'avance merci.


---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.552 / Virus Database: 344 - Release Date:


15/12/2003


.