BasicInstinct
Messages postés1470Date d'inscriptionmardi 5 février 2002StatutMembreDernière intervention20 octobre 2014
-
9 oct. 2002 à 22:55
houdta
Messages postés6Date d'inscriptionmercredi 19 août 2009StatutMembreDernière intervention 7 avril 2011
-
7 avril 2011 à 11:48
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
houdta
Messages postés6Date d'inscriptionmercredi 19 août 2009StatutMembreDernière intervention 7 avril 2011 7 avril 2011 à 11:48
bonjour, je suis trés débutante en vba, j'ai besoin d'un peti aide,
donc voilà mon problém, j'utilise une base de données access ds mon code, on ne reconnait pas les types genre "database" "ADODB.application"..., je voulais savoir si ya une biblioték ou un fichier à importer , merci davance
Est-il possible d'assigner la valeur NULL a un champs, un truc du genre
# rs.Fields("First_Name") = NULL
# rs.Update
J'ai pas mal cherché sur le web, rien trouvé
loreleimimi
Messages postés9Date d'inscriptionmardi 6 avril 2004StatutMembreDernière intervention25 juillet 2006 25 juil. 2006 à 12:27
Bonjour,
voici mon code :
Mon problème est le suivant, le message "runtime error 3251 : le fournisseur actuel ne prend pas en charge l'interface nécessaire pour le tri ou le filtrage". Pourriez vous me dire pourquoi.
--------------------------------------
Dim conn As ADODB.Connection
Dim rs As ADODB.RecordSet
'ACCES A LA BASE DE DONNEES
Set conn = New ADODB.Connection
conn.ConnectionString = " Provider=Microsoft.Jet.OLEDB.4.0;Data Source=U:\PI\SPC\Lien vers InSQL.mdb;Persist Security Info=False"
conn.Open
Set rs = New ADODB.RecordSet
Dim sql As String
'
sql = "SELECT * FROM Table_Batch"
'
'rs.Open sql, conn, adOpenKeyset, adLockPessimistic
Set rs = New ADODB.RecordSet
rs.CursorType = adOpenKeyset
rs.LockType = adLockOptimistic
rs.Source = sql
rs.ActiveConnection = conn
rs.Open
'rs.MoveFirst
rs.Sort = "Grade ASC"
------------------------------------------
Merci.
cam360
Messages postés1Date d'inscriptionvendredi 21 avril 2006StatutMembreDernière intervention21 avril 2006 21 avril 2006 à 13:54
Bonjour. J'ai exactement le même problème et je ne trouve aucune solution pour y remédier. Impossible de trouver comment lier une référence. Je suis sous Microsoft Visual Basic 6.3.
Merci d'avance
poy20
Messages postés40Date d'inscriptionmardi 9 novembre 2004StatutMembreDernière intervention19 janvier 2009 4 févr. 2006 à 20:22
Salut ! je suis novice, et j'ai moi aussi un problème avec ADODB.Connection. On m'affiche "type non défini".
D'après ce que j'ai lu plus haut, il faut activer des fichiers ("ActiveX Data Objects"), mais, je ne sais pas comment faire...
Je suis sous VB 2005 express, si qq'un pouvait m'aider !? Merci !
JMART53
Messages postés2Date d'inscriptionsamedi 11 novembre 2000StatutMembreDernière intervention31 mars 2005 31 mars 2005 à 17:58
Super code source.
Néanmoins j'ai un petit problème avec la fonction find.
rs.Find "worker_name LIKE 'r*'" fonction correctement.
Mais si dans mon find j'ai deux élément cela ne fonctionne pas.
Exemple rs.find "name 'toto' and last_name 'titi'"
Merci d'avance
j.martin@groupe-seche.com
CapDeBoro
Messages postés14Date d'inscriptionlundi 23 décembre 2002StatutMembreDernière intervention 1 août 2003 13 mai 2004 à 11:40
C'est normal, "Data Access Object" est différent de "ActiveX Data Objects". DAO est l'ancien système, en voie de disparition.
Cordialement
Cap de Boro
Nightmoo
Messages postés22Date d'inscriptionjeudi 6 mai 2004StatutMembreDernière intervention27 juillet 2004 13 mai 2004 à 09:55
Sa claretée est très intéressante malgrès le manque de commentaires.
Mais j'ai un problème avec cette cource :
Dim cn As ADODB.Connection
Message d'erreur : Type définit par l'utilisateur non définit (User-defined type not defined)
Je ne comprend pas par ce que j'ai pourant activer le fichier Ms DAO 3.5 Object Library.
Nightmoo
Messages postés22Date d'inscriptionjeudi 6 mai 2004StatutMembreDernière intervention27 juillet 2004 13 mai 2004 à 09:53
Sa claretée est très intéressante malgrès le manque de commentaires.
Mais j'ai un problème avec cette cource :
Dim cn As ADODB.Connection
Message d'erreur : Type définit par l'utilisateur non définit (User-defined type not defined)
Je ne comprend pas par ce que j'ai pourant activer le fichier Ms DAO 3.5 Object Library.
cs_ferailleur
Messages postés1Date d'inscriptionmardi 25 février 2003StatutMembreDernière intervention15 février 2004 15 févr. 2004 à 17:06
Bonjour,
comment fait on pour afficher dans un grid le resultat d'une requête executé via adobc ?
ps je suis un grand débutant soyez indulgent
merci
SeeNapse
Messages postés33Date d'inscriptionvendredi 24 janvier 2003StatutMembreDernière intervention18 mai 2004 16 mars 2003 à 12:08
Super ce tutorial, il m'a énormement aidé quand j'étais dans l'impasse.
Encore merci. 9/10
hassanvb6
Messages postés1Date d'inscriptiondimanche 2 mars 2003StatutMembreDernière intervention 2 mars 2003 2 mars 2003 à 21:47
Salut
l'instruction find fait une recherhce séquentiel enrg/enrg..., peut-on parler d'index avec le model ADO ?
réponse souhaité...., et merçi d'avance
CapDeBoro
Messages postés14Date d'inscriptionlundi 23 décembre 2002StatutMembreDernière intervention 1 août 2003 31 déc. 2002 à 09:32
Adiu
Merci pour ce tutorial qui me facilite grandement le travail.
J'ai cependant une difficulté dans l'utilisation de "AddNew" : Si je n'utilise pas la méthode lourde (#3) pour la déclaration du RecordSet, j'obtiens un message d'erreur "Le jeu d'enregistrement suivant ne prend pas en charge la mise à jour ...". Existe-t-il dans Access la case à cocher magique qui me permette d'utiliser la méthode légère (cn.execute) sans message d'erreur ?
Merci d'avance
Cap de Boro
devsurf
Messages postés148Date d'inscriptiondimanche 13 octobre 2002StatutMembreDernière intervention13 novembre 2008 16 nov. 2002 à 12:40
Trés pedagogique, merci
Juste une question : Comment fait on sur adodb pour connaitre la liste des tables dans un fichier
merci
devsurf@hotmail.com
minipod
Messages postés60Date d'inscriptionmardi 18 juin 2002StatutMembreDernière intervention 8 mars 2003 9 oct. 2002 à 22:59
excellent ! tout juste ce dont j'avais besoin !
BasicInstinct
Messages postés1470Date d'inscriptionmardi 5 février 2002StatutMembreDernière intervention20 octobre 201412 9 oct. 2002 à 22:55
7 avril 2011 à 11:48
donc voilà mon problém, j'utilise une base de données access ds mon code, on ne reconnait pas les types genre "database" "ADODB.application"..., je voulais savoir si ya une biblioték ou un fichier à importer , merci davance
31 oct. 2006 à 20:11
Est-il possible d'assigner la valeur NULL a un champs, un truc du genre
# rs.Fields("First_Name") = NULL
# rs.Update
J'ai pas mal cherché sur le web, rien trouvé
25 juil. 2006 à 12:27
voici mon code :
Mon problème est le suivant, le message "runtime error 3251 : le fournisseur actuel ne prend pas en charge l'interface nécessaire pour le tri ou le filtrage". Pourriez vous me dire pourquoi.
--------------------------------------
Dim conn As ADODB.Connection
Dim rs As ADODB.RecordSet
'ACCES A LA BASE DE DONNEES
Set conn = New ADODB.Connection
conn.ConnectionString = " Provider=Microsoft.Jet.OLEDB.4.0;Data Source=U:\PI\SPC\Lien vers InSQL.mdb;Persist Security Info=False"
conn.Open
Set rs = New ADODB.RecordSet
Dim sql As String
'
sql = "SELECT * FROM Table_Batch"
'
'rs.Open sql, conn, adOpenKeyset, adLockPessimistic
Set rs = New ADODB.RecordSet
rs.CursorType = adOpenKeyset
rs.LockType = adLockOptimistic
rs.Source = sql
rs.ActiveConnection = conn
rs.Open
'rs.MoveFirst
rs.Sort = "Grade ASC"
------------------------------------------
Merci.
21 avril 2006 à 13:54
Merci d'avance
4 févr. 2006 à 20:22
D'après ce que j'ai lu plus haut, il faut activer des fichiers ("ActiveX Data Objects"), mais, je ne sais pas comment faire...
Je suis sous VB 2005 express, si qq'un pouvait m'aider !? Merci !
31 mars 2005 à 17:58
Néanmoins j'ai un petit problème avec la fonction find.
rs.Find "worker_name LIKE 'r*'" fonction correctement.
Mais si dans mon find j'ai deux élément cela ne fonctionne pas.
Exemple rs.find "name 'toto' and last_name 'titi'"
Merci d'avance
j.martin@groupe-seche.com
13 mai 2004 à 11:40
Cordialement
Cap de Boro
13 mai 2004 à 09:55
Mais j'ai un problème avec cette cource :
Dim cn As ADODB.Connection
Message d'erreur : Type définit par l'utilisateur non définit (User-defined type not defined)
Je ne comprend pas par ce que j'ai pourant activer le fichier Ms DAO 3.5 Object Library.
13 mai 2004 à 09:53
Mais j'ai un problème avec cette cource :
Dim cn As ADODB.Connection
Message d'erreur : Type définit par l'utilisateur non définit (User-defined type not defined)
Je ne comprend pas par ce que j'ai pourant activer le fichier Ms DAO 3.5 Object Library.
15 févr. 2004 à 17:06
comment fait on pour afficher dans un grid le resultat d'une requête executé via adobc ?
ps je suis un grand débutant soyez indulgent
merci
16 mars 2003 à 12:08
Encore merci. 9/10
2 mars 2003 à 21:47
l'instruction find fait une recherhce séquentiel enrg/enrg..., peut-on parler d'index avec le model ADO ?
réponse souhaité...., et merçi d'avance
31 déc. 2002 à 09:32
Merci pour ce tutorial qui me facilite grandement le travail.
J'ai cependant une difficulté dans l'utilisation de "AddNew" : Si je n'utilise pas la méthode lourde (#3) pour la déclaration du RecordSet, j'obtiens un message d'erreur "Le jeu d'enregistrement suivant ne prend pas en charge la mise à jour ...". Existe-t-il dans Access la case à cocher magique qui me permette d'utiliser la méthode légère (cn.execute) sans message d'erreur ?
Merci d'avance
Cap de Boro
16 nov. 2002 à 12:40
Juste une question : Comment fait on sur adodb pour connaitre la liste des tables dans un fichier
merci
devsurf@hotmail.com
9 oct. 2002 à 22:59
9 oct. 2002 à 22:55