Petite question conne, aide svp

Petite question conne, aide svp - VB/VBA/VBS - Programmation

Marsh Posté le 06-02-2003 à 17:57:18    

Un utilisateur m'a demander si il était possible de faire un programme qui va chercher des données dans une base de donnée access et qui les rentrer (certaines de données) dans un fichier ms projet 98
 
Nous avons VB 3 ici. Et la seule manière que je connaisse pour accèdé à la base de donnée en access c'est un contrôle ado, mais il ne semble meme pas y avoir de composants dans vb3.
 
Est-ce qu'il est possible de créer une macro à partir de Ms Project qui se connecterai à la base de données en access et qui transmetterai des information de la base de donnée à la feuille de travail msproject98?
 
Sinon est-ce qu'il est possible que je fasse un programme en vb3 qui le ferai?
 
Merci beaucoup de votre aide!

Reply

Marsh Posté le 06-02-2003 à 17:57:18   

Reply

Marsh Posté le 06-02-2003 à 18:52:38    

[:tomilou]

Reply

Marsh Posté le 07-02-2003 à 17:55:11    

Reply

Marsh Posté le 07-02-2003 à 19:57:57    

1) Il faut installer MDAC, mais je crois que VB5 est le dernier VB à être supporté (avec VB6). VB3 ne doit pas être capable d'utiliser ADO. (c'est du 16 bits nons ?)
 
2) Oui, en VBA ça pose aucun problème.
Tu crée une macro, et dedans tu fait par exemple :
 

Code :
  1. option explicit
  3. public sub main()
  4.   dim cnx, rs as Object
  6.   set cnx = createobject("MSADO.Connection" )
  7.   set rs = createobject("MSADO.RecordSet" )
  9.   cnx.connectionString = "<<trouve la syntaxe pour te connecter à acces, m'en souviens plus :D>>"
  10.   cnx.open
  11.   set rs.ActiveConnection = cnx
  12.   rs.open("select Nom from users" )
  13.   do while not rs.eof
  14.     controle_dans_MSProjet.text = controle_dans_MSProjet.text & rs("Nom" ) & vbcrlf
  15.     rs.movenext
  16.   loop
  17.   cnx.close
  18.   set cnx = nothing
  19. end sub


 
Voilà, c'est un exemple basique.
Après, je connais pas du tout MSProject, donc débrouille-toi avec les contrôles. Le plus simple pour trouver le nom d'un contrôle, tu fais "enregistrer macro", et tu tapes un truc dans le contrôle, puis te regarde le code généré :)

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed