יותר מדויק הטקסט counter

פורסם ב 4 במרץ, 2009 ב-ASP על ידי Admin

זה מדויק יותר מאשר נגד שלנו לדוגמה הקודמת, בדוגמה זו של ספירת incremented מקבלת רק פעם אחת לכל מושב. פירוש הדבר יהיה לספור את מדויק יותר, אם אתה רוצה שזה יהיה זה.

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

בדוגמה מתחת counter.txt ממוקם באזור באותה ספרייה כמו בדף זה, אם אתה שם את הקובץ במקום אחר txt זכור Server.MapPath וכן לשנות את החלק של הקוד.

מספר מבקרים

<%
'צור FileSystemObject
בחר objFSO = CreateObject ( "Scripting.FileSystemObject")
'זה הוא הנתיב שלנו נגד הקובץ
CounterFile = Server.MapPath ( "counter.txt")
בחר objCount = objFSO.OpenTextFile (CounterFile)
visitorcount = CLng (objCount.ReadLine)
אם מושב ( "visitorcount") = "" אז
מושב ( "visitorcount") = visitorcount
visitorcount = visitorcount + 1
objCount.close
בחר objCount = objFSO.CreateTextFile ( "counter.txt", אמיתי)
objCount.WriteLine (visitorcount)
End If
objCount.Close
'המוצגים לספור
Response.Write visitorcount
%>

הודעות קשורות:

  1. טקסט מונה כעת ליצור תיקייה הנקראת מונים או אתה יכול לקרוא ...
  2. הצגת קובץ CSV הצגת קובץ CSV-CSV הם פורמטים נפוצים ל ...
  3. משתמשים פעילים ב-ASP קוד זה מראה כיצד קטע להראות כמה פעיל ...
  4. aspactiveusers פיסת קוד זה מראה כיצד להציג כמה פעילים ...
  5. שומר קובץ CSV למסד נתונים צור מסד נתונים ב-Access קרא stock.mdb. כעת, צור ...

הודעות קשורות הביא לך עוד הודעות קשורות Plugin.

שליחת תגובה