Click here to Skip to main content
15,868,016 members
Articles / Web Development / ASP.NET

Implementing Model-View-Presenter in ASP.NET

Rate me:
Please Sign up or sign in to vote.
4.80/5 (27 votes)
17 Nov 2007CPOL12 min read 129.2K   2.7K   120  
Three implementations of Model-View-Presenter in ASP.NET 2.0.
<%@ Page Language="C#"%>
<%@ Import namespace="SubSonic.Utilities"%>
<%@ Import Namespace="SubSonic" %>
<%@ Import Namespace="SubSonic.CodeGenerator" %>
<%@ Import Namespace="System.Data" %>

<%
	string providerName = "#PROVIDER#";
	ICodeLanguage language = new VBCodeLanguage();
	DataProvider provider = DataService.GetInstance(providerName);
    System.Collections.Generic.List<StoredProcedure> spList = DataService.GetSPSchemaCollection(providerName);
	ArrayList classStoredProcedures = new ArrayList();
	
%>

Namespace <%=provider.GeneratedNamespace %>
    Public Partial Class <%=provider.SPClassName%>
        <%foreach (StoredProcedure sp in spList)
{
    if(Utility.IsMatch(sp.TableName, provider.SPClassName))
    {
        //load up a the params
        string argList = string.Empty;
        bool isFirst = true;
        foreach(StoredProcedure.Parameter p in sp.Parameters)
        {
            if(!isFirst)
            {
                argList += ", ";
            }
            isFirst = false;
			// allow nullable types for SP parms - Thanks Jeff!
			string pType = Utility.GetVariableType(p.DBType, Utility.IsNullableDbType(p.DBType) , language);
            string arg = p.DisplayName;
			argList += "ByVal " + arg + " As " + pType;
        }
              %>
        ''' <summary>
        ''' Creates an object wrapper for the <%=sp.Name %> Procedure
        ''' </summary>
        Public Shared Function <%=sp.DisplayName%>(<%=argList %>) As StoredProcedure 
            Dim sp As New SubSonic.StoredProcedure("<%=sp.Name%>" , DataService.GetInstance("<%= providerName %>"))
            <%foreach (StoredProcedure.Parameter p in sp.Parameters) {%>
        	    <%if (p.Mode == ParameterDirection.InputOutput) { %>
            sp.Command.AddOutputParameter("<%=p.QueryParameter %>",DbType.<%=Enum.GetName(typeof(DbType), p.DBType)%>)
        	    <%} else { %>
            sp.Command.AddParameter("<%=p.QueryParameter%>", <%=p.DisplayName%>,DbType.<%=Enum.GetName(typeof(DbType), p.DBType)%>)
        	    <%} %>
            <%} %>
            Return sp
        End Function
        <%    }
			  else
			  {
				  classStoredProcedures.Add(sp);
			  }
		  }%>
    End Class
        <%
			foreach (StoredProcedure sp in classStoredProcedures)
			{
				string className = sp.TableName;
				TableSchema.Table tbl = DataService.GetTableSchema(sp.TableName, provider.Name, TableType.Table);
				if (tbl != null)
				{
					className = tbl.ClassName;
				}
				string argList = string.Empty;
				bool isFirst = true;
				foreach (StoredProcedure.Parameter p in sp.Parameters)
				{
					if (!isFirst)
					{
						argList += ", ";
					}
					isFirst = false;
					// allow nullable types for SP parms - Thanks Jeff!
					string pType = Utility.GetVariableType(p.DBType, Utility.IsNullableDbType(p.DBType), language);
					string arg = p.DisplayName;
					argList += "ByVal " + arg + " As " + pType;
				}
%>
	Public Partial Class <%= className%>
        ''' <summary>
        ''' Creates an object wrapper for the <%=sp.Name%> Procedure
        ''' </summary>
        Public Shared Function <%=sp.DisplayName%>(<%=argList%>) As StoredProcedure 
            Dim sp As New SubSonic.StoredProcedure("<%=sp.Name%>" , DataService.GetInstance("<%= providerName %>"))
            <%foreach (StoredProcedure.Parameter p in sp.Parameters)
			  {%>
        	    <%if (p.Mode == ParameterDirection.InputOutput)
			   { %>
            sp.Command.AddOutputParameter("<%=p.QueryParameter%>",DbType.<%=Enum.GetName(typeof(DbType), p.DBType)%>)
        	    <%}
			   else
			   { %>
            sp.Command.AddParameter("<%=p.QueryParameter%>", <%=p.DisplayName%>,DbType.<%=Enum.GetName(typeof(DbType), p.DBType)%>)
        	    <%} %>
            <%} %>
            Return sp
        End Function
    End Class
        		<%
			}
%>
End Namespace

By viewing downloads associated with this article you agree to the Terms of Service and the article's licence.

If a file you wish to view isn't highlighted, and is a text file (not binary), please let us know and we'll add colourisation support for it.

License

This article, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)


Written By
Web Developer
United States United States
This member has not yet provided a Biography. Assume it's interesting and varied, and probably something to do with programming.

Comments and Discussions