ปัญหาเกิดจากบรรทัดนี้ SELECT * FROM member ORDER BY id DESC LIMIT 35 นะค่ะถ้าใช้กับ mysql มันใช้ได้แต่ host ที่เช่าไม่ได้ติดตั้งให้ asp รัน mysql

<%

Dim Conn,strSQL,objRec
Set Conn = Server.Createobject("ADODB.Connection")
conn.open"driver={microsoft access driver (*.mdb)};dbq="&server.mappath("\xxx.mdb")&";password=xxx"

Set objRec = Server.CreateObject("ADODB.Recordset")
lastID = Request.QueryString("lastID")
action = Request.QueryString("action")
If action <> "getLastPosts" Then %>
	

<%strSQL = "SELECT * FROM member ORDER BY id DESC LIMIT 35 "
objRec.Open strSQL, Conn, 1,3

	While Not objRec.EOF
%>
		<div class="wrdLatest" id="<%=objRec("id")%>">
				<div class="xtop"><div class="xb1"></div><div class="xb2"></div><div class="xb3"></div><div class="xb4"></div></div>
				<div class="xboxcontent">
					<%=objRec("name")%>
				</div>
				<div class="xbottom"><div class="xb4"></div><div class="xb3"></div><div class="xb2"></div><div class="xb1"></div></div>
			</div>
<%
	objRec.MoveNext
	Wend
	objRec.Close
%>		<div id="lastPostsLoader">

<%	
Else
	'When User Scrolls This Query Is Run Start
	getPostsText = ""
	strSQL="SELECT * FROM member WHERE id < "&lastID&" ORDER BY id DESC LIMIT 15"
objRec.Open strSQL, Conn, 1,3
	While Not objRec.EOF

		getPostsText = getPostsText & "<div class=""wrdLatest"" id=""" & objRec("id") & """>"
		getPostsText = getPostsText & "<div class=""xtop""><div class=""xb1""></div><div class=""xb2""></div><div class=""xb3""></div><div class=""xb4""></div></div>"
		getPostsText = getPostsText & "<div class=""xboxcontent"">" & objRec("Name") & "</a></div>"
		getPostsText = getPostsText & "<div class=""xbottom""><div class=""xb4""></div><div class=""xb3""></div><div class=""xb2""></div><div class=""xb1""></div></div></div>"

	objRec.MoveNext
	Wend
	objRec.Close
	Response.Write getPostsText 'Writes The Result Of The Query
End If%>