diff --git a/src/AddIns/BackendBindings/AspNet.Mvc/Project/AspNet.Mvc.csproj b/src/AddIns/BackendBindings/AspNet.Mvc/Project/AspNet.Mvc.csproj index 886ea21afe..c8d8ba9be0 100644 --- a/src/AddIns/BackendBindings/AspNet.Mvc/Project/AspNet.Mvc.csproj +++ b/src/AddIns/BackendBindings/AspNet.Mvc/Project/AspNet.Mvc.csproj @@ -252,6 +252,9 @@ Always + + Always + Always @@ -260,6 +263,9 @@ Always + + Always + Always diff --git a/src/AddIns/BackendBindings/AspNet.Mvc/Project/ItemTemplates/VisualBasic/CodeTemplates/AddView/AspxVisualBasic/Details.tt b/src/AddIns/BackendBindings/AspNet.Mvc/Project/ItemTemplates/VisualBasic/CodeTemplates/AddView/AspxVisualBasic/Details.tt new file mode 100644 index 0000000000..9ad3eaea07 --- /dev/null +++ b/src/AddIns/BackendBindings/AspNet.Mvc/Project/ItemTemplates/VisualBasic/CodeTemplates/AddView/AspxVisualBasic/Details.tt @@ -0,0 +1,66 @@ +<#@ template language="VB" HostSpecific="true" #> +<#@ import namespace="ICSharpCode.AspNet.Mvc" #> +<#@ import namespace="Microsoft.VisualBasic.Constants" #> +<# If MvcHost.IsPartialView Then #> +<%@ Control Language="VB" Inherits="System.Web.Mvc.ViewUserControl<#= GetViewPageType() #>" %> + +<# ElseIf MvcHost.IsContentPage Then #> +<%@ Page Language="VB" MasterPageFile="<#= MvcHost.MasterPageFile #>" Inherits="System.Web.Mvc.ViewPage<#= GetViewPageType() #>" %> + + +<#= MvcHost.ViewName #> + + + +<# + PushIndent(vbTab) + Else +#> +<%@ Page Language="VB" Inherits="System.Web.Mvc.ViewPage<#= GetViewPageType() #>" %> + + + + + <#= MvcHost.ViewName #> + + +<# + PushIndent(vbTab & vbTab) + End If +#> +
+ <#= MvcHost.ViewDataType.Name #> +
+

+ <%: Html.ActionLink("Edit", "Edit") %> | + <%: Html.ActionLink("Back", "Index") %> +

+<# + If MvcHost.IsPartialView Then + ' Do nothing. + ElseIf MvcHost.IsContentPage Then + PopIndent() +#> + +<# + Else + PopIndent() +#> + + +<# End If #> +<#+ + ReadOnly Property MvcHost As MvcTextTemplateHost + Get + Return DirectCast(Host, MvcTextTemplateHost) + End Get + End Property + + Public Function GetViewPageType() As String + Dim viewDataTypeName As String = MvcHost.ViewDataTypeName + If Not String.IsNullOrEmpty(viewDataTypeName) Then + Return String.Format("(Of {0})", viewDataTypeName) + End If + Return String.Empty + End Function +#> \ No newline at end of file diff --git a/src/AddIns/BackendBindings/AspNet.Mvc/Project/ItemTemplates/VisualBasic/CodeTemplates/AddView/VBHTML/Details.tt b/src/AddIns/BackendBindings/AspNet.Mvc/Project/ItemTemplates/VisualBasic/CodeTemplates/AddView/VBHTML/Details.tt new file mode 100644 index 0000000000..e02b2860f5 --- /dev/null +++ b/src/AddIns/BackendBindings/AspNet.Mvc/Project/ItemTemplates/VisualBasic/CodeTemplates/AddView/VBHTML/Details.tt @@ -0,0 +1,62 @@ +<#@ template language="VB" HostSpecific="true" #> +<#@ import namespace="ICSharpCode.AspNet.Mvc" #> +<#@ import namespace="Microsoft.VisualBasic.Constants" #> +<#@ output extension=".vbhtml" #> +<#= GetModelDirective() #> + +<# + If MvcHost.IsPartialView Then + ' Do nothing. + ElseIf MvcHost.IsContentPage Then +#> +@Code + ViewData("Title") = "<#= MvcHost.ViewName #>" + Layout = "<#= MvcHost.MasterPageFile #>" +End Code + +

<#= MvcHost.ViewName #>

+ +<# + Else +#> + + + + <#= MvcHost.ViewName #> + + +<# + PushIndent(vbTab & vbTab) + End If +#> +
+ <#= MvcHost.ViewDataType.Name #> +
+

+ @Html.ActionLink("Edit", "Edit") | + @Html.ActionLink("Back", "Index") +

+<# + If MvcHost.IsPartialView Then + ' Do nothing. + ElseIf Not MvcHost.IsContentPage Then + PopIndent() +#> + + +<# End If #> +<#+ + ReadOnly Property MvcHost As MvcTextTemplateHost + Get + Return DirectCast(Host, MvcTextTemplateHost) + End Get + End Property + + Function GetModelDirective() As String + Dim viewDataTypeName As String = MvcHost.ViewDataTypeName + If Not String.IsNullOrEmpty(viewDataTypeName) Then + Return String.Format("@ModelType {0}", viewDataTypeName) + End If + Return String.Empty + End Function +#> \ No newline at end of file