[barakdr]

אני מתחיל ב aod ו asp ניסתי לעשות משהו וקיבלתי שגיאה ממש מוזרה..
אחרי כמה בדיקות גילתי שהקוד שגרם לזה הוא

Server Error
The following error occurred:
[code=SERVER_RESPONSE_RESET] The server response could not be read because of an error. Contact your system administrator.

sql="select ARTIC.Atite,ARTIC.Alitetitle,ARTIC.Apic,ARTIC.id,ARTIC.catid from artic WHERE artic.arch<>1 AND artic.big=1 order by id desc"
set rb=Server.CreateObject("ADODB.Recordset")
rb.open sql,conn,3,1
if rb.eof then
Articbig="אין כתבות באתר"
else
set rb2=Server.CreateObject("ADODB.Recordset")
while not rb.eof
sql="select ARTICAT.catname from ARTICAT WHERE ARTICAT.id="&rb.fields("catid")&""
rb2.open sql,conn,3,1
Articat=rb2.fields("catname")
rb2.close
Articbig=Articbig+"<table style=""width:364px;float:left;"" border=""0"" cellspacing=""0"" cellpadding=""0"" background=""image/articlebg.gif"">"&vbcrlf
Articbig=Articbig+"  <tr>"&vbcrlf
Articbig=Articbig+"<td cellspacing=""0"" cellpadding=""0"" width=""11"" rowspan=""3""><img src=""image/articleright.gif""></td></tr><td style=""width:76px;height:72px;vertical-align:auto;padding: 5px"" rowspan=""2""><img src="""&rb.fields("Apic")&""" style=""width:76px;height:72px;"" alt="""&rb.fields("Atite")&""" /></div></td>"&vbcrlf
Articbig=Articbig+"    <td width=""353"" class=""ArticalMainTitle""><a href=""article/read.asp?ArticleId="&rb.fields("id")&""" class=""ArticalMainTitleLink"">"&rb.fields("Atite")&"</a></td>"&vbcrlf
Articbig=Articbig+"  "&vbcrlf
Articbig=Articbig+"  <tr><td width=""353"" class=""ArticalMainDesc""><a href=""article/read.asp?ArticleId="&rb.fields("id")&""" class=""ArticalMainDescLink"">"&rb.fields("Alitetitle")&"</a></td></tr>"&vbcrlf
Artic=bigArticbig+"</div></table>"&vbcrlf
wend
end if
rb.close

עכשיו בעיה נוספת שהיתה לי בעמוד אחר

זו השגיאה:

Microsoft VBScript compilation  error '800a0401'

Expected end of statement

/mytarnew/admininterface/article/article.asp, line 182

sql="update ARTIC set ARTIC.big="0" where ARTIC.id="&id&"
---------------------------------^

וזה הקוד

<%
if type1="update" then
id=request.QueryString("id")
if id<>"" then
if request.form("biga")="0" then
sql="update ARTIC set ARTIC.big="0" where ARTIC.id="&id&"
if request.form("biga")="1" then
sql="update ARTIC set ARTIC.big="1" where ARTIC.id="&id&""
end if
end if
%>

תודה רבה מראש.
טוב בגלל שראיתי שהקוד מסובל צירפתי בפינקס רשימות: