IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

ASP.NET Discussion :

C# et vb.net


Sujet :

ASP.NET

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Inscrit en
    Juillet 2006
    Messages
    189
    Détails du profil
    Informations forums :
    Inscription : Juillet 2006
    Messages : 189
    Par défaut C# et vb.net
    bonjour je suis debutant en vb.net et C# et j'ai trouvé ce bout de code que je veux utiliser mais je ne comprend rien en vb.netalors est ce que quelqu'un peut le traduir en 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
    Private Sub dg_ItemCommand(ByVal source As Object, ByVal e As DataGridCommandEventArgs) _
                Handles dg.ItemCommand
          If e.CommandName = "DelBatch" Then
                 Dim oItem As DataGridItem
                 Dim sKeys As New ArrayList
                 For Each oItem In dg.Items
                       If CType(oItem.FindControl("chkDel"), CheckBox).Checked Then
                             sKeys.Add(dg.DataKeys(oItem.ItemIndex).ToString)
                       End If
                 Next
                 If sKeys.Count <> 0 Then DelItems(sKeys)
           End If
    End If
     
    Private Sub DelItems(ByVal sKeys As ArrayList)
           Dim sKey As String
           Dim sSQL As String = "Delete * From Humains Where "
           For Each sKey In sKeys
                 sSQL &= String.Format("IDHumain={0} OR ", sKey)
           Next
           sSQL = sSQL.Substring(0, sSQL.Length - 4)
           Dim oConn As New OleDb.OleDbConnection("le ConnectionString") 
           Dim oComm As New OleDb.OleDbCommand(sSQL, oConn) 
           Try
                oConn.Open() 
                oComm.ExecuteNonQuery() 
                dg.EditItemIndex = -1 
           Catch ex As Exception
           Finally 
                oComm.Dispose()
                oConn.Close() 
                dg.CurrentPageIndex = 0
           End Try
           BindData()
    End Sub
    merci beaucoup

  2. #2
    Rédacteur
    Avatar de SaumonAgile
    Homme Profil pro
    Team leader
    Inscrit en
    Avril 2007
    Messages
    4 028
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Moselle (Lorraine)

    Informations professionnelles :
    Activité : Team leader
    Secteur : Conseil

    Informations forums :
    Inscription : Avril 2007
    Messages : 4 028
    Par défaut
    Tu as des demandes pour le moins étranges...
    Recherche sur google, il existe des traducteurs.
    Besoin d'un MessageBox amélioré ? InformationBox pour .NET 1.1, 2.0, 3.0, 3.5, 4.0 sous license Apache 2.0.

    Bonnes pratiques pour les accès aux données
    Débogage efficace en .NET
    LINQ to Objects : l'envers du décor

    Mon profil LinkedIn - MCT - MCPD WinForms - MCTS Applications Distribuées - MCTS WCF - MCTS WCF 4.0 - MCTS SQL Server 2008, Database Development - Mon blog - Twitter

  3. #3
    Membre chevronné
    Profil pro
    Inscrit en
    Mars 2004
    Messages
    581
    Détails du profil
    Informations personnelles :
    Âge : 43
    Localisation : Belgique

    Informations forums :
    Inscription : Mars 2004
    Messages : 581
    Par défaut
    tu veux qu'on te traduise ton code source
    mouai je pense que parfois il y a des demandes très étranges sur ce forum.

    Les events normalement sont plus ou moins les meme, le if else aussi (pas de then en c#) le foreach est en un mot.

    Il n'y a pas de end et de next en c#
    Et bien sur en c# il y a des ;

    Fix

  4. #4
    Membre éclairé Avatar de Asiany
    Profil pro
    Inscrit en
    Septembre 2006
    Messages
    73
    Détails du profil
    Informations personnelles :
    Âge : 37
    Localisation : France

    Informations forums :
    Inscription : Septembre 2006
    Messages : 73

  5. #5
    Membre confirmé
    Inscrit en
    Juillet 2006
    Messages
    189
    Détails du profil
    Informations forums :
    Inscription : Juillet 2006
    Messages : 189
    Par défaut
    OK pour le deuxieme code c'est bon mais pour le premier code il a dit qu'il y a une erreur
    est ce que quelqu'un peut me dire c'est quoi l'erreur
    An error occured while processing your code: -- line 3 col 1: invalid StructureMemberDecl
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    Private Sub dg_ItemCommand(ByVal source As Object, ByVal e As DataGridCommandEventArgs) _
                Handles dg.ItemCommand
          If e.CommandName = "DelBatch" Then
                 Dim oItem As DataGridItem
                 Dim sKeys As New ArrayList
                 For Each oItem In dg.Items
                       If CType(oItem.FindControl("chkDel"), CheckBox).Checked Then
                             sKeys.Add(dg.DataKeys(oItem.ItemIndex).ToString)
                       End If
                 Next
                 If sKeys.Count <> 0 Then DelItems(sKeys)
           End If
    End If
    merci

  6. #6
    Membre éclairé Avatar de Asiany
    Profil pro
    Inscrit en
    Septembre 2006
    Messages
    73
    Détails du profil
    Informations personnelles :
    Âge : 37
    Localisation : France

    Informations forums :
    Inscription : Septembre 2006
    Messages : 73
    Par défaut
    End Sub..

  7. #7
    Membre confirmé
    Inscrit en
    Juillet 2006
    Messages
    189
    Détails du profil
    Informations forums :
    Inscription : Juillet 2006
    Messages : 189
    Par défaut
    ok merci ca marche la traduction mais en utilisant le code obtenu j'ai cet errereur

    System.Web.UI.WebControls.BaseDataList.DataKeys' denotes a 'property' where a 'method' was expected
    qu'est ce que je doit corriger dans le code
    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
    private void dg_ItemCommand(object source, DataGridCommandEventArgs e) 
    { 
     if (e.CommandName == "DelBatch") { 
       DataGridItem oItem; 
       ArrayList sKeys = new ArrayList(); 
       foreach (int oItem in dg.Items) { 
         if (((CheckBox)(oItem.FindControl("chkDel"))).Checked) { 
           sKeys.Add(dg.DataKeys(oItem.ItemIndex).ToString); 
         } 
       } 
       if (sKeys.Count != 0) { 
         DelItems(sKeys); 
       } 
     } 
    }
    merci

Discussions similaires

  1. [Débat] Technologie .NET vs JAVA
    Par neo.51 dans le forum Débats sur le développement - Le Best Of
    Réponses: 1047
    Dernier message: 14/01/2019, 16h15
  2. [Débat] Expériences au sujet de .NET
    Par DevX dans le forum Débats sur le développement - Le Best Of
    Réponses: 46
    Dernier message: 25/05/2014, 11h16
  3. A ceux qui ont migré de VB6 vers VB.Net
    Par Fox dans le forum VB 6 et antérieur
    Réponses: 81
    Dernier message: 21/05/2008, 14h56
  4. utiliser les tag [MFC] [Win32] [.NET] [C++/CLI]
    Par hiko-seijuro dans le forum Visual C++
    Réponses: 8
    Dernier message: 08/06/2005, 15h57
  5. Fichier PDOXUSRS.NET
    Par yannick dans le forum Paradox
    Réponses: 5
    Dernier message: 05/04/2002, 09h45

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo