<%
Set RsLast=Server.CreateObject("ADODB.Recordset")
SqlLast="Select * from ArticleJournal"
RsLast.Open SqlLast,Conn,1,3
RsLast.Movelast
response.Write(RsLast("article_id"))
%>
<% if RsChk.EOF then '<<< Error ตรงนี้ครับ
Set RsChk=Server.CreateObject("ADODB.Recordset")
SqlChk="Select * from tempartalter where temp_sessionid="& session.SessionID &""
RsChk.Open SqlChk,Conn,1,3