//This is a serverscript file. Changes made in this folder have effects on the entire site system. ( Not just in one page, or site. But the entire web server. ) 

var FeedbackObject;
var RecommendObject;
var SitemapObject;
var HighlightObject;
var QuizObject;
var IndexObject;
var PictorialObject;
var ScrollerObject;
var BookmarkObject;

var FeedbackObjectAnchor;
var RecommendObjectAnchor;
var SitemapObjectAnchor;
var HighlightObjectAnchor;
var QuizObjectAnchor;
var IndexObjectAnchor;
var PictorialObjectAnchor;
var ScrollerObjectAnchor;
var BookmarkObjectAnchor;


//how to use anchors .... document.write (PictorialObjectAnchor + "Clickable any title" + "</a>")




//general decs

if (sNextIcon==''){sNextIcon='<img src="/serverscripts/resources/Next.gif" border=0>'}
if (sPrevIcon==''){sPrevIcon='<img src="/serverscripts/resources/Prev.gif" border=0>'}
if (sNext==''){sNext='Next'}
if (sPrev==''){sPrev='Prev'}
if (sLinearNavigationHomeLinkHTML==''){sLinearNavigationHomeLinkHTML='Home'}
if (sContents==''){sContents='Table of Contents'}
if (sControlPanelCaption==''){sControlPanelCaption = "Menu&nbsp;&nbsp;>"}
if (sCopyright==''){sCopyright='Copyright IslamiCity 2001';}
if (sYouAreHereCaption==''){sYouAreHereCaption='Navigator'}
if (sClickHereForMoreHighlights==''){sClickHereForMoreHighlights='<img src="/serverscripts/resources/Next.gif" border=0> More';}
if (sClickHereForTheQuizAnswer==''){sClickHereForTheQuizAnswer='...  ( answer here ) ';}
if (sFeedbackCaption==''){sFeedbackCaption='_Feedback'}
if (sHideQuizAnswerWithThis==''){sHideQuizAnswerWithThis=".?.?.?."}
if (sSitemapCaption==''){sSitemapCaption="Sidemap";}
if (sHighlightCaption==''){sHighlightCaption="Highlights";}
if (sQuizCaption==''){sQuizCaption="Quiz";}
if (sRecommendCaption==''){sRecommendCaption="Email This Page To Friends";}
if (sPictorialCaption==''){sPictorialCaption="Pictorial"}
if (sGlossaryWordPopWindowProperties==''){sGlossaryWordPopWindowProperties="width=500,height=500,resizable=yes";}
if (sLearnMoreWindowProperties==''){sLearnMoreWindowProperties="width=500,height=500,resizable=yes";}
if (sBrowseToQuranWindowProperties==''){sBrowseToQuranWindowProperties="width=750,height=500,resizable=yes,scrollbars=yes";}
if (sIndexCaption ==''){sIndexCaption = "Site Index"}
if (sScrollerCaption==''){sScrollerCaption = "Scroller 2"}
if (sBookmarkThisPageCaption==''){sBookmarkThisPageCaption="Bookmark This Page"}
if (sControlPanelSeperator==''){sControlPanelSeperator="&nbsp;|&nbsp;&nbsp;"}
if (sSidebarRowMouseOutColor==''){sSidebarRowMouseOutColor="red"} // when this is on, you must match this with the style of SiteManSideBarColomndTable bgcolor in the currently on style.css
if (sSidebarRowMouseOverColor==''){sSidebarRowMouseOverColor="black"}
if (sSideBarBeginHTML==''){sSideBarBeginHTML="<table border='0' cellspacing='0' cellpadding='3' class='SiteManSideBarNavigation'>";}


//XMLScroll related...
//location of the scrolling content
if (sXMLScroll_ScrollingContentPath==''){sXMLScroll_ScrollingContentPath = "/ServerScripts/XMLScroll/XMLScroll/XMLScroll.txt";}
if (sXMLScroll_PauseTop==''){sXMLScroll_PauseTop="2500";}
if (sXMLScroll_ScrollDelay==''){sXMLScroll_ScrollDelay="60";}
if (sXMLScroll_Width==''){sXMLScroll_Width="100";}
if (sXMLScroll_Height==''){sXMLScroll_Height="100";}
if (sXMLScroll_LinkColor==''){sXMLScroll_LinkColor="white";}
if (sXMLScroll_LinkHoverColor==''){sXMLScroll_LinkHoverColor="yellow";}
if (sXMLScroll_TextColor ==''){sXMLScroll_TextColor ="white";}  
if (sXMLScroll_BackgroundColor ==''){sXMLScroll_BackgroundColor ="gray";}
if (sXMLScroll_TextStyle ==''){sXMLScroll_TextStyle =  "FONT-WEIGHT: normal; FONT-SIZE: 8pt; COLOR: white; FONT-FAMILY: Verdana, Arial, Helvetica, sans-serif; TEXT-DECORATION: none";}


