Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Public Sub MySub(ByVal MyString As String)
' Do Stuff
End Sub
Dim tempClass as New MyClass
tempClass.MySub(Session("Here is my string"))
Public Sub InitialiseApp(ByVal acc As cAccount, ByVal Session As Object)
Dim cdata As New cCourseData
Session("UserAccID") = acc.AccID
Session("UserID") = acc.UserID
Session("UseNicknames") = acc.UserNicknames
Session("NoExcludedRounds") = acc.UserNoExcludedRounds
Session("UserReadOnly") = acc.UserReadOnly
Session("CalcStableford") = acc.UserCalcStableford
cdata.AccID = acc.AccID
If cdata.LoadCourses Then
Session("CourseData") = cdata.BuildCourseStr
End If
End Sub