Vb.net (probleme savefiledialog)

Résolu
bouchrot -  
Bonjour,
salut , le but est de extraire les donnees from datagrid to pdf , j'ai 2 boutons un pour choisir la destination , le 2eme , pour exporter , quand je clique sur le 1 er bouton je reçois ce message


merci de m'aider

12 réponses

  1. bouchrot Auteur
    oui ,ou je peut laisser la procédure d'impression la dernière chose a faire

    merci
    0
    1. Utilisateur anonyme
      Corriger, comme ça je ne sais pas.
      Contourner, peut-être.
      Tu crées un autre projet, tu donnes le même nom à la form.
      Tu dessines le même design (pas copié/collé), tu donnes les mêmes noms aux contrôles.
      Je pense que tu peux copier le code behind.
      Tu enregistres tout bien et tu remplaces la form du premier projet par la nouvelle.
      0
      1. bouchrot Auteur
        tu as raison j'ai supprimer un bouton pour voir , j'ai rencontrer le problème encore, est ce qu'il ya une solution pour y remédier ?
        0
        1. bouchrot Auteur
          tu veux dire , je supprile le save file dialog , et le remettre ?
          0
          1. Utilisateur anonyme
            Puisque ça marche avec le code de yoda. Pas forcément besoin. Mais si le design déconne tu auras peut être d'autres soucis. Alors ça peut valoir le coup d'essayer
            0
        3. bouchrot Auteur
          enfin ,ça marché , alors c'est cette Dim Save_File As New SaveFileDialog

          merci beaucoup
          0
          1. Utilisateur anonyme
            alors le problème vient du design de la form, supprime la boite initiale.
            Eventuellement, remets en un pour essayer.
            0
        4. bouchrot Auteur
          j'ai ajouter filedialog sur d'autre form ça marche bien


          mais ça marche pas sur le form ou j'en ai besoin !!!!!!
          0
          1. Yoda
            Alors peut-être comme ça 

            Dim Save_File As New SaveFileDialog
            If Save_File.ShowDialog() = DialogResult.OK Then 
               ' declaration textbox2 to save file dialog name 
               TextBox2.Text = Save_File.FileName 
            Else
               TextBox2.Text = ""
            End If
            0
        5. bouchrot Auteur


          ça ne marche pas , j'ai pas d'erreur ailleurs , seulement ici

          bon je vais vous montrer ça

          http://www6.hc-kr.com/?tdfs=1&searchbox=1&showDomain=1
          0
          1. Yoda
            Bonjour,
            tu devrais essayer comme ça 

            If SaveFileDialog1.ShowDialog() = DialogResult.OK Then 
               ' declaration textbox2 to save file dialog name 
               TextBox2.Text = SaveFileDialog1.FileName 
            Else
               TextBox2.Text = ""
            End If
            0
        6. Utilisateur anonyme
          Et si tu essayes 

          SaveFileDialog1.FileName = "" 
Dim choix as DialogResult = SaveFileDialog1.ShowDialog()
If choix = DialogResult.OK Then 
' declaration textbox2 to save file dialog name 
TextBox2.Text = SaveFileDialog1.FileName 
End If

          ?

          Si ça ne marche pas, merci de préciser quelque ligne plante.
          De plus en survolant les différentes variables ou en mettant des espions, précise leurs contenus
          Quand j'étais petit, la mer Morte n'était que malade.
          George Burns
          0
          1. bouchrot Auteur
            j'ai pas bien compris la page que tu ma indiqué , peux tu me montrer la syntaxe , si'l te plait
            0
            1. bouchrot Auteur
              avec plaisir

              SaveFileDialog1.FileName = ""
              If SaveFileDialog1.ShowDialog() = DialogResult.OK Then
              ' declaration textbox2 to save file dialog name
              TextBox2.Text = SaveFileDialog1.FileName
              End If
              0
              1. Utilisateur anonyme
                Ok, et cela marche?
                0
              2. bouchrot Auteur
                non il m'affiche toujours le meme message
                0
            2. Utilisateur anonyme
              Bonjour,

              La méthode showDilaog retourne directement un DialogResult 

              If SaveFileDialog1.ShowDialog()= DialogResult.OK Then

              Voir l'exemple sur l'aide en ligne
              https://docs.microsoft.com/en-us/dotnet/api/system.windows.forms.commondialog.showdialog?redirectedfrom=MSDN&view=netframework-4.8#code-snippet-2
              0
              1. bouchrot Auteur
                quelle est le rapport avec mon problème ?
                0
            3. Reivax962
              Bonjour,

              Mon vb est un peu rouillé, mais est-ce qu'i lne faudrait pas tester la valeur DialogResult du dialogue, versus DialogResult.OK ? 

              If SaveFileDialog1.ShowDialog().DialogResult = DialogResult.OK Then


              Xavier
              0
              1. bouchrot Auteur
                If SaveFileDialog1.ShowDialog().DialogResult = DialogResult.OK Then n'est pas connu par system.windows.form.dialogresult
                0

            Discussions similaires

            fonction substring en vb
            providence

            4 réponses
            [vb net] ouvrir fichier excel
            balabonov

            16 réponses
            code vb.net
            Pacome.k

            17 réponses
            Convert | VB.net
            Xineroks

            25 réponses
            [VB.NET] Format datetime
            arkhan07

            5 réponses