[RESOLU][access07][VBScript]dupliquer et garder une BDD à jour

dupliquer et garder une BDD à jour [RESOLU][access07][VBScript] - SQL/NoSQL - Programmation

Marsh Posté le 19-10-2010 à 12:04:43    

Bonjour à tous,
Je dois dupliquer (à la première execution du script) une base de donnée propriétaire vers une base access 2007, et ensuite, garder la base access à jour pour chaque nouvel enregistrement, et ceci, à chaque fois que le script sera executé.
Étant novice en SGBD et requêtes SQL, je souhaiterais savoir comment faire pour updater la base access à chaque execution du VBScript.
 
Pour le moment, j'ai le code me permettant de me connecter aux 2 bases simultanément, mais pas celui de l'update:
 

Code :
  1. dim dbconnect
  2. dim dbconnect2
  3. dim path
  4. dim table
  5. dim table2
  6. dim SQL
  7. dim DSN
  9. path = "mypath"
  10. table = "Table1"
  11. table2 = "F_ENUMLIBRECIAL"
  12. DSN = "DSN=GMAO"
  14. Set dbconnect = createobject("ADODB.Connection" )
  15. Set dbconnect2 = createobject("ADODB.Connection" )
  16. SQL="Provider=Microsoft.ACE.OLEDB.12.0;Data Source= " & path & ";"
  17. dbconnect.open SQL
  18. dbconnect2.open DSN
  20. dbconnect.Close
  21. dbconnect2.close


 
Je crois que je vais devoir utiliser les conditions du genre WHERE NOT IN ou LEFT OUTER JOIN mais je ne suis pas assez familiarisé avec les requêtes SQL.
 
Merci à ceux qui voudront bien m'aider.


Message édité par greg360 le 19-10-2010 à 16:31:54

---------------
Greg
Reply

Marsh Posté le 19-10-2010 à 12:04:43   

Reply

Marsh Posté le 19-10-2010 à 14:22:05    

Après avoir récupéré les champs modifiés dans la base propriétaire dans un recordset, je dois faire un INSERT INTO dans ma base access, mais je tombe sur une erreur de fin d'instruction attendue au caractère no. 24, c'est à dire, au début du nom de ma table :  

Code :
  1. strsql = "INSERT INTO "Table1"("NoMachine" ) VALUES (' " & rst(0) & " ')"


 
Est-ce que quelqu'un aurait une idée de la façon dont je pourrais résoudre ce pb svp ?


---------------
Greg
Reply

Marsh Posté le 19-10-2010 à 16:31:32    

Problème résolu :
 

Code :
  1. strsql = "INSERT INTO Table1(NoMachine ) VALUES (' " & rst(0) & " ')"


---------------
Greg
Reply

Sujets relatifs:

Leave a Replay

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