KingView报警查询

画面存在时语言脚本

//数据库中数据是按格林威治时间存的，比北京时间晚8小时，下面的脚本是将北京时间转换为格林威治时间

long htcover1;
long htcover11;
long htcover2;
long htcover22;
htcover1=HTConvertTime(\local$Year,\local$Month,\local$Day,0,0,0);
htcover11=HTConvertTime(\local$Year,\local$Month,\local$Day,\local$Hour,\local$Minute,\local$Second);
//1小时是3600，8小时是28800
htcover2=htcover1-28800;
htcover22=htcover11-28800;
long y;
long m;
long d;
long y1;
long mm;
long d1;
GetDateLocal(htcover2,y,m,d);
GetDateLocal(htcover22,y1,mm,d1);
string da1;
string da11;
da1=StrFromInt( y, 10 )+"/"+StrFromInt( m, 10 )+"/"+StrFromInt( d, 10 );
da11=StrFromInt( y1, 10 )+"/"+StrFromInt( mm, 10 )+"/"+StrFromInt( d1, 10 );
long h;
long m1;
long s;
long h1;
long mm1;
long s1;
GetTimeLocal(htcover2,h,m1,s);
GetTimeLocal(htcover22,h1,mm1,s1);
string da2;
string da22;
da2=StrFromInt( h, 10 )+":"+StrFromInt( m1, 10 )+":"+StrFromInt( s, 10 );
da22=StrFromInt( h1, 10 )+":"+StrFromInt( mm1, 10 )+":"+StrFromInt( s1, 10 );
string da;
string dat;
da=da1+" "+da2;
dat=da11+" "+da22;
//数据查询脚本
string whe;
whe="AlarmTime>=#"+da+"# and AlarmTime<=#"+dat+"# "+"ORDER BY AlarmTime ASC" ;

报警查询.Where=whe;
报警查询.FetchData();
报警查询.FetchEnd();

查询按钮弹起时脚本

long sdy;
long sdm;
long sdd;
sdy=报警查询日期.Year;
sdm=报警查询日期.Month;
sdd=报警查询日期.Day;

//数据库中数据是按格林威治时间存的，比北京时间晚8小时，下面的脚本是将北京时间转换为格林威治时间

long htcover1;
long htcover11;
long htcover2;
long htcover22;
htcover1=HTConvertTime(sdy,sdm,sdd,0,0,0);
htcover11=HTConvertTime(sdy,sdm,sdd,\local$Hour,\local$Minute,\local$Second);
//1小时是3600，8小时是28800
htcover2=htcover1-28800;
htcover22=htcover11-28800;
long y;
long m;
long d;
long y1;
long mm;
long d1;
GetDateLocal(htcover2,y,m,d);
GetDateLocal(htcover22,y1,mm,d1);
string da1;
string da11;
da1=StrFromInt( y, 10 )+"/"+StrFromInt( m, 10 )+"/"+StrFromInt( d, 10 );
da11=StrFromInt( y1, 10 )+"/"+StrFromInt( mm, 10 )+"/"+StrFromInt( d1, 10 );
long h;
long m1;
long s;
long h1;
long mm1;
long s1;
GetTimeLocal(htcover2,h,m1,s);
GetTimeLocal(htcover22,h1,mm1,s1);
string da2;
string da22;
da2=StrFromInt( h, 10 )+":"+StrFromInt( m1, 10 )+":"+StrFromInt( s, 10 );
da22=StrFromInt( h1, 10 )+":"+StrFromInt( mm1, 10 )+":"+StrFromInt( s1, 10 );
string da;
string dat;
da=da1+" "+da2;
dat=da11+" "+da22;
//数据查询脚本
string whe;
whe="AlarmTime>=#"+da+"# and AlarmTime<=#"+dat+"# "+"ORDER BY AlarmTime ASC" ;

报警查询.Where=whe;
报警查询.FetchData();
报警查询.FetchEnd();