-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathcomfind.asp
63 lines (61 loc) · 2.44 KB
/
comfind.asp
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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
<%@LANGUAGE="VBSCRIPT"%>
<%Option Explicit%>
<%
' =========================================================================================
' Copyright 2016 Community Information Online Consortium (CIOC) and KCL Software Solutions Inc.
'
' Licensed under the Apache License, Version 2.0 (the "License");
' you may not use this file except in compliance with the License.
' You may obtain a copy of the License at
'
' http://www.apache.org/licenses/LICENSE-2.0
'
' Unless required by applicable law or agreed to in writing, software
' distributed under the License is distributed on an "AS IS" BASIS,
' WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
' See the License for the specific language governing permissions and
' limitations under the License.
' =========================================================================================
%>
<% 'Base includes %>
<!--#include file="includes/core/adovbs.inc" -->
<!--#include file="includes/core/incVBUtils.asp" -->
<!--#include file="includes/validation/incBasicTypes.asp" -->
<!--#include file="includes/core/incRExpFuncs.asp" -->
<!--#include file="includes/core/incHandleError.asp" -->
<!--#include file="includes/core/incSetLanguage.asp" -->
<!--#include file="includes/core/incPassVars.asp" -->
<!--#include file="text/txtGeneral.asp" -->
<!--#include file="text/txtError.asp" -->
<!--#include file="includes/core/incConnection.asp" -->
<!--#include file="includes/core/incSetup.asp" -->
<%
' setPageInfo(bLogin, intDomain, intDbArea, strPathToStart, strPathFromStart, strFocus)
Call setPageInfo(False, DM_CIC, DM_CIC, vbNullString, vbNullString, vbNullString)
%>
<!--#include file="includes/core/incCrypto.asp" -->
<!--#include file="includes/core/incSecurity.asp" -->
<% 'End Base includes %>
<!--#include file="text/txtFinder.asp" -->
<html>
<head>
<title><%=TXT_COMMUNITY_FINDER%></title>
</head>
<%
Dim strExtraParams
strExtraParams = vbNullString
If Not Nl(Trim(Request("SearchParameterKey"))) Then
strExtraParams = "SearchParameterKey=on"
End If
%>
<frameset rows="50,*" cols="*" framespacing="0" frameborder="no" border="0">
<frame src="<%= makeLink("comfind_srch.asp", strExtraParams, vbNullString) %>" name="topFrame" scrolling="no" noresize >
<frame src="<%= makeLink("comfind_results.asp", strExtraParams, vbNullString) %>" name="mainFrame">
</frameset>
<noframes>
<body>
<%=TXT_BROWSER_FRAMES%>
</body>
</noframes>
</html>
<!--#include file="includes/core/incClose.asp" -->