Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature currently requires accessing the site using the built-in Safari browser.
Dim blnConnectStatus As Boolean
'// Attempt connection to database
blnConnectStatus = Connect(structConn)
If blnConnectStatus = False Then
Response.Write("Connection Failed!")
Else
Response.Write("Connection Succeeded!")
End If
Private Function Connect(ByRef structConn As ConnectionOptions) As Boolean
On Error GoTo Connect_Err
Dim strConn As String
'// Attempt to open the config.xml file & pass the database config info into connect string
structConn.cnn = New SqlClient.SqlConnection
strConn = "integrated security=SSPI;" & _
"server=" & structConn.strServer & ";" & _
"persist security info=False;" & _
"initial catalog=" & structConn.strInitialCatalog & ";" & _
"Trusted_Connection=" & structConn.strTrustedConnection & ";" & _
"User ID=" & structConn.strUserID & ";" & _
"Password=" & structConn.strPassword
structConn.cnn.ConnectionString = strConn
'// Attempt to open the connection
structConn.cnn.Open()
Connect = True
Exit Function
Connect_Err:
Connect = False
End Function