Bonjour,
Je vous prie de bien vouloir être indulgents car je commence tout juste la programmation (une ou deux semaines)
En fait je cherche à créer un module pour retourner le chemin d'un répertoire et l'afficher en tant que lien.
Je (tente) crée une application pour gérer une base de données au format access dans le domaine de l'immobilier alors je poserais surement d'autre questions si cela ne vous dérange pas.
Mon problème sur ce module est que je n'arrive pas à faire sortir de la boucle lorsque l'utilisateur clique sur messagebox.cancel, la fonction m'affiche à nouveau le folderbrowserdialog. Je pense savoir d'où vient le problème mais je n'arrive pas à le régler...
Voilà le code: Module
Mod_LienRep
Function MPRepertoire()
Do
Dim FolderBrowserDialog1 As New FolderBrowserDialog()
FolderBrowserDialog1.Description = "Choisissez votre répertoire"
If FolderBrowserDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
Dim Message As String = "Vous avez choisi: " + FolderBrowserDialog1.SelectedPath
Dim Caption As String = "Est-ce le bon répertoire?"
Dim Buttons As MessageBoxButtons = MessageBoxButtons.YesNoCancel
Dim Result As DialogResult
Dim Icon As MessageBoxIcon = MessageBoxIcon.Information
Result = MessageBox.Show(Message, Caption, Buttons, MessageBoxIcon.Question)
Select Case Result
Case Result = DialogResult.Yes
Return FolderBrowserDialog1.SelectedPath
Exit Do
Case Result = DialogResult.Cancel
Return Nothing
Exit Do
Exit Function
Case Result = DialogResult.No
End Select
Else
Exit Do
End If
Loop
End Function
End Module
Si au passage vous voyez des améliorations possibles n'hésitez pas a m'en faire part
Mon autre question est: sera t-il possible, a terme, d'utiliser une application windows de gestion de base de données access ou sql développée en VB.net via internet. Plus concrètement, les personnes utilisant cette appli seront peut être amenées a devoir consulter et modifier la base depuis leur domicile.
Merci d'avance.