亚控SCADA模板（静电监测系统）

界面展示

登陆界面

主页面

配置页面

报表展示

趋势图

棒图

报警页面

部分代码

//取7日数据
//连接工业库
string ConnectStr,SqlStrTRH,SqlStrTRK,SqlStrTRL,SqlStrTRM,SqlStrTRN,SqlStrTRP,SqlStrTRR,SqlStrTRS,SqlStrTRM1,SqlStrTRS1;
string CTime;
//CTime=/*string*/ DateAdd("D",-7, \\local\$Date)；
CTime=DateAdd("D",-7, \\local\$Date)+" "+\\local\$Time;
//查询命令
SqlStrTRH="SELECT SUM(ALL CAST(DataValue As int))/(COUNT(*)) FROM [History] WHERE TagName like '%TRH' AND DataTime >= "+"'"+CTime+"'";
SqlStrTRK="SELECT SUM(ALL CAST(DataValue As int))/(COUNT(*)) FROM [History] WHERE TagName like '%TRK' AND DataTime >= "+"'"+CTime+"'";
SqlStrTRL="SELECT SUM(ALL CAST(DataValue As int))/(COUNT(*)) FROM [History] WHERE TagName like '%TRL' AND DataTime >= "+"'"+CTime+"'";
SqlStrTRM="SELECT SUM(ALL CAST(DataValue As int))/(COUNT(*)) FROM [History] WHERE TagName like '%TRM' AND DataTime >= "+"'"+CTime+"'";
SqlStrTRN="SELECT SUM(ALL CAST(DataValue As int))/(COUNT(*)) FROM [History] WHERE TagName like '%TRN' AND DataTime >= "+"'"+CTime+"'";
SqlStrTRP="SELECT SUM(ALL CAST(DataValue As int))/(COUNT(*)) FROM [History] WHERE TagName like '%TRP' AND DataTime >= "+"'"+CTime+"'";
SqlStrTRR="SELECT SUM(ALL CAST(DataValue As int))/(COUNT(*)) FROM [History] WHERE TagName like '%TRR' AND DataTime >= "+"'"+CTime+"'";
SqlStrTRS="SELECT SUM(ALL CAST(DataValue As int))/(COUNT(*)) FROM [History] WHERE TagName like '%TRS' AND DataTime >= "+"'"+CTime+"'";
SqlStrTRM1="SELECT SUM(ALL CAST(DataValue As int))/(COUNT(*)) FROM [History] WHERE TagName like '%TRM1' AND DataTime >= "+"'"+CTime+"'";
SqlStrTRS1="SELECT SUM(ALL CAST(DataValue As int))/(COUNT(*)) FROM [History] WHERE TagName like '%TRS1' AND DataTime >= "+"'"+CTime+"'";
//ConnectStr="Data Source=emtest;User ID=ifsapp;PWD=ifs#mis;Unicode=True";
//连接字符串 StrToInt
ConnectStr = "Provider=KRTDBProvider.King.3;Data Source=127.0.0.1,5678;Persist Security Info=True; User ID=sa;Password=sa; TimeOut=5";
KDBDisConnect("\\local\strConnectID");
//判断连接
if(KDBGetConnectID("\\local\strConnectID", ConnectStr))
{
	//获取数据集
KDBGetDataset1("MyDataset","\\local\strConnectID",SqlStrTRH); 
//查询命令获取数据集的指定数据
CylinderChart1.SetDataValueForCylinder("Series2",0,StrToInt(KDBGetCellValueByFieldId("MyDataset", 0, 0)));
	//获取数据集
KDBGetDataset1("MyDataset","\\local\strConnectID",SqlStrTRK); 
//查询命令获取数据集的指定数据
CylinderChart1.SetDataValueForCylinder("Series2",1,StrToInt(KDBGetCellValueByFieldId("MyDataset", 0, 0)));
	//获取数据集
KDBGetDataset1("MyDataset","\\local\strConnectID",SqlStrTRL); 
//查询命令获取数据集的指定数据
CylinderChart1.SetDataValueForCylinder("Series2",2,StrToInt(KDBGetCellValueByFieldId("MyDataset", 0, 0)));
	//获取数据集
KDBGetDataset1("MyDataset","\\local\strConnectID",SqlStrTRM); 
//查询命令获取数据集的指定数据
CylinderChart1.SetDataValueForCylinder("Series2",3,StrToInt(KDBGetCellValueByFieldId("MyDataset", 0, 0)));
	//获取数据集
KDBGetDataset1("MyDataset","\\local\strConnectID",SqlStrTRN); 
//查询命令获取数据集的指定数据
CylinderChart1.SetDataValueForCylinder("Series2",4,StrToInt(KDBGetCellValueByFieldId("MyDataset", 0, 0)));
	//获取数据集
KDBGetDataset1("MyDataset","\\local\strConnectID",SqlStrTRP); 
//查询命令获取数据集的指定数据
CylinderChart1.SetDataValueForCylinder("Series2",5,StrToInt(KDBGetCellValueByFieldId("MyDataset", 0, 0)));
	//获取数据集
KDBGetDataset1("MyDataset","\\local\strConnectID",SqlStrTRR); 
//查询命令获取数据集的指定数据
CylinderChart1.SetDataValueForCylinder("Series2",6,StrToInt(KDBGetCellValueByFieldId("MyDataset", 0, 0)));
	//获取数据集
KDBGetDataset1("MyDataset","\\local\strConnectID",SqlStrTRS); 
//查询命令获取数据集的指定数据
CylinderChart1.SetDataValueForCylinder("Series2",7,StrToInt(KDBGetCellValueByFieldId("MyDataset", 0, 0)));
	//获取数据集
KDBGetDataset1("MyDataset","\\local\strConnectID",SqlStrTRM1); 
//查询命令获取数据集的指定数据
CylinderChart1.SetDataValueForCylinder("Series2",8,StrToInt(KDBGetCellValueByFieldId("MyDataset", 0, 0)));
	//获取数据集
KDBGetDataset1("MyDataset","\\local\strConnectID",SqlStrTRS1); 
//查询命令获取数据集的指定数据
CylinderChart1.SetDataValueForCylinder("Series2",9,StrToInt(KDBGetCellValueByFieldId("MyDataset", 0, 0)));

//Report1.SetDataset1("MyDataset");
//断开连接
KDBDisConnect("\\local\strConnectID");
CylinderChart1.SetSeriesCylinderColor("Series2",0,255,0,200);
CylinderChart1.SetSeriesCylinderColor("Series2",1,200,0,200);
CylinderChart1.SetSeriesCylinderColor("Series2",2,0,250,200);
CylinderChart1.SetSeriesCylinderColor("Series2",3,250,0,100);
CylinderChart1.SetSeriesCylinderColor("Series2",4,0,255,200);
CylinderChart1.SetSeriesCylinderColor("Series2",5,0,0,200);
CylinderChart1.SetSeriesCylinderColor("Series2",6,5,0,200);
CylinderChart1.SetSeriesCylinderColor("Series2",7,0,255,200);
CylinderChart1.SetSeriesCylinderColor("Series2",8,0,0,200);
CylinderChart1.SetSeriesCylinderColor("Series2",9,100,100,200);
}