שלח תשובה

זירת השאלות

308
צפיות
11
תשובות

האם החיבור הזה תקין?

,‏ 29 במאי, 2004

עשיתי חיבור למסד נתונים – אבל הוא לא מציג לי את הטבלה… זה החיבור:

<%
dim conn
set conn=server.createobject("ADODB.connection")

dim connstring
connstring = "provider=microsoft.jet.oledb.4.0; data source=" &
server.MapPath("bookstore.mdb")

conn.open connstring

dim rs, sql
set rs=server.createobject("ADODB.recordset")
sql="select * from books order by book_id"
rs.Open sql, conn

if rs.EOF =true and rs.BOF=true then
Response.Write "<center>אין ספרים כרגע ברשימה"
end if

Response.Write "<center><table border=1 cellpadding=2 BGCOLOR=Yellow>"
do while not rs.EOF

Response.Write "<tr>"
Response.Write "<td align=right>" & formatcurrency(rs("price")) & "</td>"
Response.Write "<td align=right>" & rs("author") & "</td>"
Response.Write "<td align=right>" & rs("title") & "</td>"
Response.Write "</tr>"
  

rs.MoveNext
loop

Response.Write "</center></table>"

rs.close
set rs=nothing
conn.Close
set conn=nothing
%>

הוא תקין?
כתבתי את זה לפני תחילת דך הדף הרגיל כשבראש הדף כתבתי את השפה שאני משתמש

תגיות:

11 תשובות

  1. למה אולי?
    לא ראיתי שאלות שלא קיבלו כאן מענה

    בכל אופן – כמו שעומר אמר, יישר נא את הקוד לשמאל בעזרת הכפתור שלייד הסמיילי, ותביא רק את הקוד הרלוונטי לבעיה שלך עם פירוט מה בדיוק הבעיה.

  2. shabup הגיב:

    הנה

    ישרתי לשמאל… והנה הבעיה שלי:
    אני רוצה לעשות חיבור למסד נתונים, יש לי מסד ואני רוצה להציג את תוכנו בדף… זה הדף(הקוד למטה)  שמסמל את החיבור למסד

    אבל הוא לא מחבר לי אותו למסד… בדף המיועד הוא לא מציג כלום… מה אני צריך לעשות? אני החיבור תקין?


    <%
    dim conn
    set conn=server.createobject("ADODB.connection")

    dim connstring
    connstring = "provider=microsoft.jet.oledb.4.0; data source=" &
    server.MapPath("bookstore.mdb")

    conn.open connstring

    dim rs, sql
    set rs=server.createobject("ADODB.recordset")
    sql="select * from books order by book_id"
    rs.Open sql, conn

    if rs.EOF =true and rs.BOF=true then
    Response.Write "<center>אין ספרים כרגע ברשימה"
    end if

    Response.Write "<center><table border=1 cellpadding=2 BGCOLOR=Yellow>"
    do while not rs.EOF

    Response.Write "<tr>"
    Response.Write "<td align=right>" & formatcurrency(rs("price")) & "</td>"
    Response.Write "<td align=right>" & rs("author") & "</td>"
    Response.Write "<td align=right>" & rs("title") & "</td>"
    Response.Write "</tr>"
      

    rs.MoveNext
    loop

    Response.Write "</center></table>"

    rs.close
    set rs=nothing
    conn.Close
    set conn=nothing
    %>

  3. Cyc הגיב:

    הבעיה היא בצורת הגישה לטבלאות
    אני חושב שהבעיה שלך נמצאת בשורה בה אתה ניגש לעמודות בטבלה,
    אתה צריך להשתמש ב- rs.fields("שם השדה")
    ולא כמו אצלך – rs("שם השדה")

  4. Cyc הגיב:

    תיקון טעות
    מצטער, מה שכתבתי לא נכון זה עובד בשני המקרים.
    SORRY

  5. Cyc הגיב:

    החיבור תקין
    הוא עובד,
    בעיות אפשריות הם טעויות בכתיב של שמות העמודות בטבלה,אין נתונים בטבלה
    ואם השורה הזו

    connstring = "provider=microsoft.jet.oledb.4.0; data source=" &
    server.MapPath("bookstore.mdb")


    באה בשתי שורות ולא אחת .
    מקווה שזה עוזר

  6. shabup הגיב:

    לא…
    הוא עדיין לא עובד…
    אפילו שעשיתי הכל באותה השורה….
    אולי אני צריך לתת הרשאה או משהו… כי זה באותה תיקיה אז אני לא יודע מה לעשות… (המסד נתונים באותה תיקיה של הקבצים…)

  7. ניר טייב הגיב:

    מה השגיאה?
    ללא השגיאה לא נוכל לעזור לך כמו שאתה רוצה

  8. shabup הגיב:

    פשוט…
    הוא פשוט לא מציג לי את הטבלה…

  9. shabup הגיב:

    וואיי…
    אני אובד עצות.. בבקשה תעזרו לי…

שלח תשובה