Convertir un code de vb.net à c#

**loviso** · 05/08/2009, 12h21

je possède le code de ces méthodes en vb.net je veux juste savoir comment traduire ce code en c#
je suis encore débutant au niveau de la programmation c#

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
#Region "MAJ Base"
 
    'Méthode Ajouter
    Public Function Ajouter() As Boolean
        'Déclaration de la variable SqlCommand
        Dim Cmd As SqlCommand = New SqlCommand
        Try
            With Cmd
                'Affectation des paramètres de la variable SqlCommand
                .CommandType = CommandType.Text
                .Connection = ClApplication.Cn
                'Exécution de la requète Ajouter
                .CommandText = "INSERT INTO [dbo].[Responsable]([Numero_CIN], [Nom], [Prenom]) VALUES ('" & m_Numero_CIN & "', '" & m_Nom & "', '" & m_Prenom & "')"
                If .ExecuteNonQuery <> 0 Then
                    Return True
                End If
            End With
        Catch ex As Exception
            MsgBox(Err.Description)
            Return False
        Finally
        End Try
    End Function
 
    'Méthode Modifier
    Public Function Modifier() As Boolean
        'Déclaration de la variable SqlCommand
        Dim Cmd As SqlCommand = New SqlCommand
        Try
            With Cmd
                'Affectation des paramètres de la variable SqlCommand
                .CommandType = CommandType.Text
                .Connection = ClApplication.Cn
                .CommandText = "UPDATE [dbo].[Responsable] SET [Nom]='" & m_Nom & "', [Prenom]='" & m_Prenom & "' WHERE [Numero_CIN] = '" & m_Numero_CIN & "'"
                'Exécution de la requète Modifier
                If .ExecuteNonQuery <> 0 Then
                    Return True
                End If
            End With
        Catch ex As Exception
            'Traitement de l'erreur
            MsgBox(Err.Description)
            Return False
        Finally
        End Try
    End Function
 
    'Méthode Supprimer
    Public Function Supprimer() As Boolean
        'Déclaration de la variable SqlCommand
        Dim Cmd As SqlCommand = New SqlCommand
        Try
            With Cmd
                'Affectation des paramètres de la variable SqlCommand
                .CommandType = CommandType.Text
                .Connection = ClApplication.Cn
                .CommandText = "DELETE FROM [dbo].[Responsable] WHERE [Numero_CIN] = '" & m_Numero_CIN & "'"
                'Exécution de la requète Supprimer
                If .ExecuteNonQuery <> 0 Then
                    Return True
                End If
            End With
        Catch ex As Exception
            'Traitement de l'erreur
            MsgBox(Err.Description)
            Return False
        Finally
        End Try
    End Function

merci d'avance

**theMonz31** · 05/08/2009, 12h31

salut

tu cherches sous google : Reflector

Tu ouvres ton assembly qui contient ton code avec reflector

tu utilises C# comme langage dans le choix du langage pour afficher le code et la, magie, tu auras ta traduction

Voilà

PS : Evite de donner des dates butoires car on a tendance à s'enerver facilement quand une personne à l'air de demander un truc pour son boulot et qu'elle "met" la pression aux bénévoles prenant sur leur temps pour répondre dans la mesure de leurs connaissances

**loviso** · 05/08/2009, 12h40

Envoyé par theMonz31

salut

tu cherches sous google : Reflector

Tu ouvres ton assembly qui contient ton code avec reflector

tu utilises C# comme langage dans le choix du langage pour afficher le code et la, magie, tu auras ta traduction

Voilà

PS : Evite de donner des dates butoires car on a tendance à s'enerver facilement quand une personne à l'air de demander un truc pour son boulot et qu'elle "met" la pression aux bénévoles prenant sur leur temps pour répondre dans la mesure de leurs connaissances

Non je suis encore étudiant c'est pas pour le boulot mais c'est pour les études merci pour ton aide mais comment faire pour mettre le code pour convertir avec ce reflector?

**sevyc64** · 05/08/2009, 13h31

Ou tu utilise des outils en ligne comme celui de l'autre grosse communauté de développeurs francophone que je ne citerais pas (chaque fois que je la cite ici, mes messages sont supprimés, ce qui n'est pas le cas de l'autre coté, bien au contraire)

Voila le code converti par leur outil, pas testé, le fonctionnement n'est pas garanti :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
             #region MAJ Base

//Méthode Ajouter

public bool Ajouter()

{

  //Déclaration de la variable SqlCommand

  SqlCommand Cmd = new SqlCommand();

  try {

    {

      //Affectation des paramètres de la variable SqlCommand

      Cmd.CommandType = CommandType.Text;

      Cmd.Connection = ClApplication.Cn;

      //Exécution de la requète Ajouter

      Cmd.CommandText = "INSERT INTO [dbo].[Responsable]([Numero_CIN], [Nom], [Prenom]) VALUES ('" + m_Numero_CIN + "', '" + m_Nom + "', '" + m_Prenom + "')";

      if (Cmd.ExecuteNonQuery != 0)

      {

        return true;

      }

    }

  }

  catch (Exception ex) {

    MsgBox(Err.Description);

    return false;

  }

  finally {

  }

}



//Méthode Modifier

public bool Modifier()

