<%
rPageID = request("id")
if request.ServerVariables("SERVER_PORT_SECURE") = 0 and (rPageID=186 or rPageID=188 or rPageID=170) then
response.Redirect("https://www.tainstruments.com" & request.ServerVariables("url") & "?" & request.ServerVariables("QUERY_STRING"))
end if
idPages = Request("id")
If idPages = "" Then
bIsHomePage = True
Else
bIsHomePage = False
End If
If Not bIsHomePage Then 'This is not the home page, collect content
'Split idPage and idSubpage
' underscorePosition = InStr(idPages, "_")
' If underscorePosition <> 0 Then
' idParent = CInt(Left(idPages, underscorePosition - 1))
' idPage = CInt(Mid(idPages, underscorePosition + 1))
' bReturn = True
' Else
' idPage = idPages
' idParent = 0
' bReturn = False
' End If
'Connect to database and get content
Set rs = Server.CreateObject("ADODB.RECORDSET")
sql = "exec getPage @id=" & idPages
rs.CursorLocation = aduseclient
rs.Open sql, con, adOpenDynamic, , adcmdtext
set rs.ActiveConnection = nothing
'response.Write sql
'response.end
End If
%>
TA Instruments™
_
_
_
_
_
_
_
_
