thooge
/
OpenAntrag
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Compare commits

merge into: thooge:master
Branches Tags
thooge:master
thooge:raven4
...
pull from: thooge:raven4
Branches Tags
thooge:master
thooge:raven4

1 Commits
master ... raven4

Author SHA1 Message Date
thooge 16799b912a Erste lauffähige Variante, noch mit RavenDB 2.5
6 years ago
18 changed files with 532 additions and 888 deletions
Show all changes Ignore whitespace when comparing lines Ignore changes in amount of whitespace Ignore changes in whitespace at EOL
Show Stats
  1. 1097
      OpenAntrag/App_Data/piratenmandate.xml
  2. 8
      OpenAntrag/My Project/Application.Designer.vb
  3. 26
      OpenAntrag/My Project/Resources.Designer.vb
  4. 14
      OpenAntrag/My Project/Settings.Designer.vb
  5. 81
      OpenAntrag/OpenAntrag.vbproj
  6. 10
      OpenAntrag/Views/Web.config
  7. 17
      OpenAntragLib/Attributes/HandleCustomErrorAttribute.vb
  8. 30
      OpenAntragLib/Controller/CommonController.vb
  9. 11
      OpenAntragLib/Helper/MarkdownHelper.vb
  10. 6
      OpenAntragLib/Helper/PartialHelper.vb
  11. 9
      OpenAntragLib/Models/Proposal/Proposals.vb
  12. 7
      OpenAntragLib/Models/Representation/RepresentationSetting.vb
  13. 13
      OpenAntragLib/Models/Representation/piratenmandate.vb
  14. 8
      OpenAntragLib/My Project/Application.Designer.vb
  15. 26
      OpenAntragLib/My Project/Resources.Designer.vb
  16. 14
      OpenAntragLib/My Project/Settings.Designer.vb
  17. 12
      OpenAntragLib/OpenAntragLib.vbproj
  18. 31
      OpenAntragLib/app.config

1097
OpenAntrag/App_Data/piratenmandate.xml
View File

File diff suppressed because it is too large Load Diff

8
OpenAntrag/My Project/Application.Designer.vb generated
Unescape View File

@ -1,10 +1,10 @@
'------------------------------------------------------------------------------
' <auto-generated>
' This code was generated by a tool.
' Runtime Version:4.0.30319.18444
' Dieser Code wurde von einem Tool generiert.
' Laufzeitversion:4.0.30319.42000
'
' Changes to this file may cause incorrect behavior and will be lost if
' the code is regenerated.
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
' der Code erneut generiert wird.
' </auto-generated>
'------------------------------------------------------------------------------

26
OpenAntrag/My Project/Resources.Designer.vb generated
Unescape View File

