السلام عليكم :
الصفحة عبارة عن سجل زوار واردت ربطه بقاعدة البيانات لعرض التواقيع الموجودة
الخطأ كما يلي :
اقتباسنوع الخطأ:خطأ أثناء وقت التشغيل في Microsoft VBScript (0x800A01A8)
مطلوب كائن (Object): ''
/news/view_book.asp, line 9
نوع المستعرض:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322)
الصفحة:
GET /news/view_book.asp
كود ASP :
<%@ Language=VBScript CodePage = "1256"%>
<html dir=rtl>
<!--#include file="pageheader.txt" -->
<p align="center"><font face="Simplified Arabic"> مرحبا بكم في
سجل الزوار.. وملاحظاتكم تسعدنا </font></p>
<!--#include file="pageheader.txt" -->
<%
selectSQL="select * from guest_book order by add_dat desc"
set rs=ADO.execute(selectSQL)
do while not rs.eof %>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse"
bordercolor="#111111" width="90%">
<tr>
<td width="100%" dir="rtl" bgcolor="#DFDFFF"><b> التاریخ : <%response.write
rs("add_dat")%></b></td>
</tr>
<tr>
<td width="100%" dir="rtl" bgcolor="#ECECFF"><b> الاسم : <a
href="mailto:<%response.write rs("email")%>"><%response.write
rs("name")%></a></b></td>
</tr>
<tr>
<td width="100%" dir="rtl" bgcolor="#DFDFFF"><b> الموقع الشخصي : <a
href="<%response.write rs("website")%>"><%response.write
rs("website")%></a></b></td>
</tr>
<tr>
<td width="100%" dir="rtl" bgcolor="#ECECFF"><b> طریقة
الاستدلال على الموقع : <%response.write rs("link")%></b></td>
</tr>
<tr>
<td width="100%" dir="rtl" bgcolor="#DFDFFF"><b> الموقع تقییم : <%response.write
rs("ranking")%></b></td>
</tr>
<tr>
<td width="100%" dir="rtl"><b> التعلیق : <%response.write rs("comment")%></b></td>
</tr>
</table>
</center>
</div>
<hr color="#DFDFFF" width="90%">
<%
rs.movenext
loop
ADO.close
%>
<!--#include file="pagefooter.txt" -->