{

  //Déclaration de la variable SqlCommand

  SqlCommand Cmd = new SqlCommand();

  try {

    {

      //Affectation des paramètres de la variable SqlCommand

      Cmd.CommandType = CommandType.Text;

      Cmd.Connection = ClApplication.Cn;

      Cmd.CommandText = "UPDATE [dbo].[Responsable] SET [Nom]='" + m_Nom + "', [Prenom]='" + m_Prenom + "' WHERE [Numero_CIN] = '" + m_Numero_CIN + "'";

      //Exécution de la requète Modifier

      if (Cmd.ExecuteNonQuery != 0)

      {

        return true;

      }

    }

  }

  catch (Exception ex) {

    //Traitement de l'erreur

    MsgBox(Err.Description);

    return false;

  }

  finally {

  }

}



//Méthode Supprimer

public bool Supprimer()

{

  //Déclaration de la variable SqlCommand

  SqlCommand Cmd = new SqlCommand();

  try {

    {

      //Affectation des paramètres de la variable SqlCommand

      Cmd.CommandType = CommandType.Text;

      Cmd.Connection = ClApplication.Cn;

      Cmd.CommandText = "DELETE FROM [dbo].[Responsable] WHERE [Numero_CIN] = '" + m_Numero_CIN + "'";

      //Exécution de la requète Supprimer

      if (Cmd.ExecuteNonQuery != 0)

      {

        return true;

      }

    }

  }

  catch (Exception ex) {

    //Traitement de l'erreur

    MsgBox(Err.Description);

    return false;

  }

  finally {

  }

}

**loviso** · 05/08/2009, 14h01

Envoyé par sevyc64

Ou tu utilise des outils en ligne comme celui de l'autre grosse communauté de développeurs francophone que je ne citerais pas (chaque fois que je la cite ici, mes messages sont supprimés, ce qui n'est pas le cas de l'autre coté, bien au contraire)

Voila le code converti par leur outil, pas testé, le fonctionnement n'est pas garanti :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
             #region MAJ Base

//Méthode Ajouter

public bool Ajouter()

{

  //Déclaration de la variable SqlCommand

  SqlCommand Cmd = new SqlCommand();

  try {

    {

      //Affectation des paramètres de la variable SqlCommand

      Cmd.CommandType = CommandType.Text;

      Cmd.Connection = ClApplication.Cn;

      //Exécution de la requète Ajouter

      Cmd.CommandText = "INSERT INTO [dbo].[Responsable]([Numero_CIN], [Nom], [Prenom]) VALUES ('" + m_Numero_CIN + "', '" + m_Nom + "', '" + m_Prenom + "')";

      if (Cmd.ExecuteNonQuery != 0)

      {

        return true;

      }

    }

  }

  catch (Exception ex) {

    MsgBox(Err.Description);

    return false;

  }

  finally {

  }

}



//Méthode Modifier

public bool Modifier()

{

  //Déclaration de la variable SqlCommand

  SqlCommand Cmd = new SqlCommand();

  try {

    {

      //Affectation des paramètres de la variable SqlCommand

      Cmd.CommandType = CommandType.Text;

      Cmd.Connection = ClApplication.Cn;

      Cmd.CommandText = "UPDATE [dbo].[Responsable] SET [Nom]='" + m_Nom + "', [Prenom]='" + m_Prenom + "' WHERE [Numero_CIN] = '" + m_Numero_CIN + "'";

      //Exécution de la requète Modifier

      if (Cmd.ExecuteNonQuery != 0)

      {

        return true;

      }

    }

  }

  catch (Exception ex) {

    //Traitement de l'erreur

    MsgBox(Err.Description);

    return false;

  }

  finally {

  }

}



//Méthode Supprimer

public bool Supprimer()

{

  //Déclaration de la variable SqlCommand

  SqlCommand Cmd = new SqlCommand();

  try {

    {

      //Affectation des paramètres de la variable SqlCommand

      Cmd.CommandType = CommandType.Text;

      Cmd.Connection = ClApplication.Cn;

      Cmd.CommandText = "DELETE FROM [dbo].[Responsable] WHERE [Numero_CIN] = '" + m_Numero_CIN + "'";

      //Exécution de la requète Supprimer

      if (Cmd.ExecuteNonQuery != 0)

      {

        return true;

      }

    }

  }

  catch (Exception ex) {

    //Traitement de l'erreur

    MsgBox(Err.Description);

    return false;

  }

  finally {

  }

}

Merci bien mais est ce que tu peut m'aider de convertir ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
 
Imports System.Data.SqlClient
 
Public Class ClApplication
 
    'Déclaration de la connexion
    Public Shared Cn As New SqlClient.SqlConnection
 
    'Fonction de la connexion
    Public Shared Function ConnectionStr() As Boolean
        Try
            'Traitement de la connexion
            'Récupération de la chainne de connexion à partir du app.config
            Cn.ConnectionString = Configuration.ConfigurationSettings.AppSettings("ConnexionString")
            'Ouverture de la connexion
            Cn.Open()
            'Réussite de connexion
            Return True
        Catch ex As Exception
            'Traitement de l'erreur
            'Echec de connexion
            MsgBox(Err.Description)
            Return False
        Finally
        End Try
    End Function
 
End Class

**Guulh** · 05/08/2009, 14h43

C'est une question qui revient souvent, et comme toutes les questions qui reviennent souvent, elle a sa solution dans les dix premières pages de google

http://www.google.fr/search?hl=fr&q=...ur+vb.net+c%23

**Bluedeep** · 05/08/2009, 13h38

Envoyé par loviso

Non je suis encore étudiant c'est pas pour le boulot mais c'est pour les études merci pour ton aide mais comment faire pour mettre le code pour convertir avec ce reflector?

Ben, tu télécharge Reflector et .... RTFM bordel !!!!!

Convertir un code de vb.net à c#

C#

Vue hybride

Discussions similaires

Partager

Partager