@ -1,10 +1,10 @@
'------------------------------------------------------------------------------
' <auto-generated>
' This code was generated by a tool.
' Runtime Version:4.0.30319.18444
' Dieser Code wurde von einem Tool generiert.
' Laufzeitversion:4.0.30319.42000
'
' Changes to this file may cause incorrect behavior and will be lost if
' the code is regenerated.
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
' der Code erneut generiert wird.
' </auto-generated>
'------------------------------------------------------------------------------
@ -15,14 +15,14 @@ Imports System
Namespace My.Resources
'This class was auto-generated by the StronglyTypedResourceBuilder
'class via a tool like ResGen or Visual Studio.
'To add or remove a member, edit your .ResX file then rerun ResGen
'with the /str option, or rebuild your VS project.
'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
'-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
'''<summary>
''' A strongly-typed resource class, for looking up localized strings, etc.
''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
'''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"), _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "15.0.0.0"), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
@ -33,7 +33,7 @@ Namespace My.Resources
Private resourceCulture As Global.System.Globalization.CultureInfo
'''<summary>
''' Returns the cached ResourceManager instance used by this class.
''' Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
'''</summary>
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
@ -47,8 +47,8 @@ Namespace My.Resources
End Property
'''<summary>
''' Overrides the current thread's CurrentUICulture property for all
''' resource lookups using this strongly typed resource class.
''' Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
''' Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
'''</summary>
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Friend Property Culture() As Global.System.Globalization.CultureInfo

14
OpenAntrag/My Project/Settings.Designer.vb generated
Unescape View File

@ -1,10 +1,10 @@
'------------------------------------------------------------------------------
' <auto-generated>
' This code was generated by a tool.
' Runtime Version:4.0.30319.18444
' Dieser Code wurde von einem Tool generiert.
' Laufzeitversion:4.0.30319.42000
'
' Changes to this file may cause incorrect behavior and will be lost if
' the code is regenerated.
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
' der Code erneut generiert wird.
' </auto-generated>
'------------------------------------------------------------------------------
@ -15,21 +15,21 @@ Option Explicit On
Namespace My
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "11.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "15.7.0.0"), _
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Partial Friend NotInheritable Class MySettings
Inherits Global.System.Configuration.ApplicationSettingsBase
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
#Region "My.Settings Auto-Save Functionality"
#Region "Automatische My.Settings-Speicherfunktion"
#If _MyType = "WindowsForms" Then
Private Shared addedHandler As Boolean
Private Shared addedHandlerLockObject As New Object
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
If My.Application.SaveMySettingsOnExit Then
My.Settings.Save()
End If

81
OpenAntrag/OpenAntrag.vbproj
Unescape View File

@ -12,7 +12,7 @@
<OutputType>Library</OutputType>
<RootNamespace>OpenAntrag</RootNamespace>
<AssemblyName>OpenAntrag</AssemblyName>
<TargetFrameworkVersion>v4.5.1</TargetFrameworkVersion>
<TargetFrameworkVersion>v4.7.1</TargetFrameworkVersion>
<OptionExplicit>On</OptionExplicit>
<OptionCompare>Binary</OptionCompare>
<OptionStrict>Off</OptionStrict>
@ -28,6 +28,8 @@
<SccAuxPath>SAK</SccAuxPath>
<SccProvider>SAK</SccProvider>
<TargetFrameworkProfile />
<Use64BitIISExpress />
<UseGlobalApplicationHostFile />
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
<DebugSymbols>true</DebugSymbols>
@ -71,8 +73,9 @@
<SpecificVersion>False</SpecificVersion>
<HintPath>packages\HtmlAgilityPack.1.4.9\lib\Net45\HtmlAgilityPack.dll</HintPath>
</Reference>
<Reference Include="MarkdownDeep">
<HintPath>packages\MarkdownDeep.Full.1.5\lib\.NetFramework 3.5\MarkdownDeep.dll</HintPath>
<Reference Include="MarkdownDeep, Version=1.5.4615.26275, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>packages\MarkdownDeep.NET.1.5\lib\.NetFramework 3.5\MarkdownDeep.dll</HintPath>
</Reference>
<Reference Include="Microsoft.Web.Infrastructure, Version=1.0.0.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35, processorArchitecture=MSIL">
<Private>True</Private>
@ -238,6 +241,10 @@
<Content Include="App_Data\piratenmandate.xml">
<SubType>Designer</SubType>
</Content>
<Content Include="App_Data\Representations.xml">
<SubType>Designer</SubType>
</Content>
<Content Include="App_Data\Users.xml" />
<Content Include="Content\domain.css" />
<Content Include="Content\error.css" />
<Content Include="Content\faq.css" />
@ -443,41 +450,41 @@
<Content Include="Images\Logos\OALogo50.png" />
<Content Include="Images\Logos\PPLogo315.png" />
<Content Include="Images\Logos\PPLogo50.png" />
<Content Include="Images\Map\200-BB-blue.png" />
<Content Include="Images\Map\200-BB-orange.png" />
<Content Include="Images\Map\200-BE-blue.png" />
<Content Include="Images\Map\200-BE-orange.png" />
<Content Include="Images\Map\200-BW-blue.png" />
<Content Include="Images\Map\200-BW-orange.png" />
<Content Include="Images\Map\200-BY-blue.png" />
<Content Include="Images\Map\200-BY-orange.png" />
<Content Include="Images\Map\200-BB-active.png" />
<Content Include="Images\Map\200-BB-inactive.png" />
<Content Include="Images\Map\200-BE-active.png" />
<Content Include="Images\Map\200-BE-inactive.png" />
<Content Include="Images\Map\200-BW-active.png" />
<Content Include="Images\Map\200-BW-inactive.png" />
<Content Include="Images\Map\200-BY-active.png" />
<Content Include="Images\Map\200-BY-inactive.png" />
<Content Include="Images\Map\200-DE-gray.png" />
<Content Include="Images\Map\200-DE-white.png" />
<Content Include="Images\Map\200-DE.png" />
<Content Include="Images\Map\200-HB-blue.png" />
<Content Include="Images\Map\200-HB-orange.png" />
<Content Include="Images\Map\200-HE-blue.png" />
<Content Include="Images\Map\200-HE-orange.png" />
<Content Include="Images\Map\200-HH-blue.png" />
<Content Include="Images\Map\200-HH-orange.png" />
<Content Include="Images\Map\200-MV-blue.png" />
<Content Include="Images\Map\200-MV-orange.png" />
<Content Include="Images\Map\200-NI-blue.png" />
<Content Include="Images\Map\200-NI-orange.png" />
<Content Include="Images\Map\200-NW-blue.png" />
<Content Include="Images\Map\200-NW-orange.png" />
<Content Include="Images\Map\200-RP-blue.png" />
<Content Include="Images\Map\200-RP-orange.png" />
<Content Include="Images\Map\200-SH-blue.png" />
<Content Include="Images\Map\200-SH-orange.png" />
<Content Include="Images\Map\200-SL-blue.png" />
<Content Include="Images\Map\200-SL-orange.png" />
<Content Include="Images\Map\200-SN-blue.png" />
<Content Include="Images\Map\200-SN-orange.png" />
<Content Include="Images\Map\200-ST-blue.png" />
<Content Include="Images\Map\200-ST-orange.png" />
<Content Include="Images\Map\200-TH-blue.png" />
<Content Include="Images\Map\200-TH-orange.png" />
<Content Include="Images\Map\200-HB-active.png" />
<Content Include="Images\Map\200-HB-inactive.png" />
<Content Include="Images\Map\200-HE-active.png" />
<Content Include="Images\Map\200-HE-inactive.png" />
<Content Include="Images\Map\200-HH-active.png" />
<Content Include="Images\Map\200-HH-inactive.png" />
<Content Include="Images\Map\200-MV-active.png" />
<Content Include="Images\Map\200-MV-inactive.png" />
<Content Include="Images\Map\200-NI-active.png" />
<Content Include="Images\Map\200-NI-inactive.png" />
<Content Include="Images\Map\200-NW-active.png" />
<Content Include="Images\Map\200-NW-inactive.png" />
<Content Include="Images\Map\200-RP-active.png" />
<Content Include="Images\Map\200-RP-inactive.png" />
<Content Include="Images\Map\200-SH-active.png" />
<Content Include="Images\Map\200-SH-inactive.png" />
<Content Include="Images\Map\200-SL-active.png" />
<Content Include="Images\Map\200-SL-inactive.png" />
<Content Include="Images\Map\200-SN-active.png" />
<Content Include="Images\Map\200-SN-inactive.png" />
<Content Include="Images\Map\200-ST-active.png" />
<Content Include="Images\Map\200-ST-inactive.png" />
<Content Include="Images\Map\200-TH-active.png" />
<Content Include="Images\Map\200-TH-inactive.png" />
<Content Include="Images\Map\_40-DE.png" />
<Content Include="Images\mCSB_buttons.png" />
<Content Include="Images\pattern.png" />
@ -672,8 +679,8 @@
</VisualStudio>
</ProjectExtensions>
<PropertyGroup>
<PreBuildEvent>xcopy /y "E:\DevProjects\piratenmandate\piratenmandate.xml" "$(ProjectDir)App_Data"
xcopy /y "E:\DevProjects\piratenmandate\piratenmandate.dtd" "$(ProjectDir)App_Data"</PreBuildEvent>
<PreBuildEvent>xcopy /y "C:\Users\Entwicklung\source\repos\piratenmandate\piratenmandate.xml" "$(ProjectDir)App_Data"
xcopy /y "C:\Users\Entwicklung\source\repos\piratenmandate\piratenmandate.dtd" "$(ProjectDir)App_Data"</PreBuildEvent>
</PropertyGroup>
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
Other similar extension points exist, see Microsoft.Common.targets.

10
OpenAntrag/Views/Web.config
Unescape View File

@ -9,7 +9,7 @@
</configSections>
<system.web.webPages.razor>
<host factoryType="System.Web.Mvc.MvcWebRazorHostFactory, System.Web.Mvc, Version=5.0.0.0, Culture=neutral, PublicKeyToken=31BF3856AD364E35" />
<host factoryType="System.Web.Mvc.MvcWebRazorHostFactory, System.Web.Mvc, Version=5.2.2.0, Culture=neutral, PublicKeyToken=31BF3856AD364E35" />
<pages pageBaseType="System.Web.Mvc.WebViewPage">
<namespaces>
<add namespace="System.Web.Mvc" />
@ -39,11 +39,11 @@
-->
<pages
validateRequest="false"
pageParserFilterType="System.Web.Mvc.ViewTypeParserFilter, System.Web.Mvc, Version=5.0.0.0, Culture=neutral, PublicKeyToken=31BF3856AD364E35"
pageBaseType="System.Web.Mvc.ViewPage, System.Web.Mvc, Version=5.0.0.0, Culture=neutral, PublicKeyToken=31BF3856AD364E35"
userControlBaseType="System.Web.Mvc.ViewUserControl, System.Web.Mvc, Version=5.0.0.0, Culture=neutral, PublicKeyToken=31BF3856AD364E35">
pageParserFilterType="System.Web.Mvc.ViewTypeParserFilter, System.Web.Mvc, Version=5.2.2.0, Culture=neutral, PublicKeyToken=31BF3856AD364E35"
pageBaseType="System.Web.Mvc.ViewPage, System.Web.Mvc, Version=5.2.2.0, Culture=neutral, PublicKeyToken=31BF3856AD364E35"
userControlBaseType="System.Web.Mvc.ViewUserControl, System.Web.Mvc, Version=5.2.2.0, Culture=neutral, PublicKeyToken=31BF3856AD364E35">
<controls>
<add assembly="System.Web.Mvc, Version=5.0.0.0, Culture=neutral, PublicKeyToken=31BF3856AD364E35" namespace="System.Web.Mvc" tagPrefix="mvc" />
<add assembly="System.Web.Mvc, Version=5.2.2.0, Culture=neutral, PublicKeyToken=31BF3856AD364E35" namespace="System.Web.Mvc" tagPrefix="mvc" />
</controls>
</pages>
</system.web>

17
OpenAntragLib/Attributes/HandleCustomErrorAttribute.vb
Unescape View File

@ -11,16 +11,15 @@ Public Class HandleCustomErrorAttribute
If New HttpException(Nothing, filterContext.Exception).GetHttpCode() <> 500 Then Return
If Not ExceptionType.IsInstanceOfType(filterContext.Exception) Then Return
Dim log As New ErrorLog()
log.AbsoluteUri = filterContext.HttpContext.Request.Url.AbsoluteUri
log.Controller = filterContext.RouteData.Values("controller").ToString()
log.Action = filterContext.RouteData.Values("action").ToString()
log.RequestType = filterContext.HttpContext.Request.RequestType
log.Message = filterContext.Exception.Message
log.AjaxCall = (filterContext.HttpContext.Request.Headers("X-Requested-With") IsNot Nothing AndAlso
Dim log As New ErrorLog With {
.AbsoluteUri = filterContext.HttpContext.Request.Url.AbsoluteUri,
.Controller = filterContext.RouteData.Values("controller").ToString(),
.Action = filterContext.RouteData.Values("action").ToString(),
.RequestType = filterContext.HttpContext.Request.RequestType,
.Message = filterContext.Exception.Message,
.AjaxCall = (filterContext.HttpContext.Request.Headers("X-Requested-With") IsNot Nothing AndAlso
filterContext.HttpContext.Request.Headers("X-Requested-With") = "XMLHttpRequest")
}
Dim userAgent As String = filterContext.HttpContext.Request.UserAgent

30
OpenAntragLib/Controller/CommonController.vb
Unescape View File

@ -5,20 +5,20 @@ Public Class CommonController
<HandleErrorAsJson()>
Public Function GetPartial(namepart As String) As JsonResult
Dim jr As New JsonResult
jr.JsonRequestBehavior = JsonRequestBehavior.AllowGet
jr.Data = New With {.success = True, .data = Me.RenderPartialViewToString("_" & namepart & "Partial")}
Dim jr As New JsonResult With {
.JsonRequestBehavior = JsonRequestBehavior.AllowGet,
.Data = New With {.success = True, .data = Me.RenderPartialViewToString("_" & namepart & "Partial")}
}
Return jr
End Function
<HandleErrorAsJson()>
Public Function GetPartialModel(namepart As String, model As Object) As JsonResult
Dim jr As New JsonResult
jr.JsonRequestBehavior = JsonRequestBehavior.AllowGet
jr.Data = New With {.success = True, .data = Me.RenderPartialViewToString("_" & namepart & "Partial", model)}
Dim jr As New JsonResult With {
.JsonRequestBehavior = JsonRequestBehavior.AllowGet,
.Data = New With {.success = True, .data = Me.RenderPartialViewToString("_" & namepart & "Partial", model)}
}
Return jr
End Function
@ -29,9 +29,10 @@ Public Class CommonController
Dim cei As New CustomErrorInfo With {.ErrorMessage = strErrorMessage}
Dim strHtml As String = Me.RenderPartialViewToString("_ErrorBoxPartial", cei)
Dim jr As New JsonResult
jr.JsonRequestBehavior = JsonRequestBehavior.AllowGet
jr.Data = New With {.success = False, .errorHtml = strHtml}
Dim jr As New JsonResult With {
.JsonRequestBehavior = JsonRequestBehavior.AllowGet,
.Data = New With {.success = False, .errorHtml = strHtml}
}
Return jr
End Function
@ -41,9 +42,10 @@ Public Class CommonController
Dim strHash As String = Tools.GetMd5(strValue)
Dim jr As New JsonResult
jr.JsonRequestBehavior = JsonRequestBehavior.AllowGet
jr.Data = New With {.success = True, .data = strHash}
Dim jr As New JsonResult With {
.JsonRequestBehavior = JsonRequestBehavior.AllowGet,
.Data = New With {.success = True, .data = strHash}
}
Return jr
End Function

11
OpenAntragLib/Helper/MarkdownHelper.vb
Unescape View File

@ -14,12 +14,11 @@ Public Module MarkdownHelper
''' <returns>The HTML representation of the supplied Markdown.</returns>
Public Function Markdown(ByVal text As String,
Optional ByVal bolSafeMode As Boolean = True) As IHtmlString
Dim md = New Markdown()
md.ExtraMode = True
md.SafeMode = bolSafeMode
md.NewWindowForExternalLinks = True
Dim md = New Markdown With {
.ExtraMode = True,
.SafeMode = bolSafeMode,
.NewWindowForExternalLinks = True
}
Dim html As String = md.Transform(text)

