ce code comporte des elements deja connu mais il permet d'aller chercher des informations situer sur un poste en reseau meme si on n'est pas encore connecter
il suffit de creer dans access une macro qui ne fait que d'execute la fonction connection et de mettre a la fin de la fonction ce qu'on veut executer une fois la connection realiser
le bout de code ci dessous permet d'attendre que la connexion est faite
While IfFIleExists() = 0
IfFIleExists
Wend
Source / Exemple :
Public Function connection()
If IfFIleExists() = 0 Then
LigneCommande = "NET USE P: \\b398238\user"
retour = Shell(LigneCommande, vbNormalFocus)
End If
While IfFIleExists() = 0
IfFIleExists
Wend
'ici = ce que vous vouler faire une fois la connection realiser
End Function
Public Function IfFIleExists() As Long
On Error GoTo ErrX
Open "P:\test.txt" For Append As #1
Close #1
IfFIleExists = 1
Exit Function
ErrX:
IfFIleExists = 0
End Function
Conclusion :
je sais qu'il existe les fonctions WNetCancelConnection et l'autre sans avoir a utiliser du dos
mais le probleme que ca me posait etait que le code avait les valeur comme quoi la connection etait realiser mais celle ci ne s'etait pas entierement realiser don error
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.