2 files changed, 0 insertions, 56 deletions
diff --git a/samples/OpenIdRelyingPartyWebFormsVB/Code/State.vb b/samples/OpenIdRelyingPartyWebFormsVB/Code/State.vb
deleted file mode 100644
index e00cb4f..0000000
--- a/samples/OpenIdRelyingPartyWebFormsVB/Code/State.vb
+++ /dev/null
@@ -1,46 +0,0 @@
-Imports DotNetOpenAuth.OpenId.Extensions.ProviderAuthenticationPolicy
-Imports DotNetOpenAuth.OpenId.Extensions.SimpleRegistration
-Imports DotNetOpenAuth.OpenId.Extensions.AttributeExchange
-
-Public Class State
-	Public Shared Property ProfileFields() As ClaimsResponse
-		Get
-			Return HttpContext.Current.Session("ProfileFields")
-		End Get
-		Set(ByVal value As ClaimsResponse)
-			HttpContext.Current.Session("ProfileFields") = value
-		End Set
-	End Property
-
-	Public Shared Property FetchResponse() As FetchResponse
-		Get
-			Return HttpContext.Current.Session("FetchResponse")
-		End Get
-		Set(ByVal value As FetchResponse)
-			HttpContext.Current.Session("FetchResponse") = value
-		End Set
-	End Property
-
-	Public Shared Property FriendlyLoginName() As String
-		Get
-			Return HttpContext.Current.Session("FriendlyLoginName")
-		End Get
-		Set(ByVal value As String)
-			HttpContext.Current.Session("FriendlyLoginName") = value
-		End Set
-	End Property
-
-	Public Shared Property PapePolicies() As PolicyResponse
-		Get
-			Return HttpContext.Current.Session("PapePolicies")
-		End Get
-		Set(ByVal value As PolicyResponse)
-			HttpContext.Current.Session("PapePolicies") = value
-		End Set
-	End Property
-
-	Public Shared Sub Clear()
-		FriendlyLoginName = Nothing
-	End Sub
-
-End Class
diff --git a/samples/OpenIdRelyingPartyWebFormsVB/Code/TracePageAppender.vb b/samples/OpenIdRelyingPartyWebFormsVB/Code/TracePageAppender.vb
deleted file mode 100644
index dfc2db5..0000000
--- a/samples/OpenIdRelyingPartyWebFormsVB/Code/TracePageAppender.vb
+++ /dev/null
@@ -1,10 +0,0 @@
-Imports System.IO
-
-Public Class TracePageAppender
-	Inherits log4net.Appender.AppenderSkeleton
-
-	Protected Overrides Sub Append(ByVal loggingEvent As log4net.Core.LoggingEvent)
-		Dim sw As StringWriter = New StringWriter(Global_asax.LogMessages)
-		Layout.Format(sw, loggingEvent)
-	End Sub
-End Class
-\ No newline at end of file