6
OpenAntragLib/Helper/PartialHelper.vb
Unescape View File

@ -47,10 +47,10 @@ Public Module PartialExtensions
If String.IsNullOrEmpty(partialViewName) Then
Throw New ArgumentNullException("partialViewName")
End If
Dim dictionary As New ViewDataDictionary(If(viewData, htmlHelper.ViewData))
' we explicitly set the model here so we don't get the current Model as fallback.
dictionary.Model = model
Dim dictionary As New ViewDataDictionary(If(viewData, htmlHelper.ViewData)) With {
.Model = model
}
Dim viewContext As New ViewContext(htmlHelper.ViewContext, htmlHelper.ViewContext.View, dictionary, htmlHelper.ViewContext.TempData, writer)
FindPartialView(viewContext, partialViewName, viewEngineCollection).Render(viewContext, writer)

9
OpenAntragLib/Models/Proposal/Proposals.vb
Unescape View File

@ -405,10 +405,11 @@ Public Class Proposals
Dim rep As Representation = GlobalData.Representations.GetByKey(keyRepresentation.ToLower)
Dim model As New Proposal(rep)
model.Title = title.StripSpecialCharsForTitle
model.Text = text
model.ContactInfo = contactInfo
Dim model As New Proposal(rep) With {
.Title = title.StripSpecialCharsForTitle,
.Text = text,
.ContactInfo = contactInfo
}
If title.StartsWith("TEST:") Or rep.IsTest = True Then
model.IsTest = True

