<% 
rem *********************************************************************************
rem This file is setting some more constants for the system
rem Web Calendar system v 3.04, released 2003/02/18
rem Made by Robert Hudec, rhudec@aspik.cz, http://www.aspik.cz
rem *********************************************************************************
%>
<% 'Response.CacheControl = "no-cache" 			' If you use PWS comment this line%>
<% 'Response.AddHeader "Pragma", "no-cache"  	' If you use PWS comment this line%>
<% Response.Expires = -1 %>
<% Response.Buffer = true %>

<% 
'Application.Contents.RemoveAll()
 dim my_conn
 dim ServerAddress
 dim intLANG
 dim strCLIENTLANG
 dim UseCustFields: UseCustFields=false
	ServerAddress 			= "http://" & Request.ServerVariables("SERVER_NAME") & Request.ServerVariables("PATH_INFO")


	if application("Languages")<>"LOADED2" then %>
				<!--#include file="../languages/wcal_lang_1.asp"-->
				<!--#include file="../languages/user_lang_1.asp"-->
				
				<!--#include file="../languages/wcal_lang_2.asp"-->
				<!--#include file="../languages/user_lang_2.asp"-->
				
				<!--#include file="../languages/wcal_lang_3.asp"-->
				<!--#include file="../languages/user_lang_3.asp"-->
				
				<!--#include file="../languages/wcal_lang_4.asp"-->
				<!--#include file="../languages/user_lang_4.asp"-->
				<%
	end if

function RW(strText)
	Response.write strText & vbCrLf
end function
%>