<%
Dim y,YearArray(4) 'Fixed size array
YearArray(0) = "2552"
YearArray(1) = "2553"
YearArray(2) = "2554"
YearArray(3) = "2555"
'For Each item In YearArray
' Response.Write(item & "<br />")
For y = 0 To UBound(YearArray)
'Response.write YearArray(y)&"<br>"
'IF select_academic_year = "YearArray" THEN
IF select_academic_year = "YearArray" AND select_term="ภาคต้น" AND select_story="สมัครพร้อมลงทะเบียน" THEN
Sql ="SELECT * From Student"
END IF
Next
%>
เออเรอ์ว่า
ADODB.Recordset error '800a0bb9'
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.