7
OpenAntragLib/Models/Representation/RepresentationSetting.vb
Unescape View File

@ -28,9 +28,10 @@ Public Class RepresentationSettings
If query.Count > 0 Then
model = query.First()
Else
model = New RepresentationSetting()
model.Key = key
model.CreatedBy = HttpContext.Current.User.Identity.Name
model = New RepresentationSetting With {
.Key = key,
.CreatedBy = HttpContext.Current.User.Identity.Name
}
ds.Store(model)
ds.SaveChanges()
End If

13
OpenAntragLib/Models/Representation/piratenmandate.vb
Unescape View File

@ -122,12 +122,13 @@ Public Class piratenmandate
Public ReadOnly Property GebietTypeAndName As String
Get
Dim lstNoType As New List(Of String)
lstNoType.Add("kreis")
lstNoType.Add("landkreis")
lstNoType.Add("landschaftsverband")
lstNoType.Add("regionalverband")
lstNoType.Add("kommunalverband besonderer art")
Dim lstNoType As New List(Of String) From {
"kreis",
"landkreis",
"landschaftsverband",
"regionalverband",
"kommunalverband besonderer art"
}
If lstNoType.Contains(Me.GebietType.ToLower()) = True Or
Me.GebietName.ToLower.Contains("ortsamtsbereich") = True Then

