מספר בעיות ב aod\asp

[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
%>

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

[eLad]

במידה והשדה big מוגדר כמספר אז:

sql="UPDATE artic SET artic.big=0 WHERE artic.id=" & id

במידה והשדה big מוגדר כמחרוזת:

sql="UPDATE artic SET artic.big='0' WHERE artic.id=" & id

ולצורך נוחות עדיף להגדיל את המילים בתחביר ה SQL..

[barakdr]

נכתב במקור על ידי eLad

במידה והשדה big מוגדר כמספר אז:

sql="UPDATE artic SET artic.big=0 WHERE artic.id=" & id

במידה והשדה big מוגדר כמחרוזת:

sql="UPDATE artic SET artic.big='0' WHERE artic.id=" & id

ולצורך נוחות עדיף להגדיל את המילים בתחביר ה SQL..

אוקי תודה רבה!
וצירפתי פנקסי רשימות מטעמי נוחות.

[eLad]

נכתב במקור על ידי barakdr

אוקי תודה רבה!
וצירפתי פנקסי רשימות מטעמי נוחות.

הסתדרת?

[barakdr]

נכתב במקור על ידי eLad

הסתדרת?

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

[eLad]

לא שמתי לב בכלל שיש בעיה ראשונה..

בכל מקרה, אתה מריץ את זה על שרת שכנראה חסם שגיאות. תריץ את זה במקום אחר או בקש מהם לבטל את המוד הזה. אני לא אעבור לך על שורות קוד בלי לדעת מה השגיאה, סורי

[barakdr]

טוב הסתדריתי תודה רבה לכולם.