שלח תשובה

זירת השאלות

629
צפיות
9
תשובות

בעיה ב- ASP

,‏ 12 במרץ, 2005

חברה ניסיתי לבנות ספר אורחים ב- ASP ויש לינ כנראה בעיה עם קובץ ה- ASP עצמו… הנה דף ה- ASP:


<html dir="rtl">

<head>

<title>ספר האורחים</title>
</head>

<body>
<%
   Dim conn, rs, SQLstr
   Set conn = server.createobject("ADODB.connection")
   Set rs = server.createobject("ADODB.recordset")
   conn.open "Provider=Microsoft.Jet.OLEDB.4.0;
     Data source =" & Server.MapPath("book.mdb")
  
   SQLstr="INSERT Into book (name,mail,color,msn) VALUES ('"
   SQLstr = SQLstr & Request("name") & "','"
   SQLstr = SQLstr & Request("mail") & "','"
   SQLstr = SQLstr & Request("color") & "','"
   SQLstr = SQLstr & Request("msn") & "','"
  
  
   SQLstr="SELECT * FROM book"
   rs.open SQLstr,conn
   %>
<table border="8" width="100%" cellpadding="3" cellspacing="1" style="font-size:15px;">
<tr>
<td bgcolor=#0066FF text=res width="15%" class="bgcolor2"><font face=arial><center><b>שמי</b></td>
<td bgcolor=#0066FF text=res width="25%" class="bgcolor2"><font face=arial><center><b>המייל שלי</b></td>
<td bgcolor=#0066FF text=res width="60%" class="bgcolor2"><font face=arial><center><b>הודעת
המשתמש</b></td>
</tr>
  
   <%
    while not rs.eof
   %>
<tr>
<td bgcolor=#3399FF text=yellow width="15%%" class="bgcolor1"><font face=arial><b><center><%=rs("name")%></b></td>
<td bgcolor=#3399FF text=yellow width="25%%" class="bgcolor1"><font face=arial><b><center><font color=<%=rs("color")%>><%=rs("mail")%></font></b></td>
<td bgcolor=#3399FF text=yellow width="60%%" class="bgcolor1"><font face=arial><b><center><%=rs("msn")%></b></td>
</tr>

<%
   rs.movenext
  Loop


   conn.Close
   Set conn = Nothing

%>

</table>

</body>

</html>



והנה לינק: http://free.aspkit.com/Snir/book/shliha.htm

בבקשה תעזורו לי, תודה מראש….

תגיות:

