Dans ma base de donnée access j'ai le codage suivant :
For Each qdf In db1.QueryDefs
If qdf.Name = "requete_requete_Tyvek" Then
db1.QueryDefs.Delete qdf.Name
End If
Next qdf
chSQL = "SELECT * FROM requete_Tyvek WHERE [requete_Tyvek].[Domain]='" &
rs2.Fields!DomainName.Value & "'"
Set qdf = db1.CreateQueryDef("requete_requete_Tyvek", chSQL)
rs.Open "select * from requete_requete_Tyvek", connection, adOpenStatic,
adLockOptimistic <---------------- erreur
Mon probleme c'est rendu a la ligne rs.Open "select * from
requete_requete_Tyvek", connection, adOpenStatic, adLockOptimistic
il me dit que la requete existe pas ! mais si j'appuis sur F8 pour continuer
et bien il continue et il reussi quand meme a ecrire dans ma requete !!
Quelqu'un aurai une iddée pk il me fait cette erreur :(
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
ze Titi
Bonjour AbSo
essaie:
set rs=currentdb.openrecordset("requete_requete_tyvek",dbOpenDynaset,dbOptimistic)
Dans ton message <eo$ du mardi
Bonjour a tous,
Dans ma base de donnée access j'ai le codage suivant :
For Each qdf In db1.QueryDefs If qdf.Name = "requete_requete_Tyvek" Then db1.QueryDefs.Delete qdf.Name End If Next qdf chSQL = "SELECT * FROM requete_Tyvek WHERE [requete_Tyvek].[Domain]='" & rs2.Fields!DomainName.Value & "'" Set qdf = db1.CreateQueryDef("requete_requete_Tyvek", chSQL) rs.Open "select * from requete_requete_Tyvek", connection, adOpenStatic, adLockOptimistic <---------------- erreur
Mon probleme c'est rendu a la ligne rs.Open "select * from requete_requete_Tyvek", connection, adOpenStatic, adLockOptimistic il me dit que la requete existe pas ! mais si j'appuis sur F8 pour continuer et bien il continue et il reussi quand meme a ecrire dans ma requete !!
Quelqu'un aurai une iddée pk il me fait cette erreur :(
Merci de votre aide
-- Voilou ! Cordialement,
Ze Titi
Bonjour AbSo
essaie:
set
rs=currentdb.openrecordset("requete_requete_tyvek",dbOpenDynaset,dbOptimistic)
Dans ton message <eo$IgfjHHHA.3268@TK2MSFTNGP04.phx.gbl> du mardi
Bonjour a tous,
Dans ma base de donnée access j'ai le codage suivant :
For Each qdf In db1.QueryDefs
If qdf.Name = "requete_requete_Tyvek" Then
db1.QueryDefs.Delete qdf.Name
End If
Next qdf
chSQL = "SELECT * FROM requete_Tyvek WHERE [requete_Tyvek].[Domain]='" &
rs2.Fields!DomainName.Value & "'"
Set qdf = db1.CreateQueryDef("requete_requete_Tyvek", chSQL)
rs.Open "select * from requete_requete_Tyvek", connection, adOpenStatic,
adLockOptimistic <---------------- erreur
Mon probleme c'est rendu a la ligne rs.Open "select * from
requete_requete_Tyvek", connection, adOpenStatic, adLockOptimistic
il me dit que la requete existe pas ! mais si j'appuis sur F8 pour continuer
et bien il continue et il reussi quand meme a ecrire dans ma requete !!
Quelqu'un aurai une iddée pk il me fait cette erreur :(
set rs=currentdb.openrecordset("requete_requete_tyvek",dbOpenDynaset,dbOptimistic)
Dans ton message <eo$ du mardi
Bonjour a tous,
Dans ma base de donnée access j'ai le codage suivant :
For Each qdf In db1.QueryDefs If qdf.Name = "requete_requete_Tyvek" Then db1.QueryDefs.Delete qdf.Name End If Next qdf chSQL = "SELECT * FROM requete_Tyvek WHERE [requete_Tyvek].[Domain]='" & rs2.Fields!DomainName.Value & "'" Set qdf = db1.CreateQueryDef("requete_requete_Tyvek", chSQL) rs.Open "select * from requete_requete_Tyvek", connection, adOpenStatic, adLockOptimistic <---------------- erreur
Mon probleme c'est rendu a la ligne rs.Open "select * from requete_requete_Tyvek", connection, adOpenStatic, adLockOptimistic il me dit que la requete existe pas ! mais si j'appuis sur F8 pour continuer et bien il continue et il reussi quand meme a ecrire dans ma requete !!
Quelqu'un aurai une iddée pk il me fait cette erreur :(
Merci de votre aide
-- Voilou ! Cordialement,
Ze Titi
AbSo
Bonjour ze Titi
J'ai essayer mais sa ne fonctionne pas plus toujour la meme erreur ! il me dit que la table ou la requete n'existe pas ou est mal orthographier :(
si quelqu'un a des iddée je suis toujour preneur :)
Merci de ton aide
"ze Titi" a écrit dans le message de news:
Bonjour AbSo
essaie:
set rs=currentdb.openrecordset("requete_requete_tyvek",dbOpenDynaset,dbOptimistic)
Dans ton message <eo$ du mardi
Bonjour a tous,
Dans ma base de donnée access j'ai le codage suivant :
For Each qdf In db1.QueryDefs If qdf.Name = "requete_requete_Tyvek" Then db1.QueryDefs.Delete qdf.Name End If Next qdf chSQL = "SELECT * FROM requete_Tyvek WHERE [requete_Tyvek].[Domain]='" & rs2.Fields!DomainName.Value & "'" Set qdf = db1.CreateQueryDef("requete_requete_Tyvek", chSQL) rs.Open "select * from requete_requete_Tyvek", connection, adOpenStatic, adLockOptimistic <---------------- erreur
Mon probleme c'est rendu a la ligne rs.Open "select * from requete_requete_Tyvek", connection, adOpenStatic, adLockOptimistic il me dit que la requete existe pas ! mais si j'appuis sur F8 pour continuer et bien il continue et il reussi quand meme a ecrire dans ma requete !!
Quelqu'un aurai une iddée pk il me fait cette erreur :(
Merci de votre aide
-- Voilou ! Cordialement,
Ze Titi
Bonjour ze Titi
J'ai essayer mais sa ne fonctionne pas plus toujour la meme erreur !
il me dit que la table ou la requete n'existe pas ou est mal orthographier
:(
si quelqu'un a des iddée je suis toujour preneur :)
Merci de ton aide
"ze Titi" <ze_titi_enlever-ceci@tiscali.fr> a écrit dans le message de news:
mn.6a1f7d6ccf1951c7.64280@tiscali.fr...
Bonjour AbSo
essaie:
set
rs=currentdb.openrecordset("requete_requete_tyvek",dbOpenDynaset,dbOptimistic)
Dans ton message <eo$IgfjHHHA.3268@TK2MSFTNGP04.phx.gbl> du mardi
Bonjour a tous,
Dans ma base de donnée access j'ai le codage suivant :
For Each qdf In db1.QueryDefs
If qdf.Name = "requete_requete_Tyvek" Then
db1.QueryDefs.Delete qdf.Name
End If
Next qdf
chSQL = "SELECT * FROM requete_Tyvek WHERE [requete_Tyvek].[Domain]='" &
rs2.Fields!DomainName.Value & "'"
Set qdf = db1.CreateQueryDef("requete_requete_Tyvek", chSQL)
rs.Open "select * from requete_requete_Tyvek", connection, adOpenStatic,
adLockOptimistic <---------------- erreur
Mon probleme c'est rendu a la ligne rs.Open "select * from
requete_requete_Tyvek", connection, adOpenStatic, adLockOptimistic
il me dit que la requete existe pas ! mais si j'appuis sur F8 pour
continuer et bien il continue et il reussi quand meme a ecrire dans ma
requete !!
Quelqu'un aurai une iddée pk il me fait cette erreur :(
J'ai essayer mais sa ne fonctionne pas plus toujour la meme erreur ! il me dit que la table ou la requete n'existe pas ou est mal orthographier :(
si quelqu'un a des iddée je suis toujour preneur :)
Merci de ton aide
"ze Titi" a écrit dans le message de news:
Bonjour AbSo
essaie:
set rs=currentdb.openrecordset("requete_requete_tyvek",dbOpenDynaset,dbOptimistic)
Dans ton message <eo$ du mardi
Bonjour a tous,
Dans ma base de donnée access j'ai le codage suivant :
For Each qdf In db1.QueryDefs If qdf.Name = "requete_requete_Tyvek" Then db1.QueryDefs.Delete qdf.Name End If Next qdf chSQL = "SELECT * FROM requete_Tyvek WHERE [requete_Tyvek].[Domain]='" & rs2.Fields!DomainName.Value & "'" Set qdf = db1.CreateQueryDef("requete_requete_Tyvek", chSQL) rs.Open "select * from requete_requete_Tyvek", connection, adOpenStatic, adLockOptimistic <---------------- erreur
Mon probleme c'est rendu a la ligne rs.Open "select * from requete_requete_Tyvek", connection, adOpenStatic, adLockOptimistic il me dit que la requete existe pas ! mais si j'appuis sur F8 pour continuer et bien il continue et il reussi quand meme a ecrire dans ma requete !!
Quelqu'un aurai une iddée pk il me fait cette erreur :(