8
OpenAntragLib/My Project/Application.Designer.vb generated
Unescape View File

@ -1,10 +1,10 @@
'------------------------------------------------------------------------------
' <auto-generated>
' This code was generated by a tool.
' Runtime Version:4.0.30319.18444
' Dieser Code wurde von einem Tool generiert.
' Laufzeitversion:4.0.30319.42000
'
' Changes to this file may cause incorrect behavior and will be lost if
' the code is regenerated.
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
' der Code erneut generiert wird.
' </auto-generated>
'------------------------------------------------------------------------------

26
OpenAntragLib/My Project/Resources.Designer.vb generated
Unescape View File

@ -1,10 +1,10 @@
'------------------------------------------------------------------------------
' <auto-generated>
' This code was generated by a tool.
' Runtime Version:4.0.30319.18444
' Dieser Code wurde von einem Tool generiert.
' Laufzeitversion:4.0.30319.42000
'
' Changes to this file may cause incorrect behavior and will be lost if
' the code is regenerated.
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
' der Code erneut generiert wird.
' </auto-generated>
'------------------------------------------------------------------------------
@ -15,14 +15,14 @@ Imports System
Namespace My.Resources
'This class was auto-generated by the StronglyTypedResourceBuilder
'class via a tool like ResGen or Visual Studio.
'To add or remove a member, edit your .ResX file then rerun ResGen
'with the /str option, or rebuild your VS project.
'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert
'-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert.
'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen
'mit der /str-Option erneut aus, oder Sie erstellen Ihr VS-Projekt neu.
'''<summary>
''' A strongly-typed resource class, for looking up localized strings, etc.
''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw.
'''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"), _
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "15.0.0.0"), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
@ -33,7 +33,7 @@ Namespace My.Resources
Private resourceCulture As Global.System.Globalization.CultureInfo
'''<summary>
''' Returns the cached ResourceManager instance used by this class.
''' Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird.
'''</summary>
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
@ -47,8 +47,8 @@ Namespace My.Resources
End Property
'''<summary>
''' Overrides the current thread's CurrentUICulture property for all
''' resource lookups using this strongly typed resource class.
''' Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle
''' Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden.
'''</summary>
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Friend Property Culture() As Global.System.Globalization.CultureInfo

14
OpenAntragLib/My Project/Settings.Designer.vb generated
Unescape View File

@ -1,10 +1,10 @@
'------------------------------------------------------------------------------
' <auto-generated>
' This code was generated by a tool.
' Runtime Version:4.0.30319.18444
' Dieser Code wurde von einem Tool generiert.
' Laufzeitversion:4.0.30319.42000
'
' Changes to this file may cause incorrect behavior and will be lost if
' the code is regenerated.
' Änderungen an dieser Datei können falsches Verhalten verursachen und gehen verloren, wenn
' der Code erneut generiert wird.
' </auto-generated>
'------------------------------------------------------------------------------
@ -15,21 +15,21 @@ Option Explicit On
Namespace My
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "11.0.0.0"), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "15.7.0.0"), _
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Partial Friend NotInheritable Class MySettings
Inherits Global.System.Configuration.ApplicationSettingsBase
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
#Region "My.Settings Auto-Save Functionality"
#Region "Automatische My.Settings-Speicherfunktion"
#If _MyType = "WindowsForms" Then
Private Shared addedHandler As Boolean
Private Shared addedHandlerLockObject As New Object
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
Private Shared Sub AutoSaveSettings(sender As Global.System.Object, e As Global.System.EventArgs)
If My.Application.SaveMySettingsOnExit Then
My.Settings.Save()
End If

12
OpenAntragLib/OpenAntragLib.vbproj
Unescape View File

@ -10,7 +10,7 @@
<AssemblyName>OpenAntragLib</AssemblyName>
<FileAlignment>512</FileAlignment>
<MyType>Windows</MyType>
<TargetFrameworkVersion>v4.5.1</TargetFrameworkVersion>
<TargetFrameworkVersion>v4.7.1</TargetFrameworkVersion>
<SccProjectName>SAK</SccProjectName>
<SccLocalPath>SAK</SccLocalPath>
<SccAuxPath>SAK</SccAuxPath>
@ -49,10 +49,10 @@
</PropertyGroup>
<ItemGroup>
<Reference Include="ActionMailer.Net">
<HintPath>packages\ActionMailer.0.7.4\lib\Net40\ActionMailer.Net.dll</HintPath>
<HintPath>..\OpenAntrag\packages\ActionMailer.0.7.4\lib\Net40\ActionMailer.Net.dll</HintPath>
</Reference>
<Reference Include="ActionMailer.Net.Mvc">
<HintPath>packages\ActionMailer.0.7.4\lib\Net40\ActionMailer.Net.Mvc.dll</HintPath>
<HintPath>..\OpenAntrag\packages\ActionMailer.0.7.4\lib\Net40\ActionMailer.Net.Mvc.dll</HintPath>
</Reference>
<Reference Include="HtmlAgilityPack">
<HintPath>..\OpenAntrag\packages\HtmlAgilityPack.1.4.9\lib\Net45\HtmlAgilityPack.dll</HintPath>
@ -61,8 +61,9 @@
<SpecificVersion>False</SpecificVersion>
<HintPath>Libraries\LinqToTwitter.dll</HintPath>
</Reference>
<Reference Include="MarkdownDeep">
<HintPath>packages\MarkdownDeep.NET.1.5\lib\.NetFramework 3.5\MarkdownDeep.dll</HintPath>
<Reference Include="MarkdownDeep, Version=1.5.4615.26275, Culture=neutral, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>..\OpenAntrag\packages\MarkdownDeep.NET.1.5\lib\.NetFramework 3.5\MarkdownDeep.dll</HintPath>
</Reference>
<Reference Include="Microsoft.Web.Infrastructure, Version=1.0.0.0, Culture=neutral, PublicKeyToken=31bf3856ad364e35, processorArchitecture=MSIL">
<Private>True</Private>
@ -252,7 +253,6 @@
</EmbeddedResource>
</ItemGroup>
<ItemGroup>
<None Include="app.config" />
<None Include="My Project\Application.myapp">
<Generator>MyApplicationCodeGenerator</Generator>
<LastGenOutput>Application.Designer.vb</LastGenOutput>

31
OpenAntragLib/app.config
Unescape View File

@ -1,31 +0,0 @@
<?xml version="1.0" encoding="utf-8"?>
<configuration>
<runtime>
<assemblyBinding xmlns="urn:schemas-microsoft-com:asm.v1">
<dependentAssembly>
<assemblyIdentity name="System.Web.Mvc" publicKeyToken="31bf3856ad364e35" culture="neutral" />
<bindingRedirect oldVersion="0.0.0.0-5.2.2.0" newVersion="5.2.2.0" />
</dependentAssembly>
<dependentAssembly>
<assemblyIdentity name="System.Web.WebPages" publicKeyToken="31bf3856ad364e35" culture="neutral" />
<bindingRedirect oldVersion="0.0.0.0-3.0.0.0" newVersion="3.0.0.0" />
</dependentAssembly>
<dependentAssembly>
<assemblyIdentity name="Newtonsoft.Json" publicKeyToken="30ad4fe6b2a6aeed" culture="neutral" />
<bindingRedirect oldVersion="0.0.0.0-6.0.0.0" newVersion="6.0.0.0" />
</dependentAssembly>
<dependentAssembly>
<assemblyIdentity name="System.Net.Http.Primitives" publicKeyToken="b03f5f7f11d50a3a" culture="neutral" />
<bindingRedirect oldVersion="0.0.0.0-4.2.18.0" newVersion="4.2.18.0" />
</dependentAssembly>
<dependentAssembly>
<assemblyIdentity name="System.Net.Http.Formatting" publicKeyToken="31bf3856ad364e35" culture="neutral" />
<bindingRedirect oldVersion="0.0.0.0-5.2.2.0" newVersion="5.2.2.0" />
</dependentAssembly>
<dependentAssembly>
<assemblyIdentity name="System.Web.Http" publicKeyToken="31bf3856ad364e35" culture="neutral" />
<bindingRedirect oldVersion="0.0.0.0-5.2.2.0" newVersion="5.2.2.0" />
</dependentAssembly>
</assemblyBinding>
</runtime>
</configuration>
Write Preview
Loading…
Cancel
Save