06-09-15, 05:29 AM
سلام
بناء على الملف المرفق
موفقين
بناء على الملف المرفق
كود :
Dim sql As String = " SELECT [code], " &
" COUNT([code]) As [count], " &
" SUM([total]) As [total1], " &
" SUM(SWITCH(VAL([total])>=" & 100 & " AND VAL([total])<=" & 200 & "," & 500 & "," &
" VAL([total])>=" & 201 & " AND VAL([total])<=" & 300 & "," & 700 & "," &
" VAL([total])>=" & 301 & " AND VAL([total])<=" & 400 & "," & 1000 & "," &
" VAL([total])>=" & 401 & " AND VAL([total])<=" & 500 & "," & 2000 &
" )) AS [total2] " &
" " &
" FROM [Reports] " &
" " &
" WHERE (DATEDIFF('d',[data1],[data 2]) >= 3 ) " &
" " &
" GROUP BY [code] " &
" " &
" HAVING (SUM([total]) > 500) AND (COUNT([code]) >= 4) "موفقين
متغيب