9 תשובות

  1. MasterMind הגיב:

    ככה


    conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data source =" & Server.MapPath("book.mdb")

    פעם הבאה פשוט קרא את השגיאה שנוצרת

  2. SDSD הגיב:

    עדיין לא עובד ):
    אני לא יכוןל לראות הודעות שגיאה משום מה….. :
    ותיקנתי את זה וזה עדיין לא עובד.

  3. israpper הגיב:

    שתי דברים
    1. אם אתה שם ASP בדף ,אז תשמור אותו בסיומת ASP .
    2.הייתה לך שגיאה בהכנסה למסד ,לא סגרת אותו.
    הנה הקוד המתוקן:


    <html dir="rtl">

    <head>

    <title>ספר האורחים</title>
    </head>

    <body>
    <%
       Dim conn, rs, SQLstr
       Set conn = server.createobject("ADODB.connection")
       Set rs = server.createobject("ADODB.recordset")
       conn.open "Provider=Microsoft.Jet.OLEDB.4.0;
         Data source =" & Server.MapPath("book.mdb")
      
       SQLstr="INSERT Into book (name,mail,color,msn) VALUES ('"
       SQLstr = SQLstr & Request("name") & "','"
       SQLstr = SQLstr & Request("mail") & "','"
       SQLstr = SQLstr & Request("color") & "','"
       SQLstr= SQLstr & Request("msn") & "')"
      
      
       SQLstr="SELECT * FROM book"
       rs.open SQLstr,conn
       %>
    <table border="8" width="100%" cellpadding="3" cellspacing="1" style="font-size:15px;">
    <tr>
    <td bgcolor=#0066FF text=res width="15%" class="bgcolor2"><font face=arial><center><b>שמי</b></td>
    <td bgcolor=#0066FF text=res width="25%" class="bgcolor2"><font face=arial><center><b>המייל שלי</b></td>
    <td bgcolor=#0066FF text=res width="60%" class="bgcolor2"><font face=arial><center><b>הודעת
    המשתמש</b></td>
    </tr>
      
       <%
        while not rs.eof
       %>
    <tr>
    <td bgcolor=#3399FF text=yellow width="15%%" class="bgcolor1"><font face=arial><b><center><%=rs("name")%></b></td>
    <td bgcolor=#3399FF text=yellow width="25%%" class="bgcolor1"><font face=arial><b><center><font color=<%=rs("color")%>><%=rs("mail")%></font></b></td>
    <td bgcolor=#3399FF text=yellow width="60%%" class="bgcolor1"><font face=arial><b><center><%=rs("msn")%></b></td>
    </tr>

    <%
       rs.movenext
      Loop

       conn.Close
       Set conn = Nothing

    %>

    </table>

    </body>

    </html>

  4. SDSD הגיב:

    עדיין יש בעיה…
    הנה הקוד ASP לאחר שתי התיקונים:


    <html dir="rtl">

    <head>

    <title>ספר האורחים</title>
    </head>

    <body>
    <%
       Dim conn, rs, SQLstr
       Set conn = server.createobject("ADODB.connection")
       Set rs = server.createobject("ADODB.recordset")
       conn.open "Provider=Microsoft.Jet.OLEDB.4.0;
       Data source =" & Server.MapPath("book.mdb")
      
       SQLstr="INSERT Into book (name,mail,color,msn) VALUES ('"
       SQLstr = SQLstr & Request("name") & "','"
       SQLstr = SQLstr & Request("mail") & "','"
       SQLstr = SQLstr & Request("color") & "','"
       SQLstr = SQLstr & Request("msn") & "')"
      
      
       SQLstr="SELECT * FROM book"
       rs.open SQLstr,conn
       %>
    <table border="8" width="100%" cellpadding="3" cellspacing="1" style="font-size:15px;">
    <tr>
    <td bgcolor=#0066FF text=res width="15%" class="bgcolor2"><font face=arial><center><b>שמי</b></td>
    <td bgcolor=#0066FF text=res width="25%" class="bgcolor2"><font face=arial><center><b>המייל שלי</b></td>
    <td bgcolor=#0066FF text=res width="60%" class="bgcolor2"><font face=arial><center><b>הודעת
    המשתמש</b></td>
    </tr>
      
       <%
        while not rs.eof
       %>
    <tr>
    <td bgcolor=#3399FF text=yellow width="15%%" class="bgcolor1"><font face=arial><b><center><%=rs("name")%></b></td>
    <td bgcolor=#3399FF text=yellow width="25%%" class="bgcolor1"><font face=arial><b><center><font color=<%=rs("color")%>><%=rs("mail")%></font></b></td>
    <td bgcolor=#3399FF text=yellow width="60%%" class="bgcolor1"><font face=arial><b><center><%=rs("msn")%></b></td>
    </tr>

    <%
       rs.movenext
      Loop

       conn.Close
       Set conn = Nothing

    %>

    </table>

    </body>

    </html>

    נ.ב
    כשאני נכנס לדף השגוי זה לא מראה לי שגיאת ASP… אם זה מראה לכם שגיאת ASP תכתבו לי אותה פה… תודה מראש…

  5. אוהד19 הגיב:

    אתה לא יכול רדת שורה באמצע משפט


    conn.open "Provider=Microsoft.Jet.OLEDB.4.0; Data source =" & Server.MapPath("book.mdb")

    או

    conn.open "Provider=Microsoft.Jet.OLEDB.4.0;" &_
    Data source =" &Server.MapPath("book.mdb")

  6. SDSD הגיב:

    בעיה ב- ASP – שליפת נתונים
    בעעע זה קוד מה זה בסיסי אבל יותר משנה לא תיכנתתי ושחכתי הרבה… הקיצר מה לאזעזל לא טוב פה:


    <%
       Dim conn, rs, SQLstr
       Set conn = Server.CreateObject("ADODB.connection")
       Set rs = Server.CreateObject("ADODB.recordset")
       conn.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source =" & Server.MapPath("fic.mdb")
      
       SQLstr="SELECT * FROM fic"
       rs.Open SQLstr, conn
       do while not rs.eof
      
    %>
    <%rs("perek")%>

    <%
    rs.movenext
    Loop

    rs.close
    Set rs = Nothing
    %>

  7. SDSD הגיב:

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

שלח תשובה