Delphi7, how to evaluate sqlserver2000 removal under the condition of a data with another intersecti-CodePudding

 mainform. Ado2. SQL. The Add (' select riqi as date, snow as'); Mainform. Ado2. SQL. The Add (' from '+ TableTq); Mainform. Ado2. SQL. The Add (' where snow not in (select the rain from '+ TableTq + where snow=rain) and the substring (riqi, 5, 4) between' ' '+ formatdatetime (' MMDD' DateTimePicker2. Date) + "'"); Mainform. Ado2. SQL. The Add (' and ' ' '+ formatdatetime (' MMDD' DateTimePicker4. Date) + "'"); Mainform. Ado2. SQL. The Add (' and the substring (riqi, 1, 4) between ' ' '+ formatdatetime (' yyyy' DateTimePicker1. Date) + "'"); Mainform. Ado2. SQL. The Add (' and ' ' '+ formatdatetime (' yyyy' DateTimePicker3. Date) + "'"); Mainform. Ado2. SQL. The Add (' and QuZhanHao='+' ' ' ' '+ StationId); Mainform. Ado2. SQL. The Add (' order by riqi ');

CodePudding user response:

 mainform. Ado2. SQL. The Add (' select riqi as date, snow as'); 
Mainform. Ado2. SQL. The Add (' from '+ TableTq); 
Mainform. Ado2. SQL. The Add (' where snow not in (select the rain from '+ TableTq + where snow=rain) and the substring (riqi, 5, 4) between' ' '+ formatdatetime (' MMDD' DateTimePicker2. Date) + "'"); 
Mainform. Ado2. SQL. The Add (' and ' ' '+ formatdatetime (' MMDD' DateTimePicker4. Date) + "'"); 
Mainform. Ado2. SQL. The Add (' and the substring (riqi, 1, 4) between ' ' '+ formatdatetime (' yyyy' DateTimePicker1. Date) + "'"); 
Mainform. Ado2. SQL. The Add (' and ' ' '+ formatdatetime (' yyyy' DateTimePicker3. Date) + "'"); 
Mainform. Ado2. SQL. The Add (' and QuZhanHao='+' ' ' ' '+ StationId); Mainform. Ado2. SQL. The Add (' order by riqi ');

CodePudding user response:

I want to check out the date of the snow (removal of the rain and snow is the same date), how to do it, please expert help,