<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="ValidateUser.asp" -->
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<TITLE><%=Application("WebTitle")%>-DbIndex.asp</TITLE>
<%
	GetUserRole Request.QueryString("username"), Request.QueryString("password"), "DbIndex.asp"
%>
<SCRIPT ID=clientEventHandlersJS LANGUAGE=javascript>
<!--

function DKVWebDbIndex1_OnCancel() {
	window.navigate("Default.asp");
}

function DKVWebDbIndex1_OnOk(ItemIndex, SubIndex) {
	switch(ItemIndex)
	{
	case 0:	//Real-time data view
		window.navigate("DbData.asp?DbDataGrpID=" + SubIndex);
		break;
	case 1:	//Real-time data curve
		window.navigate("DbTmCurve.asp?DbCurveGrpID=" + SubIndex);
		break;
	case 2:	//Real-time XY curve
		window.navigate("DbXYCurve.asp?DbXYGrpID=" + SubIndex);
		break;
	default:
		window.alert("Sorry,this website is being constructed......");
		break;
	}
}

//-->
</SCRIPT>
<SCRIPT LANGUAGE=javascript FOR=DKVWebDbIndex1 EVENT=OnCancel>
<!--
 DKVWebDbIndex1_OnCancel()
//-->
</SCRIPT>
<SCRIPT LANGUAGE=javascript FOR=DKVWebDbIndex1 EVENT="OnOk(ItemIndex, SubIndex)">
<!--
 DKVWebDbIndex1_OnOk(ItemIndex, SubIndex)
//-->
</SCRIPT>
</HEAD>
<BODY bgColor="#CCFFFF">
<P align=center><STRONG><%=Application("WebTitle")%><FONT 
size=2>-</FONT></STRONG><FONT size=2>Database information homepage</FONT> 
<DIV align=center>
<HR>
</DIV>
<P align=center>
<OBJECT id=DKVWebDbIndex1 style="LEFT: 0px; WIDTH: 80%; TOP: 0px; HEIGHT: 90%"  codebase=".\Controls\KVWeb.cab#$KVWebDbIndex.ocx$#"
height="90%" width="80%" classid=clsid:A7AA2B91-0CCB-4801-A818-5E57511A6160><PARAM NAME="_Version" VALUE="65536">
	<PARAM NAME="_ExtentX" VALUE="15716"><PARAM NAME="_ExtentY" VALUE="3201"><PARAM NAME="_StockProps" VALUE="1"><PARAM NAME="BackColor" VALUE="#66FFFF">
	<param name="UserRole" value="<%=Session("UserRole")%>">
	<param name="RmtCfgFileUrl" value>
	<param name="CmdSvrIP" value="<%=Application("CmdSvrIP")%>">
	<param name="CmdSvrPort" value="<%=Application("CmdSvrPort")%>">
	<param name="FileSvrIP" value="<%=Application("FileSvrIP")%>">
	<param name="FileSvrPort" value="<%=Application("FileSvrPort")%>">
	<param name="FSvrVirtualDir" value="<%=Application("FSvrVirtualDir")%>">
</OBJECT>
</P>

</BODY>
</HTML>
