29 00000001 2008-04-04 10:17:34 Server successfully initialized.\n30 00000001 2008-04-04 10:17:42 Connection made from workstation atl-ws-001 (CID:14537, API:1.25).\nClient: ServerAdministration; SDK 8.0.0.74; JVM 1.5.0_03-b07; Windows 2003\n31 00000001 2008-04-04 10:17:42 User StarTeam Server Administrator logged on connection from workstation StarTeamApp01 (CID:14537).\n32 00000001 2008-04-04 10:20:31 Connection made from workstation atl-ws-002 (CID:4272, API:1.24).\nClient: StarTeam 7.0.131; Windows XP\n33 00000001 2008-04-04 10:20:31 User Ken Myer logged on connection from workstation atl-ws-002 (CID:4272).\n34 00000001 2008-04-04 10:21:20 User Ken Myer logged off connection from workstation atl-ws-002 (CID:4272).\n35 00000001 2008-04-04 11:00:56 Connection made from workstation atl-ws-003 (CID:7800, API:1.24).\nClient: StarTeam 7.0.131; Windows XP\n36 00000001 2008-04-04 11:00:56 User Pilar Ackerman logged on connection from workstation atl-ws-003 (CID:7800).\n<\/pre>\nIf you look through this sample test, you\u2019ll see that we have two logons and one logoff for April 4, 2008:<\/p>\n
33 00000001 2008-04-04 10:20:31 User Ken Myer logged on connection from workstation atl-ws-002 (CID:4272).\n34 00000001 2008-04-04 10:21:20 User Ken Myer logged off connection from workstation atl-ws-002 (CID:4272).\n36 00000001 2008-04-04 11:00:56 User Pilar Ackerman logged on connection from workstation atl-ws-003 (CID:7800).\n<\/pre>\nOur job is simple: we need to programmatically count up the total number of logons and logoffs for a given date.<\/p>\n
So how are we going to do that? Well, after we define our constant we\u2019re going to assign the value 0 to a pair of variables, intLoggedOn and intLoggedOff:<\/p>\n
intLoggedOn = 0\nintLoggedOff = 0\n<\/pre>\nOnce that\u2019s done we create an instance of the Scripting.FileSystemObject<\/b>, then use this line of code to open the text file C:\\Scripts\\Test.txt for reading:<\/p>\nSet objFile = objFSo.OpenTextFile(\"C:\\Scripts\\Test.txt\", ForReading)\n<\/pre>\nOur next step is to set up a Do Until loop designed to run until we\u2019ve reached the end of the file; that is, until the file\u2019s AtEndOfStream<\/b> property is True. Inside that loop, the first thing we do is use the ReadLine<\/b> method to read the initial line in the file and store it in a variable named strLine:<\/p>\nstrLine = objFile.ReadLine\n<\/pre>\nAt this point we need to do two things. First, we need determine whether or not the action recorded on this line of code took place on April 4, 2008. We can do that by using VBScript\u2019s InStr<\/b> function to search for the date-time value 2008-04-04:<\/p>\nIf InStr(strLine, \"2008-04-04\") Then\n<\/pre>\nIf InStr returns a 0 that means that the date-time value 2008-04-04 couldn\u2019t be found; therefore we simply go back to the top of the loop and repeat the process with the next line in the text file. If the date-time value was<\/i> found we then need to check to see if either a logon or a logoff took place. That\u2019s what this block of code is for:<\/p>\nIf InStr(strLine, \"logged on\") Then\n intLoggedOn = intLoggedOn + 1\nElseIf InStr(strLine, \"logged off\") Then\n intLoggedOff = intLoggedOff + 1\nEnd If\n<\/pre>\nAs you can see, in line 1 we\u2019re again using InStr to search the line of text for a particular phrase; in this case, that\u2019s the phrase logged on<\/i>. What if we find the search phrase? Well, that means we\u2019re dealing with a logon; in turn, we increment the value of the variable intLoggedOn by 1:<\/p>\nintLoggedOn = intLoggedOn + 1\n<\/pre>\nWhat if we don\u2019t<\/i> find the search phrase? Well, in that case we try again, this time looking for the string logged off<\/i>:<\/p>\nElseIf InStr(strLine, \"logged off\") Then\n<\/pre>\nIf found, we increment the value of the variable intLoggedOff by 1. Either way, it\u2019s then back to the top of the loop, where we try, try again with the next line in the text file.<\/p>\n
After we\u2019ve read each line in the text file we echo back the values of intLoggedOn and intLoggedOff. That\u2019s going to give us output similar to this:<\/p>\n
Logons: 2\nLogoffs: 1\n<\/pre>\nAnd there you have it.<\/p>\n
That\u2019s all we have time for today; we need to straighten our pajamas, hop on our unicycles, and head off to a meeting. To be honest, we don\u2019t expect anything bad to come out of this meeting, and we expect that life will go on the same as ever. But you never know; after all, this is<\/i> Microsoft: \u201cRemember that Script Center thing where you can find all sorts of information about system administration scripting? Well, now we have a Script Center where you can\u2019t find any<\/i> information about system administration scripting! Isn\u2019t that great!?!\u201d <\/p>\n
We\u2019ll keep you posted.<\/p>\n","protected":false},"excerpt":{"rendered":"
Hey, Scripting Guy! I\u2019m trying to write a script that can go through a log file and determine the number of users who logged off on a particular day. Can you help me?— TM Hey, TM. You know, when you work at Microsoft people think you probably come to work in your pajamas, ride a […]<\/p>\n","protected":false},"author":595,"featured_media":87096,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"_acf_changed":false,"footnotes":""},"categories":[1],"tags":[13,3,4,14,5],"class_list":["post-55563","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-scripting","tag-dates-and-times","tag-scripting-guy","tag-scripting-techniques","tag-text-files","tag-vbscript"],"acf":[],"blog_post_summary":"
Hey, Scripting Guy! I\u2019m trying to write a script that can go through a log file and determine the number of users who logged off on a particular day. Can you help me?— TM Hey, TM. You know, when you work at Microsoft people think you probably come to work in your pajamas, ride a […]<\/p>\n","_links":{"self":[{"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/posts\/55563","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/users\/595"}],"replies":[{"embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/comments?post=55563"}],"version-history":[{"count":0,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/posts\/55563\/revisions"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/media\/87096"}],"wp:attachment":[{"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/media?parent=55563"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/categories?post=55563"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/devblogs.microsoft.com\/scripting\/wp-json\/wp\/v2\/tags?post=55563"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}
![\"Hey,](\"https:\/\/devblogs.microsoft.com\/wp-content\/uploads\/sites\/29\/2019\/02\/q-for-powertip.jpg\" "\\"Hey,")
<\/p>\n![\"Spacer\"](\"https:\/\/devblogs.microsoft.com\/scripting\/wp-content\/uploads\/sites\/29\/2019\/05\/spacer.gif\")
![\"Hey,](\"https:\/\/devblogs.microsoft.com\/wp-content\/uploads\/sites\/29\/2019\/02\/a-for-powertip.jpg\" "\\"Hey,")
![\"Script](\"http:\/\/img.microsoft.com\/library\/media\/1033\/technet\/images\/scriptcenter\/ad.jpg\" "\\"Script")
<\/a> <\/p>\n