שלח תשובה

זירת השאלות

339
צפיות
18
תשובות

Counter Code

,‏ 8 ביולי, 2004

בניתי איזה קוד קטן ל COUNTER אבל אני לא בטוח שזו הדרך הנכונה:

<%
SQL = "SELECT hits FROM counterTBL"
Set rs = Server.CreateObject("ADODB.RecordSet")

rs.Open SQL,DSN,3,1

theHits = rs("theHits")

rs.close
set rs = Nothing

theHits = theHits + 1

set con = server.CreateObject("ADODB.Connection")
con.Open DSN
SQL = "UPDATE counter SET theHits=’" & hits & "’ WHERE id=1"

con.Execute SQL

con.close
set con = Nothing
%>


זה עובד טוב אבל אני לא יודע אם אפשר לכתוב את זה אפילו יותר טוב.

תודה –
פפר

תגיות:

18 תשובות

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

    אפשר


    set con = server.CreateObject("ADODB.Connection")
    con.Open DSN
    SQL = "UPDATE counter SET theHits=theHits+1 WHERE id=1"

    con.Execute SQL
    con.close
    set con = Nothing

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

    נסה
    נראה לי שזה מספיק
    (אבל אני לא בטוח )

  3. mynameispepper הגיב:

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

    א. איך סופרים את מספר הרשומות מבסיס נתונים?
    ב. האם אני צריך לפתוח ולסגור את החיבור כמה פעמים?

    תודה

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

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

    SELECT COUNT(<fieldId>) AS cntRec FROM <tbl>

    אם אתה שולף את כל הרשומות בעמוד אחד אז אפשר ברמת ה-ADO ע"י
    rs.RecordCount
    או אם אתה משתמש ב-getRows אז עושים

    uBound(recArray,2)

    ( הדוגמא ב-VBS)

    ואז לא צריך להתשמש בפתיחה נוספת של רקורדסט

  5. mynameispepper הגיב:

    בעייה רצינית עם טבלת קטגוריות..
    יש לי בסיס נתונים לקטגוריות שמכיל ID ו NAME.

    בבסיס הנתונים של המוצרים יש ID, NAME ו CATEGORY_ID

    הבעייה היא שאם אני רוצה למחוק קטגוריה שלא קיימת יותר אז כל המוצרים שהקטגוריה הזו משוייכת אליהם יהיו חסרי קטגוריה. מה עושים?!

    תודה –
    פפר

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

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

    אן לא הבנת למה אני מתכוון כנס למאמר שלי במדור SQL על קשרי גומלין

  7. Just-Tal הגיב:

    מה יותר קל מ:
    ADO הכי פשוט לדעתי!

    set Conn=Server.CreateObject("ADODB.connection")
    Set SRs=Server.CreateObject("ADODB.Recordset")

    ConnString="DBQ=" & Server.Mappath("forum.mdb")& ";Driver={Microsoft Access Driver (*.mdb)};"
    Conn.Open ConnString

    SQLs = "select count from pages where page_id=1"
    SRs.open SQLs, Conn

    SRs.fields("enters") = SRs.fields("enters") +1

    SRs.close
    set SRs = Nothing
    Conn.close
    set Conn = Nothing

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

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

  9. Just-Tal הגיב:

    אני משתמש רק עם ADO…
    הכי נוח לי,
    בניתי פורום שלם רק עם ADO…

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

    כיצד אני עושה זאת והיכן?

  10. mynameispepper הגיב:

    בשאלה שלי יותר ברמת הקונספט מאשר
    ברמת הקוד…

    הבעייה שלי היא שאני לא מבין מה יקרה למוצרים עם ID של הקטגוריה שנמחקה.
    מה לעשות איתם?

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

    אם יש לך קשרי גומלין
    כמו שצריך אז הם ימחקו אוטומטית ברגע שתמחוק את הקטגוריה שלהם

  12. BuildHome הגיב:

    אתה יכול להכין
    מיני-אתר…כמה עמודים כאלה..
    עמוד אחד זה עמוד בית, מידע, הורדה, דמו וכ’ו… או לעשות עמוד הורדה בלבד.

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

    סתם ש-just-tal יעשה מעין אתר
    קטן שיהיה בו את ההורדה של המערכת

שלח תשובה