SSL issues

If Request.Cookies("CurrentCustomer") Is Nothing then

'Cookies have been lost or two hours has elapsed

Else

Dim CurrentCustomerValues as String = Request.Cookies("CurrentCustomer").Value

Response.Redirect("aurup:?uploadUrl=mysite.com?cookies=CurrentCustomer%3D" & CurrentCustomerValues & "other variables, False)

            Dim vSession As HttpSessionState = HttpContext.Current.Session
            Dim vSessionID As String = vSession.SessionID

Message = System.NullReferenceException: Object reference not set to an instance of an object.

Dim vRequest As System.Net.WebRequest = CType(System.Net.WebRequest.Create(UploadLink), System.Net.WebRequest)

Private Sub ApplePhone_Image_Error(sender As Object, e As System.EventArgs) Handles Me.Error
        Dim exc As Exception = Server.GetLastError
        Dim httpException As HttpException = CType(exc, HttpException)
        Dim httpCode As Integer = httpException.GetHttpCode()
        EmailError(httpCode.ToString, "Test")
        Response.Redirect("http://itunes.apple.com/us/app/aurigma-up/id432611633", False)
        Server.ClearError()
    End Sub

Dim vSession as string = ""
If not vSession.TryParse(Request.form("ASPNET_SessionId"), String) Then
"Error"
Else
 Session.Abandon()
 Response.Cookies.Add(New HttpCookie("ASP.NET_SessionId", vSession))
end If

Dim vSession as string = ""
If vSession.TryParse(Request.Cookies("ASPNET_SessionId"), String) Then
Session("ASP.NET_SessionId") = vSession
Else
'Deal with the error
End If

Dim vID as Integer = 0
If  vID.TryParse(Request.Cookies("UserID"), Integer) then
 Session("UserID") = vID
Else
'Deal with the error.
End If