טקסט מונה
כעת צור תיקייה הנקראת מונים או אתה יכול לקרוא לזה משהו אחר אם אתה רוצה רק לזכור, ולשנות את הקוד לעיל. עכשיו ליצור קובץ טקסט בשם counter1.txt והזן מה אתה רוצה להתחיל לספור את ב.
<% @ Language = VBScript%>
<%
דים fso
בחר fso = Server.CreateObject ( "Scripting.FileSystemObject")
/ / זה את הנתיב אל הקובץ שלך counter1.txt
מונה = Server.MapPath ( "/ מונים") & "\ counter1.txt"
/ / פתיחת קובץ טקסט
בחר InStream = fso.OpenTextFile (counter, 1, FALSE)
oldCount = Trim (InStream.ReadLine)
/ / להגדיל את oldcount ע"י 1 ו חנות newcount
newCount = oldCount + 1
בחר OutStream = fso.CreateTextFile (מונה, נכון)
/ / newcount כדי להעתיק את קובץ הטקסט
OutStream.WriteLine (newCount)
%>
עכשיו אתה מעוניין folllowing את המקום שבו אתה רוצה את מונה להופיע באתר שלך
<% = NewCount%>
הודעות קשורות:
- יותר מדויק טקסט מונה זה מונה מדויק יותר מאשר בדוגמה הקודמת שלנו ...
- הצגת קובץ CSV הצגת קובץ CSV-CSV הם פורמטים נפוצים ל ...
- שומר קובץ CSV למסד נתונים צור מסד נתונים ב-Access קרא stock.mdb. כעת, צור ...
- rndimage1 זה פשוט סקריפט תמונה אקראית בה הוא אידיאלי ...
- טקסט כתוב לקובץ דוגמה זו משתמשת זרמים לכתוב לקובץ טקסט ...
הודעות קשורות הביא לך עוד הודעות קשורות Plugin.
שליחת תגובה