issue when converting C#.net code into vb.net

Collapse
This topic is closed.
X
X
Collapse
 
  • Page of 1
  • Time
  • Show
Clear All
new posts
Previous template Next
  • Dhananjay
    #1

    issue when converting C#.net code into vb.net

    Hi All,

    I am facing problem when i am converting C#.net code(Delegate concept)
    into vb.net. I am unable to do that . Can someone help me to solve the
    problem. I am providing my C#.net code.

    =============== =============== ====my code is :-
    =============== =============== ========
    [DataObjectMetho d(DataObjectMet hodType.Select, false)]
    static public List<Membership UserWrapperGetM embers(bool
    returnAllApprov edUsers, bool returnAllNotApp rovedUsers,
    string usernameToFind, string sortData)
    {

    List<Membership UserWrappermemb erList = new
    List<Membership UserWrapper>();

    // See if we are looking for just one user
    if (usernameToFind != null)
    {
    MembershipUser mu =
    Membership.GetU ser(usernameToF ind);
    if (mu != null)
    {
    MembershipUserW rapper md = new
    MembershipUserW rapper(mu);
    memberList.Add( md);
    }
    }
    else
    {
    MembershipUserC ollection muc =
    Membership.GetA llUsers();
    foreach (MembershipUser mu in muc)
    {
    if ((returnAllAppr ovedUsers == true &&
    mu.IsApproved == true) ||
    (returnAllNotAp provedUsers == true &&
    mu.IsApproved == false))
    {
    MembershipUserW rapper md = new
    MembershipUserW rapper(mu);
    memberList.Add( md);
    }
    }

    if (sortData == null)
    {
    sortData = "UserName";
    }
    if (sortData.Lengt h == 0)
    {
    sortData = "UserName";
    }


    string sortDataBase = sortData;
    string descString = " DESC";
    if (sortData.EndsW ith(descString) )
    {
    sortDataBase = sortData.Substr ing(0,
    sortData.Length - descString.Leng th);
    }

    Comparison<Memb ershipUserWrapp ercomparison = null;

    switch (sortDataBase)
    {
    case "UserName":
    comparison = new
    Comparison<Memb ershipUserWrapp er>(
    delegate(Member shipUserWrapper lhs,
    MembershipUserW rapper rhs)
    {
    return
    lhs.UserName.Co mpareTo(rhs.Use rName);
    }
    );
    break;
    case "Email":
    comparison = new
    Comparison<Memb ershipUserWrapp er>(
    delegate(Member shipUserWrapper lhs,
    MembershipUserW rapper rhs)
    {
    if (lhs.Email == null | rhs.Email ==
    null)
    {
    return 0;
    }
    else
    {
    return
    lhs.Email.Compa reTo(rhs.Email) ;
    }
    }
    );
    break;
    case "CreationDa te":
    comparison = new
    Comparison<Memb ershipUserWrapp er>(
    delegate(Member shipUserWrapper lhs,
    MembershipUserW rapper rhs)
    {
    return
    lhs.CreationDat e.CompareTo(rhs .CreationDate);
    }
    );
    break;
    case "IsApproved ":
    comparison = new
    Comparison<Memb ershipUserWrapp er>(
    delegate(Member shipUserWrapper lhs,
    MembershipUserW rapper rhs)
    {
    return
    lhs.IsApproved. CompareTo(rhs.I sApproved);
    }
    );
    break;
    case "IsOnline":
    comparison = new
    Comparison<Memb ershipUserWrapp er>(
    delegate(Member shipUserWrapper lhs,
    MembershipUserW rapper rhs)
    {
    return
    lhs.IsOnline.Co mpareTo(rhs.IsO nline);
    }
    );
    break;
    case "LastLoginDate" :
    comparison = new
    Comparison<Memb ershipUserWrapp er>(
    delegate(Member shipUserWrapper lhs,
    MembershipUserW rapper rhs)
    {
    return
    lhs.LastLoginDa te.CompareTo(rh s.LastLoginDate );
    }
    );
    break;
    default:
    comparison = new
    Comparison<Memb ershipUserWrapp er>(
    delegate(Member shipUserWrapper lhs,
    MembershipUserW rapper rhs)
    {
    return
    lhs.UserName.Co mpareTo(rhs.Use rName);
    }
    );
    break;
    }

    if (sortData.EndsW ith("DESC"))
    {
    memberList.Sort (comparison);
    memberList.Reve rse();
    }
    else
    {
    memberList.Sort (comparison);
    }

    }

    return memberList;

    }
    =============== =============== ======C#.net code
    end============ =============== =======

    now i want this part of code into vb.net code , can some one please
    provide me the solution.
    I had tried writing myself C#.net code into vb.net code but unable to
    acheive correct vb.net code.I had used some conversion tool also from
    developer fusion site but it is showing error that is some different
    kind of error.Please provide me the vb.net code.
    it's urgent

    Thanks in advance
    Dhananjay
    Tags: None
    • PhilTheGap
      #2
      Re: issue when converting C#.net code into vb.net

      Hi Dhananjay,

      you can try with Lutz Rioeder's Reflector. Download this tool, compile your
      code to produce a DLL, load it into Reflector then export it with VB...

      Philippe

        Comment

        • PhilTheGap
          #3
          Re: issue when converting C#.net code into vb.net

          Hi Dhananjay,

          "Dhananjay" <dhananjay_3k@y ahoo.co.ina écrit dans le message de
          news:9ae069a6-be5c-49b1-9b44-3b00bb65549a@d2 1g2000prf.googl egroups.com...
          On Jan 29, 7:28 pm, "PhilTheGap " <ori...@noemail .noemailwrote:
          >
          HI Philippe,
          >
          Thanks a lot for reply.
          Here in i am providing my both code files , can you please see where
          is the problem. I have tried to correct it but it was not
          successful.can you please provide me correct complete code. The
          problem is same which i mentioned you. It gives error on Anonymous
          method(i.e; Delegate concept).In the last reply you told me to change
          the signature of method.problem lies in MembershipUserO DS file.
          Nope ! I didn't send you this message...
          please have a look and try to correct the code.Thanks in advance.
          Sorry but I don't have the time for your request. Ask a MVP !

          Best regards

            Comment

            Previous template Next
            Working...