560
צפיות
צפיות
6
תשובות
תשובות
בעיה בקוד ASP שמציג מידע מDB
הקוד שלי הוא:
<%
Dim Conn, rs, SQL,id
id=Request.QueryString("id")
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
Server.MapPath("site.mdb")
Set rs = Server.CreateObject("ADODB.RecordSet")
SQL = "Select * from catalog where id=" & id
rs.Open SQL, Conn
If rs.EOF Then
response.write "no text in db"
Else
%>
ומשום מה אני מקבל הודעה:
error '80004005'
Unspecified error
details.asp, line 57
line 57 אצלי זה:
rs.Open SQL, Conn
למה השגיאה ואיך לתקן אותה-מישהו יכול לעזור?
תודה מראש
6 תשובות
עריכה של טעות בהודעה הראשונה
עריכה:
טעיתי,שורה 57 היא:
If rs.EOF Then
והקוד שבא אח"כ יחד עם השורה הוא:
If rs.EOF Then
response.write "no text in db"
Else
%>
If rs.EOF Then
response.write "no text in db"
Else
קודם כל אני לא רואה סגירה של הIF
שנית הrecordset של מיותר!!!
תוריד אותו.
<%
Dim Conn, rs, SQL,id
id=Request.QueryString("id")
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
Server.MapPath("site.mdb")
SQL = "Select * from catalog where id=" & id
Set rs = con.Execute(SQL)
If rs.EOF and rs.BOF Then
ponse.write "no text in db"
Else
ponse.write "blabla"
end if
%>
זה אמור להיות if rs.oef or rs.bof
לא
כי אז ייתכן שקיימת לפחות רשומה אחת
יש אחרי ה ELSE וסגירת ה קוד ASP יש
HTML שבו אני מדפיס תנותים מהטבלה ואז יש עוד קוד ASP שבו אני סוגר תמשפט תנאי ואת החיבור
למה אין עריכה??? בכל מקרה:
אני שינתי קצת תקוד ואת הקוד הזה שמתחבר ל DB אני סמתי בהתחלה לפני ה<HTML>
ועכשיו הוא אומר שיש לו אותה שגיאה אבל בשורה 10 ושורה 10 היא:
rs.Open SQL, Conn
מישהו יודע מה הבעיה?
תודה מראש