if (sSearchBoxSeperator==''){sSearchBoxSeperator="<p>cp."}
if (sGlossaryBoxSeperator==''){sGlossaryBoxSeperator="<p>cp..."}

// icons needed here 

if (sGlossaryWordMarkerInPageTextEndDel==''){sGlossaryWordMarkerInPageTextEndDel="";} 
if (sGlossaryWordMarkerInPageTextBegDel==''){sGlossaryWordMarkerInPageTextBegDel="";}
if (sLearnMoreWordMarkerInPageTextBegDel==''){sLearnMoreWordMarkerInPageTextBegDel="";}
if (sLearnMoreWordMarkerInPageTextEndDel==''){sLearnMoreWordMarkerInPageTextEndDel="";}
if (sBrowseQuranWordMarkerInPageTextBegDel==''){sBrowseQuranWordMarkerInPageTextBegDel="";}
if (sBrowseQuranWordMarkerInPageTextEndDel==''){sBrowseQuranWordMarkerInPageTextEndDel="";}




//sidebar related...

if (sSideBarBulletHTMLClickable ==''){sSideBarBulletHTMLClickable = '<center><font color="orange">&#149;&nbsp;</font></center>'}		
if (sSideBarBulletHTMLClicked ==''){sSideBarBulletHTMLClicked = '<center><font color="green">&#149;&nbsp;</font></center>'}		


//window sizes

if (sSearchWindowProperties ==''){sSearchWindowProperties = 'width=290,height=400,resizable=yes,scrollbars=yes,toolbar=no,titlebar=no'}
if (sFeedbackWindowWidth==''){sFeedbackWindowWidth='400'}
if (sFeedbackWindowHeight==''){sFeedbackWindowHeight='450'}
if (sRecommendWindowWidth==''){sRecommendWindowWidth='400'}
if (sRecommendWindowHeight==''){sRecommendWindowHeight='450'}
if (sScrollWindowProperties ==''){sScrollWindowProperties = 'width=100,height=15,resizable=yes'}

//none editables...

var sCurrentDefaultASPLocation=leftOf('default.asp',window.document.location.href);
var sCurrentPageURL=rightOf('=',window.document.location.href);
var sStyle = getinbetween2(window.document.location.href + '&','Style=','&')

if ( len(sStyle) > 0 ) 
{
	document.write ("<link href='" + sStyle +  "'" + " rel=\"STYLESHEET\" type=\"text/css\">")
}
else
{
	//no style is defined... 
		document.write ("<link href=\"" +  "/ServerScripts/Resources" + "/" + "style.css\"  rel=\"STYLESHEET\" type=\"text/css\">")

}



var sWindowLocationHREF=window.document.location.href + '&' //add the last & so that Getinbetween can ALWAYS find the sRightDelimiter.

var sTTop = getinbetween2(sWindowLocationHREF,'Top=','&')

var sBottom = getinbetween2(sWindowLocationHREF,'Bottom=','&')

var sRight = getinbetween2(sWindowLocationHREF,'Right=','&')

var sLeft = getinbetween2(sWindowLocationHREF,'Left=','&')

var sRightWidth = getinbetween2(sWindowLocationHREF,'RightWidth=','&')

var sLeftWidth = getinbetween2(sWindowLocationHREF,'LeftWidth=','&')

var sSideBarLocation = getinbetween2(sWindowLocationHREF,'SideBarLocation=','&')

var sSideBarWidth = getinbetween2(sWindowLocationHREF,'SideBarWidth=','&')

var sStyle = getinbetween2(sWindowLocationHREF,'Style=','&')

var iCatID = getinbetween2(sWindowLocationHREF,'CatID=','&')

var sQueryStringInfoToCarryOnTothenextPage

sQueryStringInfoToCarryOnTothenextPage = 'Top' + '=' + sTTop 

sQueryStringInfoToCarryOnTothenextPage = sQueryStringInfoToCarryOnTothenextPage + '&' + 'Bottom' + '=' + sBottom

sQueryStringInfoToCarryOnTothenextPage = sQueryStringInfoToCarryOnTothenextPage + '&' + 'Right' + '=' + sRight

