<%
'Dimension variables
Dim fsoObject 'File System Object
Dim tsObject 'Text Stream Object
Dim filObject 'File Object
Dim lngVisitorNumber 'Holds the visitor number
Dim intWriteDigitLoopCount 'Loop counter to display the graphical hit count
'Create a File System Object variable
Set fsoObject = Server.CreateObject("Scripting.FileSystemObject")
'Initialise a File Object with the path and name of text file to open
Set filObject = fsoObject.GetFile(Server.MapPath("\site name\hit_count.txt"))
'Open the visitor counter text file
Set tsObject = filObject.OpenAsTextStream
'Read in the visitor number from the visitor counter file
lngVisitorNumber = CLng(tsObject.ReadAll)
'Increment the visitor counter number by 1
lngVisitorNumber = lngVisitorNumber + 1
'Create a new visitor counter text file over writing the previous one
Set tsObject = fsoObject.CreateTextFile(Server.MapPath("\site name\hit_count.txt"))
'Write the new visitor number to the text file
tsObject.Write CStr(lngVisitorNumber)
'Reset server objects
Set fsoObject = Nothing
Set tsObject = Nothing
Set filObject = Nothing
آنجايي كه نوشتم site name اسم سايتتو نو در brinkster بنويسيد
بعد هم در اونجايي كه مي خوايد تعداد را نشان بده
اينو
کد:
Response.Write(lngVisitorNumber)%>
دقت كن هنوز در كدهاي قبلي %> را نگذاشته بودم
والسلام نامه تموم
باي
سلام آقا ناصر ازت خيلي ممنونم اما من كونتور با اي اس پي كه تصويري باشه دارم اما وقتي اونرا توي صفحه اچ تي ام ال اينكلود مي كنم كار نمي كنه منظورم تويه اين هاست هستش
سلام
مي گم اون كنتور كه به شكل تصوير است ، عدد تعداد بازديدكننده ها رو كجا مي نويسه . اگه داخل يك فايل text مي نويسه ، اون فايل رو شاخه db كپي كن اگه نشد فكر كنم بايد از كنتور متني استفاده كني
مرسي فكركنم مشكلم حل شد اما وقتي يك صفحه اي اس پي را به عنوان صفحه اصلي قرار مي دهم در www.dot.tkمشكل ميگيره و قبول نمي كنه اما وقتي آدرس يك صفحه اچ تي ام ال را مي دهم كار مي كنه اگه ممكنه كمكم كنيد
سلام
ببينم مگه شما در brinkster هاست نداريد اون كه مي ياد فايل default را به صورت صفحه پيش فرض مي گيره واصلا نيازي نيست در آدرس سايتت نام default.asp را وارد كني فقط uname سايتت رو بگذار
ارادتمند
