Convertir un code de vb.net à c#

Version imprimable

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:

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

05/08/2009, 12h31
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 :)
05/08/2009, 12h40
loviso

Citation:

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?

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:

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 {

  }

}

05/08/2009, 13h38
Bluedeep

Citation:

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 !!!!!

Citation:

Envoyé par sevyc64

Code:

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:

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

05/08/2009, 14h43
Guulh

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
05/08/2009, 14h46
Bluedeep

Citation:

Envoyé par Guulh

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

Sauf que à lire ses interventions, on a l'impression qu'il attend que l'on fasse le boulot à sa place : apparemment, on lui a indiqué Reflector et il n'essaye pas de s'en servir.
05/08/2009, 15h39
Kaidan

C'est tellement plus simple 8-)
05/08/2009, 16h21
loviso

Citation:

Envoyé par Bluedeep

Sauf que à lire ses interventions, on a l'impression qu'il attend que l'on fasse le boulot à sa place : apparemment, on lui a indiqué Reflector et il n'essaye pas de s'en servir.

1°/ J'ai t'ai pas demandé de faire le boulot à ma place, j'ai dit que je suis un étudiant et je n'ai jamais travailler( ou étudier) avec c# j'ai demandé simplement de l'aide,j'ai effectué le travaille avec vb.net et j'ai simplement demandé l'aide

2°/ Nul ne t'as obligé de me répondre ou de m'aider ,absente toi prochainement je besoins plus de ton aide
06/08/2009, 08h05
gouroupasdebol

Regarde les tutos !
Y a rien de bien compliqué dans ce que tu demandes, faut juste connaître les bases.

PS : le français est ton ami, donc prends soin de lui. :roll:
PS2 : le français n'est pas mon ami. :aie: