OVH Cloud OVH Cloud

Pb avec "CurrentProject.Connection"

2 réponses
Avatar
Bruno MAZÉPA
Bonjour à tous,
Sous Runtime Access2000 avec un poste en XP, j'ai un problème !
J'utilise un Switchboard au démarrage de mon appli et j'ai une erreur à la
connection
...
Set con = Application.CurrentProject.Connection <= MON PB EST LA
stSql = "SELECT * FROM [Switchboard Items]"
stSql = stSql & " WHERE [ItemNumber] > 0 AND [SwitchboardID]=" &
Me![SwitchboardID]
stSql = stSql & " ORDER BY [ItemNumber];"
Set rs = CreateObject("ADODB.Recordset")
rs.Open stSql, con, 1 ' 1 = adOpenKeyset
...
Pourquoi, alors que d'autres poste en XP fonctionnent !?
--
Cordialement.

2 réponses

Avatar
André AVONS
Salut
essaies d'installer Jet 4.0 ou plus je ne sais plus la version

--
@+
André

Quelques liens avec des exemples, des utilitaires et des compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/

"Bruno MAZÉPA" <ReplyToNewsGroup> a écrit dans le message de news:

Bonjour à tous,
Sous Runtime Access2000 avec un poste en XP, j'ai un problème !
J'utilise un Switchboard au démarrage de mon appli et j'ai une erreur à la
connection
...
Set con = Application.CurrentProject.Connection <= MON PB EST LA
stSql = "SELECT * FROM [Switchboard Items]"
stSql = stSql & " WHERE [ItemNumber] > 0 AND [SwitchboardID]=" &
Me![SwitchboardID]
stSql = stSql & " ORDER BY [ItemNumber];"
Set rs = CreateObject("ADODB.Recordset")
rs.Open stSql, con, 1 ' 1 = adOpenKeyset
...
Pourquoi, alors que d'autres poste en XP fonctionnent !?
--
Cordialement.




Avatar
Bruno MAZÉPA
Merci andré, je vais essayer.
--
Cordialement.

"André AVONS" a écrit dans le message de
news:
Salut
essaies d'installer Jet 4.0 ou plus je ne sais plus la version

--
@+
André

Quelques liens avec des exemples, des utilitaires et des compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/

"Bruno MAZÉPA" <ReplyToNewsGroup> a écrit dans le message de news:

Bonjour à tous,
Sous Runtime Access2000 avec un poste en XP, j'ai un problème !
J'utilise un Switchboard au démarrage de mon appli et j'ai une erreur à
la


connection
...
Set con = Application.CurrentProject.Connection <= MON PB EST LA
stSql = "SELECT * FROM [Switchboard Items]"
stSql = stSql & " WHERE [ItemNumber] > 0 AND [SwitchboardID]=" &
Me![SwitchboardID]
stSql = stSql & " ORDER BY [ItemNumber];"
Set rs = CreateObject("ADODB.Recordset")
rs.Open stSql, con, 1 ' 1 = adOpenKeyset
...
Pourquoi, alors que d'autres poste en XP fonctionnent !?
--
Cordialement.