sQueryStringInfoToCarryOnTothenextPage = sQueryStringInfoToCarryOnTothenextPage + '&' + 'Left' + '=' + sLeft

sQueryStringInfoToCarryOnTothenextPage = sQueryStringInfoToCarryOnTothenextPage + '&' + 'SideBarWidth' + '=' + sSideBarWidth

sQueryStringInfoToCarryOnTothenextPage = sQueryStringInfoToCarryOnTothenextPage + '&' + 'RightWidth' + '=' + sRightWidth

sQueryStringInfoToCarryOnTothenextPage = sQueryStringInfoToCarryOnTothenextPage + '&' + 'LeftWidth' + '=' + sLeftWidth

sQueryStringInfoToCarryOnTothenextPage = sQueryStringInfoToCarryOnTothenextPage + '&' + 'SideBarLocation' + '=' + sSideBarLocation

sQueryStringInfoToCarryOnTothenextPage = sQueryStringInfoToCarryOnTothenextPage + '&' + 'Style' + '=' + sStyle

sQueryStringInfoToCarryOnTothenextPage = sQueryStringInfoToCarryOnTothenextPage + '&' + 'CatID' + '=' + iCatID


//	recommend
	var RecommendObjectHREF="javascript:centeredPopup('/ServerScripts/r_form.asp\?dest=' + escape(window.document.location.href),sRecommendWindowWidth,sRecommendWindowHeight)"
	RecommendObjectAnchor="<a  href=" + "\"" + RecommendObjectHREF + ";\"" + ">" 
	RecommendObject = RecommendObjectAnchor + sRecommendCaption + "</a>" 
	//document.write ("<li>" + RecommendObjectHREF)
	//document.write ("<li>" + RecommendObject)

//	sitemap
	
	var SitemapObjectHREF="javascript:GoDestination('sitemap.asp')"
	SitemapObjectAnchor="<a  href=\"" + SitemapObjectHREF + ";\">"
	SitemapObject =  SitemapObjectAnchor + sSitemapCaption + "</a>" + sControlPanelSeperator	
	//document.write ("<li>" + SitemapObjectHREF)
	//document.write ("<li>" + SitemapObject)	


//	highlights

	var HighlightObjectHREF="javascript:GoDestination('highlight.asp')"
	HighlightObjectAnchor="<a  href=\"" + HighlightObjectHREF + ";\">"
	HighlightObject =  HighlightObjectAnchor + sHighlightCaption + "</a>" + sControlPanelSeperator	
	//document.write ("<li>" + HighlightObjectHREF)
	//document.write ("<li>" + HighlightObject)


//	quiz
	
	var QuizObjectHREF="javascript:GoDestination('quiz.asp')"
	QuizObjectAnchor="<a  href=\"" + QuizObjectHREF + ";\">"
	QuizObject = QuizObjectAnchor + sQuizCaption + "</a>" 		
	//document.write ("<li>" + QuizObjectHREF) 
	//document.write ("<li>" + QuizObject) 
	

//	siteindex

	var IndexObjectHREF="javascript:GoDestination('A.asp')"
	IndexObjectAnchor="<a  href=\"" + IndexObjectHREF + ";\">"
	IndexObject = IndexObjectAnchor + sIndexCaption + "</a>" + sControlPanelSeperator		
	//document.write ("<li>" + IndexObjectHREF )
	//document.write ("<li>" + IndexObject)


