-
Notifications
You must be signed in to change notification settings - Fork 0
/
subscription_cancel.aspx.vb
26 lines (22 loc) · 1.23 KB
/
subscription_cancel.aspx.vb
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Imports System.Data.SqlClient
Partial Class subscription_cancel
Inherits MyBaseClass
Protected Sub Page_Init(sender As Object, e As System.EventArgs) Handles Me.Init
showNotification("Subscription Incomplete", "It looks like you didn't complete your subscription to Buildmate :(", True)
'' save the currently selected subscription type to the users profile
'Dim connString As String = System.Configuration.ConfigurationManager.ConnectionStrings("LocalSqlServer").ConnectionString
'Dim myConn As New SqlConnection(connString)
'Dim cmd As SqlCommand = New SqlCommand("UPDATE UserProfile SET subscriptionType = @subscriptionType WHERE userId = @userId", myConn)
'cmd.Parameters.AddWithValue("@userId", Session("userId"))
'cmd.Parameters.AddWithValue("@subscriptionType", 0)
'Try
' myConn.Open()
' cmd.ExecuteReader()
' ' redirect the user to paypal where they can continue with the subscription
' ' Response.Redirect("https://www.sandbox.paypal.com/webscr?cmd=_customer-billing-agreement&token=" & token)
'Catch ex As Exception
' Trace.Write(ex.ToString)
' myConn.Close()
'End Try
End Sub
End Class