Forgot Password ??

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

	Registered : 109,038

HOME > ASP > ASP Forum > ช่วยด้วยค่ะ..งงมากเลย มัน error แบบนี้นะคะ Error Type: (0x80020009) Exception occurred.

ช่วยด้วยค่ะ..งงมากเลย มัน error แบบนี้นะคะ Error Type: (0x80020009) Exception occurred.

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

Guest

มัน error แบบนี้นะคะ

Error Type:
(0x80020009)
Exception occurred.
/iso/QUADTraining/registerTrainDetial.asp, line 52

ซึ่ง line 52 เป็น เงือนไข If แบบนี้ค่ะ

<%
if rs("r.idCourse")<> "" or rs("R.idCourse")=idCourse then <----- ตรงนี้คือ line52 ค่ะ
errmsg = "คุณได้ทำการลงทะเบียนไปแล้วในหัวข้อการอบรมนี้ <a href=registrain.asp>คลิกที่นี่</a>"
Response.Write errmsg
Response.End
else
Do While not rs.eof
%>

<input type="checkbox" name="chack" value="<%=rs("id")%>"><%=rs("name")%> <%=rs("surname")%><br>

<%
rs.MoveNext
Loop
end if
rs.close
conn.close
set rs=nothing
set conn=nothing
%>

วานผู้รู้ช่วยตอบทีนะคะ
งงมานานแล้วค่ะ

**** ปล. หลังจากเช็คที่เงื่อนไขเป็นจริงจะ run ผ่านค่ะ แต่ถ้าเป็นเท็จจะขึ้นข้อความ error อย่างที่แสดงให้เห็นนะคะ

Tag : - - - -

Date : 11 พ.ค. 2548 15:08:19

By : สงสารนู๋เถอะ..

View : 2713

Reply : 2

No. 1

นายกระจอก007

โพสกระทู้ ( 422 )
บทความ ( 0 )

แค่นี้ยังดูไม่ออกนะครับ...ลองเอามาทั้งไฟล์เลยอ่ะ..จะได้ดูออก ผมเข้าใจว่าถ้าเงื่อนไขเป็นเท็จ r.idcourse จะไม่มีค่าเลยอ่ะ หรือไม่ก็ตัวแปร idcourse เป็นค่า null อะนะ ลองดูดี

Date : 12 พ.ค. 2548 11:28:59

By : นายกระจอก

No. 2

Guest

อืมลองเช็คค่าก่อนที่จะวัดแล้วนะคะ
r.idcourse มีค่าส่งมาค่ะ

ตามนี้นะคะ

<%@ codepage=874 %>
<% Option Explicit %>



<% If Session("user") = "" Then Response.Redirect "login.asp" end if%>

<%
dim errmsg , rs , sql , idCourse , idSection
Dim nameCourseTh , dateCourseStart , color , monththis

idCourse = Trim(Request.QueryString("idCourse"))
idSection = session("idSection")
session("idCourse") = idCourse

Set conn = CreateObject("ADODB.Connection")
conn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("../database/QUADTraining.mdb")) & ";Jet OLEDB:Database Password=11102409"

sql = "select * from CourseDetial CD, Expertness E , Admin A , SectionClass SC , Register R " &_
" where CD.idExpertness=E.idExpertness and SC.idSection=A.idSection and R.idCourse=CD.idCourse "&_
" and A.idSection="&idSection &_
" and CD.idCourse="&idCourse
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn, 1,3

if rs("r.idCourse")<> "" then
errmsg = "<br><br><br><br><center>"
errmsg = errmsg & "คุณได้ทำการลงทะเบียนไปแล้วในหัวข้อการอบรมนี้ไปแล้ว <br> "
errmsg = errmsg & "กรุณา <a href=registrain.asp>คลิกที่นี่</a> เพื่อกลับไปเลือกหัวข้อการอบรมใหม่ค่ะ"
Response.Write errmsg
Response.End
end if

%>

<div align="center">
<p><span class="style1"><font size="5"><br>
ฟอร์มการลงทะเบียนการอบรม / สัมนา ออนไลน์</font>
</span></p>
<form name="regis" method="post" action="registerSave.asp">

<p><span class="style1">
</span></p>
<table width="800" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="23" scope="col">หัวข้อการฝึกอบรม   <%=rs("nameCourseTH")%></td>
</tr>
<tr>
<th height="23" scope="col"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="40%" height="23" scope="col">วันที่อบรม   <%=formatdatetime(rs("dateCourseStart"),1)%></td>
<td width="20%" height="23" scope="col">เวลา   <%=formatdatetime(rs("timeCourseStart"),4)%> - <%=formatdatetime(rs("timeCourseStop"),4)%></td>
<td width="40%" height="23" scope="col">สถานที่   <%=rs("placeCourse")%></td>
</tr>
</table></th>
</tr>
<tr>
<td height="23" scope="col">วิทยากร   <%=rs("nameExpertness")%>   <%=rs("surnameExpertness")%></td>
</tr>
<tr>
<td height="23" scope="col">รายชื่อผู้เข้าอบรมสังกัด   <%=rs("section")%></td>
</tr>
</table>
<br>
<table width="800" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="23" scope="col">ส่วนที่ 1 : คลิกเพื่อเลือกรายชื่อพนักงานภายในแผนกของท่านที่ต้องการเข้ารับการอบรม </td>
</tr>
<tr>
<td height="23" scope="col"><blockquote>
<p>

<% Do While not rs.eof %>
<input type="checkbox" name="chack" value="<%=rs("id")%>"><%=rs("name")%> <%=rs("surname")%><br>
<%
rs.MoveNext
Loop
%>
</p>
</blockquote></td>
</tr>
<tr>
<td height="23" scope="col"> </td>
</tr>
</table>
<br>
<table width="800" border="0" cellspacing="0" cellpadding="0">
<tr>
<th scope="col">
<input type="submit" name="Submit" value=" ยืนยันส่งรายชื่อ ">
<input type="reset" name="Submit2" value=" ยกเลิกคำร้อง "></th>
</tr>
</table>
</form>
<p>  </p>
</div>
<%
rs.close
conn.close
set rs=nothing
set conn=nothing
%>

Date : 12 พ.ค. 2548 14:48:47

By : สงสารนู๋นะ

ค้นหาข้อมูล

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

Re : ช่วยด้วยค่ะ..งงมากเลย มัน error แบบนี้นะคะ Error Type: (0x80020009) Exception occurred.

รายละเอียด

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

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

Notice

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

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

โดย

อีเมล์

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

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

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

Load balance : Server 03