//	pictorial

	var PictorialObjectHREF = "/ServerScripts/Pictorial/Pictorial.asp"
	PictorialObjectHREF = PictorialObjectHREF + "?" + "ContentLocation=" + sContentLocation
	PictorialObjectHREF = PictorialObjectHREF + "&" + "PopUpWindowWidth=" + ( ( iMaxPictureWidth - 0 ) + 200 + 100 )   // 200 is the image descriptn on the right pane , 100 is for the padding around the image 
	PictorialObjectHREF = PictorialObjectHREF + "&" + "MaxPictureWidth=" + ( iMaxPictureWidth - 0 )
	PictorialObjectHREF = PictorialObjectHREF + "&" + "WebSiteTitle=" + sPictorialWebSiteTitle
	PictorialObjectHREF = PictorialObjectHREF + "&" + "CurrentDefaultASPLocation=" + sCurrentDefaultASPLocation
	//you read sCurrentDefaultASPLocation in the pictorial.asp
	//then you feed that value as query string again into the corresponding frame element src
	//then that asp page ( in the frame element ) reads that value
	//then doc.writes as sc ript var svar;svar=that value </scr ipt...
	//only then that page can get this very value !...
	PictorialObjectHREF = PictorialObjectHREF + "&" + "LeftPanelReference=" + "resources/PictorialSystemOpeningImage.jpg"
	PictorialObjectHREF = PictorialObjectHREF + "&" + "RightPanelReference=" + "p1.asp"
	PictorialObjectHREF = PictorialObjectHREF + "&" + "DropDownPanelReference=" + "PictorialSystemDropDownPanelReference.js"
	PictorialObjectHREF = PictorialObjectHREF + "&" + "ScrollingThumbnailsPanelreference=" + "PictorialSystemScrollingThumbnailsReference.js"
	PictorialObjectHREF = PictorialObjectHREF + "&" + "QueryStringInfoToCarryOn=" + ReplaceString(sQueryStringInfoToCarryOnTothenextPage,"&","AMPERSAND")
	PictorialObjectHREF = PictorialObjectHREF + "&" + "ScrollingSitemapReference=" + "PictorialSystemScrollingSitemapReference.js"
	PictorialObjectHREF = PictorialObjectHREF + "&" + "RelatedFile1=" + sRelatedFile1
	PictorialObjectHREF  = "javascript:var sPicWin=window.open('" + PictorialObjectHREF + "','PictorialWin',sPictorialWindowProperties)"
	PictorialObjectAnchor = "<a  href=\"" + PictorialObjectHREF + ";\" >" 
	PictorialObject  = PictorialObjectAnchor + sPictorialCaption + "</a>" 
	//document.write ("<li>" + PictorialObjectHREF) 
	//document.write ("<li>" + PictorialObject) 
	

//	feedback

	var FeedbackObjectHREF="javascript:centeredPopup('" + '/ServerScripts/feedback.asp\?' + 'dest=' + window.document.location.href + '&' +'EncodedAuthor=' + sEncryptedFeedbackContact + '&' +'SitemanGUID=' + sSitemanGUID + "',sFeedbackWindowWidth,sFeedbackWindowHeight)"
	FeedbackObjectAnchor="<a  href=\"" + FeedbackObjectHREF + ";\">"
	FeedbackObject = FeedbackObjectAnchor +  sFeedbackCaption + "</a>" 
	//document.write ("<li>" + FeedbackObjectHREF)
	//document.write ("<li>" + FeedbackObject)



//	scroller

	var ScrollerObjectHREF="javascript:var sScrollerWindow=window.open('/serverScripts/scroll.asp','scroll',sScrollWindowProperties)"
	ScrollerObjectAnchor="<a href=\"" + ScrollerObjectHREF + ";\"  >"
	ScrollerObject =  ScrollerObjectAnchor +  sScrollerCaption + "</a>" 	
	//document.write ("<li>" + ScrollerObjectHREF)
	//document.write ("<li>" + ScrollerObject)


//	bookmark

	
	var BookmarkObjectHREF = "javascript:window.external.AddFavorite(window.document.location.href,document.title);";
	BookmarkObjectAnchor="<A HREF='" + BookmarkObjectHREF + "'" + ">" 
	BookmarkObject = BookmarkObjectAnchor + sBookmarkThisPageCaption + '</a>';
	//document.write ("<li>" + BookmarkObjectHREF)
	//document.write ("<li>" + BookmarkObject)


//	search

	//NO ANCHORS 
	SearchObject = "<FORM action=\"/ServerScripts/search.asp\" METHOD=POST Name=\"frmSearch\" target=\"formWindow\" onsubmit=\"window.self.name='openerWindow';return postToPopup(this,sSearchWindowProperties);\"  >"	
	SearchObject = SearchObject + "<INPUT type='hidden' NAME=\"LastFocus\" value=''>"
	SearchObject = SearchObject + "<INPUT TYPE=\"HIDDEN\" NAME=\"ContentLocation\"  value='" + sContentLocation + "' >"
	SearchObject = SearchObject + "<INPUT TYPE=\"HIDDEN\" NAME=\"QueryStringInfoToCarryOn\"  value='" + sQueryStringInfoToCarryOnTothenextPage + "' >"
	SearchObject = SearchObject + "<INPUT TYPE=\"HIDDEN\" NAME=\"CurrentDefaultASPLocation\"  value='" + sCurrentDefaultASPLocation + "' >"
	SearchObject = SearchObject + "<INPUT TYPE=\"HIDDEN\" NAME=\"SQLTableForSearch\"  value='" + sSQLTableForSearch + "' >"
	SearchObject = SearchObject + "<INPUT TYPE=\"HIDDEN\" NAME=\"DB\"  value='" + sDB + "' >"
	var SearchFormBegin=SearchObject
	var SearchFormEnd="</form>"
	SearchObject = SearchObject + "<INPUT class=SitemanSearchTextBox TYPE=\"TEXT\" NAME=\"SearchString\" SIZE=\"13\" MAXLENGTH=\"100\" VALUE=\"Search\" onClick='if ( this.value == \"Search\" ) { this.value=\"\" };'>"
	SearchObject = SearchObject + "<input class=SitemanSearchButton type=submit value='search' onClick=\"window.self.name='openerWindow';return postToPopup(this,sSearchWindowProperties);\">"
	SearchObject = SearchObject + "</form>"
	//alert(SearchObject)




