[vba]cherche fonction equivalente de Access 97 --> 2003

cherche fonction equivalente de Access 97 --> 2003 [vba] - VB/VBA/VBS - Programmation

Marsh Posté le 01-06-2005 à 11:40:22    

Bonjour, je suis en stage et chargé de tranférer des bases de données à partir de Access 97 vers Access 2003 mais je débute sur les deux versions.
 
Il ce trouve que le morceau de code si dessous est le même dans les 2 versions et semble aussi correct par rapport à l'aide des 2 versions.
Et pourtant il ne fonctionne que sur A97.
L'erreur semble venir de la fonction ".LookIn".
Est-ce une erreur de programmation ou un mise à jour au niveau des drivers par exemples...
 

Code :
  1. With APPLICATION.FileSearch
  2.         .LookIn = "A:\"
  3.         'verification de la presence d'une disquette sur le lecteur
  4.         If .LookIn <> "A:\" Then
  5.             MsgBox "Vérifier que la disquette est bien introduite..."
  6.             DoCmd.Hourglass False
  7.             Exit Sub
  8.         End If
  9. ......


Qu'il y est la disquette ou pas, .LookIn ne recherche rien et garde la valeur "A:\" sur A2003
Il ne sais donc pas qu'il n'y à pas de disquette et ne rentre pas dans la boucle.
 
Merci d'avance pour vos réponces. :hello:


Message édité par Tymber le 02-06-2005 à 07:46:22
Reply

Marsh Posté le 01-06-2005 à 11:40:22   

Reply

Marsh Posté le 02-06-2005 à 08:19:48    

Je n'en sais toujours pas plus, j'ai même essayé au niveau de SanBox " bloqué, débloqué " car cela joue apparement sur la validité des fonctions sous Access 2003.
Je continue d'espérer.
Merci

Reply

Sujets relatifs:

Leave a Replay

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