Solved

Translate to C# from vb

Posted on 2009-07-12
3
255 Views
Last Modified: 2012-06-21
How can i translate the following Class from ASP Classic vb to a C#.net Class

I am just learning C# translating between languages is beyond my capabilities at the moment i have no knowledge of VB

Thank you
Class ASPObjects
 

    'returns Request object variables

    'QType here represents a collection

    '   (QueryString, Form or <A class=iAs style="FONT-WEIGHT: normal; FONT-SIZE: 100%; PADDING-BOTTOM: 1px; COLOR: darkgreen; BORDER-BOTTOM: darkgreen 0.07em solid; BACKGROUND-COLOR: transparent; TEXT-DECORATION: underline" href="#" target=_blank itxtdid="3809288">Server</A>(ServerVariables))

    Public Function GetRequestVariable(ByVal Key, ByVal QType)

        Select Case lcase(QType)

            Case "session"

                GetRequestVariable = CStr(session(Key))

            Case "querystring"

                GetRequestVariable = CStr(Request.QueryString(Key).Item)

            Case "form"

                GetRequestVariable = CStr(Request.Form(Key).Item)

            Case "server"

                GetRequestVariable = CStr(Request.ServerVariables(Key).Item)

            Case Else

                GetRequestVariable = CStr(Request(Key).Item)

        End Select

    End Function
 

    'returns Session object variables

    Public Function GetSessionVariable(ByVal Key)

        GetSessionVariable = Session(Key)

    End Function
 

    'sets Session object variable

    Public Function SetSessionVariable(ByVal Key, ByVal Value)

        Session(Key) = Value

        SetSessionVariable = ""

    End Function
 

    Public Function encodeURL(ByVal p_string)

        encodeURL = server.urlencode(p_string)

    End Function
 

End Class

Open in new window

0
Comment
Question by:QuinnDester
  • 3
3 Comments
 
LVL 15

Accepted Solution

by:
jinal earned 500 total points
ID: 24833882

public class ASPObjects

{

    static ASPObjects()

    {

        //

        // TODO: Add constructor logic here

        //

    }
 

    public static string GetRequestVariable(string key, string Qtype)

    {

        string returnVariable = string.Empty;

        switch (Qtype.ToLower())

        {

            case "session":

                returnVariable = HttpContext.Current.Session[key].ToString();

                break;

            case "querystring":

                returnVariable = HttpContext.Current.Request.QueryString[key];

                break;

            case "form":

                returnVariable = HttpContext.Current.Request.Form[key];

                break;

            case "server":

                returnVariable = HttpContext.Current.Request.ServerVariables[key];

                break;

            default:

                returnVariable = HttpContext.Current.Request[key];

                break;

        }

        return returnVariable;

    }
 

    public static string EncodeUrl(string p_string)

    {

        return HttpUtility.UrlEncode(p_string);

    }
 

    public static string GetSessionVariable(string key)

    {

        if (HttpContext.Current.Session[key] != null)

        {

            return HttpContext.Current.Session[key].ToString();

        }

        else

        {

            return "";

        }

    }
 

    public static void SetSessionVariable(string key, object value)

    {

        HttpContext.Current.Session[key] = value;

    }

}

Open in new window

0
 
LVL 15

Assisted Solution

by:jinal
jinal earned 500 total points
ID: 24833887
Hello ,

You can use above class as simple

string  encodeURL = ASPObjects.EncodeUrl("http://www.expert-exchange.com");

I created static class for that. You want to go like

ASPObjects obj = new ASPObjects();
obj.EncdoeUrl("");
then use attached class with this comment.

using System;

using System.Collections.Generic;

using System.Web;
 

/// <summary>

/// Summary description for Class1

/// </summary>

public class ASPObjects

{

    public ASPObjects()

    {

        //

        // TODO: Add constructor logic here

        //

    }
 

    public string GetRequestVariable(string key, string Qtype)

    {

        string returnVariable = string.Empty;

        switch (Qtype.ToLower())

        {

            case "session":

                returnVariable = HttpContext.Current.Session[key].ToString();

                break;

            case "querystring":

                returnVariable = HttpContext.Current.Request.QueryString[key];

                break;

            case "form":

                returnVariable = HttpContext.Current.Request.Form[key];

                break;

            case "server":

                returnVariable = HttpContext.Current.Request.ServerVariables[key];

                break;

            default:

                returnVariable = HttpContext.Current.Request[key];

                break;

        }

        return returnVariable;

    }
 

    public string EncodeUrl(string p_string)

    {

        return HttpUtility.UrlEncode(p_string);

    }
 

    public string GetSessionVariable(string key)

    {

        if (HttpContext.Current.Session[key] != null)

        {

            return HttpContext.Current.Session[key].ToString();

        }

        else

        {

            return "";

        }

    }
 

    public void SetSessionVariable(string key, object value)

    {

        HttpContext.Current.Session[key] = value;

    }

}

Open in new window

0
 
LVL 15

Assisted Solution

by:jinal
jinal earned 500 total points
ID: 24833892
Hello,

This is code file.

ASPOjects.cs.txt
0

Featured Post

Free Trending Threat Insights Every Day

Enhance your security with threat intelligence from the web. Get trending threat insights on hackers, exploits, and suspicious IP addresses delivered to your inbox with our free Cyber Daily.

Join & Write a Comment

This article describes some techniques which will make your VBA or Visual Basic Classic code easier to understand and maintain, whether by you, your replacement, or another Experts-Exchange expert.
It was really hard time for me to get the understanding of Delegates in C#. I went through many websites and articles but I found them very clumsy. After going through those sites, I noted down the points in a easy way so here I am sharing that unde…
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…

758 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

20 Experts available now in Live!

Get 1:1 Help Now