//	glossary

	//NO ANCHORS 
	GlossaryObject = "<FORM action=\"/ServerScripts/glossary.asp\" METHOD=POST Name=\"frmGlossary\" target=\"formWindow\" onsubmit=\"window.self.name='openerWindow';return postToPopup(this,sSearchWindowProperties);\"  >"	
	var GlossaryFormBegin=GlossaryObject
	var GlossaryFormEnd="</form>"
	
	GlossaryObject = GlossaryObject + "<INPUT class=SitemanGlossaryTextBox TYPE=\"TEXT\" NAME=\"GlossaryString\" SIZE=\"23\" MAXLENGTH=\"100\" VALUE=\"Glossary Look Up\" onClick='if ( this.value == \"Glossary Look Up\" ) { this.value=\"\" };'>"
	GlossaryObject = GlossaryObject + "<input class=SitemanGlossaryButton type=submit value='Glossary Look Up' onClick=\"return postToPopup(this,'width=290,height=400,resizable=yes,scrollbars=yes,toolbar=no,titlebar=no');\">"
	GlossaryObject = GlossaryObject + "</form>"
	//alert(GlossaryObject)
	

function DisplayControlPanelFunctions() {


	//search and glossary objects are not part of the controlpanel. 


	document.write(RecommendObject + sControlPanelSeperator)

	
	if ( bolShowSitemap ) {
	
		document.write (SitemapObject + sControlPanelSeperator)	
	
	}
	
	if ( bolShowHighlight ) {
	
		document.write (HighlightObject + sControlPanelSeperator)
	}


	if ( bolShowQuiz ) {
	

		document.write (QuizObject + sControlPanelSeperator)
	
	}
	
	
	if ( bolShowIndex ) {
	

		document.write (IndexObject + sControlPanelSeperator)
	}
	


	
	if ( bolShowPictorial ) {
	

		if (navigator.appName == 'Netscape') {
		    
		    // no pictorial
		    
		}

		else
		
		{

			document.write (PictorialObject + sControlPanelSeperator)
		}	

	}
	

	
	if ( bolShowFeedback ) {

		document.write (FeedbackObject + sControlPanelSeperator)
		
	
	}
	


	if ( bolShowScroller ) {	
		
		document.write (ScrollerObject + sControlPanelSeperator)

	}	
	
	

	
	if ( bolShowBookmark ) {
	

		if (navigator.appName == 'Netscape') {
		    
		    // no bookmark
		    
		}

		else
		
		{

			document.write (BookmarkObject + sControlPanelSeperator);

		}	

	}
	
		
}



var iCurrentPageID=getinbetween2(sWindowLocationHREF,'CurrentPageID=','&')




if (iCurrentPageID.length==0)
{
	iCurrentPageID=1;
}
//alert('iCurrentPageID is ' + iCurrentPageID)

function GoDestination(sDestinationFile) {

	// this calculation may seem to be duplication however, the above one is for general purposes... and both is needed.
	
	iCurrentPageID=ReplaceString(sDestinationFile,".asp","")
	
	if ( instr(1,iCurrentPageID,"#","vbTextCompare") > 0  )
	
	{
	
		iCurrentPageID=leftOf("#",iCurrentPageID)
	
	}

	
	var sFinalToGo = sCurrentDefaultASPLocation + "default.asp" + "?" + "ContentLocation=" + sContentLocation + "&" + "CurrentPageID=" + iCurrentPageID + "&" + sQueryStringInfoToCarryOnTothenextPage + "&" + "Destination=" + sContentLocation + "/" + sDestinationFile 
	
	window.location.href=sFinalToGo
}


function Display(sObjectToDisplay){

	document.write (sObjectToDisplay)
}