Programmingsite tutorials

अब एक फोल्डर बना काउंटरों बुलाया है या आप इसे कुछ और अगर तुम सिर्फ याद और कोड के ऊपर परिवर्तन चाहते फोन कर सकते हैं. अब एक पाठ फ़ाइल counter1.txt बुलाया और जो तुम पर गिनती शुरू करने के लिए इच्छा दर्ज बनाएँ.

भाषा @ <% = VBScript%>
<%
मंद fso
सेट fso = Server.CreateObject ( "Scripting.FileSystemObject")
/ / यह आपकी counter1.txt फाइल करने के लिए रास्ता है
काउंटर = Server.MapPath ( "/ काउंटरों") & "\ counter1.txt"
/ / पाठ फ़ाइल खोलने
सेट InStream = fso.OpenTextFile (1, झूठा) काउंटर
oldCount = छाँटो (InStream.ReadLine)
/ / वेतन वृद्धि में 1 और दुकान से oldcount newcount
newCount = oldCount + 1
सेट OutStream = fso.CreateTextFile (काउंटर, यह सच है)
/ / मूल पाठ इस प्रकार की फ़ाइल newcount प्रतिलिपि
OutStream.WriteLine (newCount)
%>

अब तुम folllowing जहाँ आप अपनी साइट पर प्रदर्शित करने के लिए काउंटर चाहते जगह होगी

<% = NewCount%>

बुकमार्क यह

छिपाएँ साइटें

संबंधित पोस्ट:

1. अधिक सटीक पाठ यह हमारे पिछले उदाहरण के अलावा एक और अधिक सटीक काउंटर है काउंटर ...
2. प्रदर्शन प्रदर्शन सीऍसवी CSV फाइल करने के लिए प्रारूप आम हैं एक CSV फ़ाइल फ़ाइल एक ...
3. सहेजा जा रहा है एक डेटाबेस के लिए एक CSV फ़ाइल stock.mdb फोन का उपयोग में एक डेटाबेस बनाएँ. अब बनाने ...
4. rndimage1 यह आदर्श है जो एक साधारण यादृच्छिक छवि स्क्रिप्ट है ...
5. लिखें पाठ एक उदाहरण यह फाइल करने के लिए एक फ़ाइल को पाठ लिखने के लिए धाराओं का उपयोग करता है ...

संबंधित पोस्ट करने के लिए आप फिर भी के द्वारा एक अन्य संबंधित Plugin डाक लाया.