Bonjour. J'ai créé un programme avec une base de données access sous vb6. (c:\Program Files\MaBd.mdb). Je voudrais si possible effectuer des enregistrement de ces données sur une clef USB afin de pouvoir y avoir acces sur mon portable ou sur un autre pc par l'intermédiaire du meme programme par exemple. Comment faire?
Merci d'avance.

Salut ;O)

La clé USB étant renseignée via une nouvelle lettre de lecteur, il te suffit dès lors de changer le chemin de ta DB....

Guy

Ok pas de problème, en fait j'ai oublié de dire que ce n'était pas forcement sur le meme pc a chaque fois. Je m'explique. Sur mon portable ce sera la lettre e:\ mais sur le pc d'un pote, il peut avoir un lecteur disquette, 2 HD, 1 Lecteur, 1 graveur...donc la lettre ne sera plus la meme.
Suis je obligé de passer par un FileListBox, DriveBox etc... ou (ce qui m'interesse le plus) puis je faire en sorte que mon programme trouve seul le chemin d'accès de ce fichier. (J'en demande un peu trop là non ? ;)

Re ;O)

En effet, cela devient difficile.
Une possibilité (pas certaine) serait de lister tous les lecteurs et connaître leur type.

L'API faisant cela est GetDriveType.

Déclaration :

Private Declare Function GetDriveType Lib "kernel32" Alias "GetDriveTypeA" (ByVal nDrive As String) As Long

La clé USB étant un média amovible, GetDriveType devrait retourner la valeur 2.

Public Function fGetDriveType(strDrive As String) As String

Select Case GetDriveType(strDrive)
Case 2
fGetDriveType = "Amovible"
Case 3
fGetDriveType = "Disque dur"
Case Is = 4
fGetDriveType = "Réseau"
Case Is = 5
fGetDriveType = "CD-ROM"
Case Is = 6
fGetDriveType = "Disque RAM"
Case Else
fGetDriveType = "Inconnu"
End Select

End Function


En supposant que tu n'ais qu'un lecteur amovible, il suffirait dès lors de faire une recherche du fichier ce lecteur.

C'est une piste à explorer...

Guy

Je te remercie. Je teste voir ce que cela donne.