שלח תשובה

זירת השאלות

329
צפיות
12
תשובות

שאלות…

,‏ 23 באוגוסט, 2004


היי,
יש לי מספר שאלות:

א. מישהוא יודע איך  עושים טבלה שכאשר עוברים עם העכבר על מילה שבה אוטומטית היא נפתחת לעוד מצד שמאל

ב. איך נותנים אפשרות של הדפסה

תודה ויום טוב!.

תגיות:

12 תשובות

  1. אוריקס הגיב:

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

    2.
    שים את זה בתוך בלוק סקריפט:

    print();

  2. yaell הגיב:

    הודעת שגיאה
    היי

    אני מנסה לעשות טבלה שנפתחת לתתי נושאים באופן דינמי
    ואני מקבלת את השגיאה הבאה:
    Error Type:
    ADODB.Recordset (0x800A0E79)
    ‏‏הפעולה אינה מותרת כאשר האובייקט פתוח.
    /Project7/testing.asp, line 48

    יש למישהו מושג מה הבעיה?
    הקוד שלי הוא

    :


    <HTML>
    <HEAD><LINK rel="stylesheet" type="text/css" href="yy.css">
    <TITLE> New Document </TITLE>
    <SCRIPT LANGUAGE="JavaScript">
    <!–
        function showDiv(d_id)
        {
            d_id.style.display = d_id.style.display == "none" ? "" : "none"
        }
    //–>
    </SCRIPT>
    </HEAD>

    <BODY>

    <%
    dim id_chapter
    id_chapter=1
    dim conn
    Db_Conn_Str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("db2.mdb") & ";"
    Set conn = Server.CreateObject("ADODB.Connection")
    conn.Open Db_Conn_Str

    dim rs1,sql1
    set rs1=Server.CreateObject("ADODB.recordset")

    'dim conn1
    'Db_Conn_Str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("login.mdb") & ";"
    'Set conn1 = Server.CreateObject("ADODB.Connection")
    'conn1.Open Db_Conn_Str

    dim rs,sql
    set rs=Server.CreateObject("ADODB.recordset")

    sql1="select * from tblLots "
    rs1.Open sql1, conn,3                'may change like allow
    Do while not rs1.EOF%>
    <span style="cursor:hand" onClick="javascript:showDiv(d_<%=rs1("UID")%>)"><%=rs1("strDescription")%></span>
    <Div style="display:none" id="d_<%=rs1("UID")%>">
    <%

    id_chapter=rs1("UID")

    sql="select * from tblChapters where ParentId="&id_chapter
    rs.Open sql, conn,3          
    do while not rs.EOF
    Response.Write "< align=right><A HREF="& "sub_chapters.asp?id_subchapter="&rs("UID")&">"
    Response.Write rs("strDescription")& "</A>"
    rs.MoveNext
    loop

    %>

    </div>
    <%
    Response.Write "<BR>"
    rs1.MoveNext
    Loop
    %>

    <%
    rs.Close
    set rs=nothing
    rs1.Close
    set rs1=nothing
    'conn1.Close
    'set conn1=nothing
    conn.Close
    set conn=nothing
    %>

    </BODY>
    </HTML>

    יום נעים
    יעל

  3. eLisHa הגיב:

    אם אני מבין נכון…
    המסד נתונים פתוח.
    תסגרי אותו וזה אמור להיפתר

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

    אז כך
    בגלל שאני כרגע על מוזילה אז אני לא רואה טוב את הקוד
    אבל הודעת השגיאה אומרת שאתה מנסה לפתוח רקורדסט (עם השיטה OPEN) כאשר הוא כבר פתוח

  5. yaell הגיב:

    האם מותר?

    היי,
    בקוד אני פותחת פעמיים רקורדסט זה מותר לא?

    פעם אחת:
    rs1.Open sql1, conn,3
    פעם שניה:
    rs.Open sql, conn,3

    ואם אי אפשר איך מתמודדים עם זה?

    תודה על העזרה- לפחות יש לי כיוון עכשיו
    יעל

  6. זהר פלד הגיב:

    זה הולך ככה:
    מותר לפתוח מספר אובייקטים של recordset באותו דף (למרות שזה לרוב מיותר זה לא אמור לגרום לשום שגיאה), או לחילופין לפתוח אובייקט recordset אחד, לסגור אותו, ואז לפתוח אותו מחדש (עם שאילתה אחרת).
    אסור לנסות לפתוח אובייקט recordset שכבר פתוח.

  7. yaell הגיב:

    עד שחשבתי שמצאתי את הטעות…

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

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

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

  9. yaell הגיב:

    עוד בעיה

    היי,
    יש לי עוד בעיה. יש לי 2 טבלאות בACCESS של נושאים ותתי נושאים וכל פעם שלוחצים על נושא דינמית זה פותח לי תתי נושא שמתאימים לו
    עכשיו אני מנסה להוסיף עוד טבלה של תת תתי נושא ויש לי  בעיה עם זה המחשב מודיע לי
    "אירעה שגיאת זמן ריצה השגיאה: "style ריק או שאינו אובייקט"
    הטעות בשורה 7 שזה הגדרת הסקריפט
    אני ממש לא מבינה גאווה סקריפט והגיוני שעשיתי משהו שאסור לכן אודה לכן אם תעזרו לי לפתור את זה

    תודה ויום נעים
    הקוד|
    <HTML>
    <HEAD><LINK rel="stylesheet" type="text/css" href="yy.css">
    <TITLE> New Document </TITLE>
    <SCRIPT LANGUAGE="JavaScript">
    <!–
        function showDiv(d_id)
        {
            d_id.style.display = d_id.style.display == "none" ? "" : "none"
        }
    //–>

    </SCRIPT>
    </HEAD>

    <BODY>

    <%
    dim id_chapter
    id_chapter=1
    dim id_Subchapter
    id_Subchapter=1
    dim conn
    Db_Conn_Str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("db2.mdb") & ";"
    Set conn = Server.CreateObject("ADODB.Connection")
    conn.Open Db_Conn_Str

    dim rs1,sql1
    set rs1=Server.CreateObject("ADODB.recordset")

    'dim conn1
    'Db_Conn_Str = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("login.mdb") & ";"
    'Set conn1 = Server.CreateObject("ADODB.Connection")
    'conn1.Open Db_Conn_Str

    dim rs,sql
    dim rs2,sql2
    'set rs=Server.CreateObject("ADODB.recordset")

    sql1="select * from tblLots "
    rs1.Open sql1, conn                'may change like allow
    Do while not rs1.EOF%>
    <span style="cursor:hand" onClick="javascript:showDiv(d_<%=rs1("UID")%>)"><%=rs1("strDescription")%></span>
    <Div style="display:none" id="d_<%=rs1("UID")%>">
    <%
    set rs=Server.CreateObject("ADODB.recordset")
    id_chapter=rs1("UID")
    sql="select * from tblChapters where ParentId="&id_chapter
    rs.Open sql, conn          
    do while not rs.EOF%>
    <span style="cursor:hand" onClick="javascript:showDiv(d_<%=rs("UID")%>)"><%=rs("strDescription")%></span>
    <Div style="display:none" id="d_<%=rs("UID")%>">
    <%
    set rs2=Server.CreateObject("ADODB.recordset")
    id_Subchapter=rs("UID")
    sql2="select * from tblSubChapters where ParentId="&id_Subchapter
    rs2.Open sql2, conn          
    do while not rs2.EOF
    Response.Write "<A HREF="& "sub_chapters.asp?id_subchapter="&rs("UID")&">"
    Response.Write rs2("strDescription")& "</A>"
    Response.Write "<BR>"
    rs2.MoveNext
    loop
    Response.Write "<BR>"
    rs2.Close
    set rs2=nothing

    %>
    </div>
    <%
    Response.Write "<BR>"
    rs.MoveNext
    loop
    rs.Close
    set rs=nothing
    %>
    </div>
    <%
    Response.Write "<BR>"
    rs1.MoveNext
    Loop
    rs1.Close
    set rs1=nothing
    'conn1.Close
    'set conn1=nothing
    conn.Close
    set conn=nothing
    %>

    </BODY>
    </HTML>

    |

שלח תשובה