Forgot Password ??

PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone

	Registered : 109,038

HOME > ASP > ASP Forum > gpa สะสมของแต่ละเทอม คือหาgpaของแต่ละเทอมได้ แต่หาสะสม ของเทอมต่อๆไปไม่ได้ หาgpaตอนรวมได้ โอ๊บ

gpa สะสมของแต่ละเทอม คือหาgpaของแต่ละเทอมได้ แต่หาสะสม ของเทอมต่อๆไปไม่ได้ หาgpaตอนรวมได้ โอ๊บ

เริ่มหัวข้อใหม่

Guest

คือหาgpaของแต่ละเทอมได้ แต่หาสะสม ของเทอมต่อๆไปไม่ได้ หาgpaตอนรวมได้ โอ๊บ งงเอง

<%
unittermtotal=0
gradetermtotal=0
gpaterm=0
unitall=0
gradeall=0
gpaall=0

level=cint(request.Form("level"))
term=cint(request.Form("term"))
termid=array( _
"100000000", _
"120000000", _
"123400000", _
"123450000", _
"123456700", _
"1234567800" _
)

%>
</div>
</form>

<p align="center">
<%
if session("id")="" then
response.Redirect("data.asp")
else
for i = 0 to ubound(termid)
set rs= Server.CreateObject("ADODB.Recordset")
strSQL= "SELECT tbl_Pstgrd1.ID, tbl_Pstgrd1.SubCode, tbl_Pstgrd1.Sub, tbl_Pstgrd1.Unit, tbl_Pstgrd1.Gr, tbl_Pstgrd1.TermId "& _
"FROM tbl_Pstgrd1 "& _
"WHERE (((tbl_Pstgrd1.ID)="&session("id")&") AND ((tbl_Pstgrd1.TermId)='"&termid(i)&"'))"
'response.Write(strSQL & "<p>")
rs.open strSQL, conn ,1,3
if rs.eof then
response.Write("<br>"&"ไม่มีข้อมูล")
else
%>
<table border="1" align="center">
<tr bgcolor="Silver">
<td width="100">รหัสวิชา</td>
<td width="300">ชื่อวิชา</td>
<td width="50">หน่วยกิต</td>
<td width="50">เกรด</td>
</tr>
<% do while not rs.eof%>
<tr>
<td width="100"><%= Rs("SubCode")%></td>
<td width="300"><%= Rs("Sub")%></td>
<td width="50"><%= Rs("Unit")%></td>
<td width="50"><%= Rs("Gr")%></td>
</tr>
<%
unittermtotal=unittermtotal+rs("Unit")
gradetermtotal=gradetermtotal+rs("Unit")
gpaterm=unittermtotal/gradetermtotal

rs.movenext
loop
end if
rs.close : set rs=nothing
response.Write("<br>")
%>
<tr>
<td colspan="4"><%response.Write("unitterm="& unittermtotal)%>
<%response.Write("gradeterm="& gradetermtotal)%>
<%response.Write("gpaterm="& gpaterm)%></td>

</tr>
</table>
<%
unitall=unitall+unittermtotal
gradeall=gradeall+gradetermtotal

unittermtotal=0
gradetermtotal=0
gpaterm=0
next
gpaall=unitall/gradeall
response.Write("<p>")
response.Write("unitall="& unitall)
response.Write("gradeall="& gradeall)
response.Write("gpaall="& gpaall)
end if
%>

ดูให้ทีคับ ทำไงดี ขอบคุณ

Tag : - - - -

Date : 27 ต.ค. 2550 15:45:05

By : martino

View : 1753

Reply : 0

ค้นหาข้อมูล

แสดงความคิดเห็น

Re : gpa สะสมของแต่ละเทอม คือหาgpaของแต่ละเทอมได้ แต่หาสะสม ของเทอมต่อๆไปไม่ได้ หาgpaตอนรวมได้ โอ๊บ

รายละเอียด

เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

อัพโหลดแทรกรูปภาพ

Notice

เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ
อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง

เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง

โดย

อีเมล์

บวกค่าให้ถูก

<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)

Exchange: นำเข้าสินค้าจากจีน, Taobao, เฟอร์นิเจอร์, ของพรีเมี่ยม, ร่ม, ปากกา, power bank, แฟลชไดร์ฟ, กระบอกน้ำ

Load balance : Server 01

Registered : 109,038

ค้นหาข้อมูล

อัพโหลดแทรกรูปภาพ

Notice