הוסטס - פורום אחסון האתרים הגדול בישראל

- פורום תיכנות (https://hosts.co.il/forums/forumdisplay.php?f=14)

- - מספר בעיות ב aod\asp (https://hosts.co.il/forums/showthread.php?t=18974)

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

אני מתחיל ב 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

%>

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

במידה והשדה 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

במידה והשדה 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

הסתדרת? |קורץ|

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

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

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

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