Features       Ask DevGuru       ASP Resources       Find the Bug       Knowledge Base       Links       Tips of the Week       Tutorials   Products       dgCalendar       dgCharge New!       dgChart New!       dgFileUpload       dgReport New!       dgSort       dgTree   Site       Authoring       Coming Soon       DevGuru Resume       Link to Us       Merchandise       Sponsorships       Testimonials       What's New   Technologies       ADO 2.6       ASP       CSS2       HTML       JavaScript       Jet SQL       Transact-SQL Syntax       VBScript       WML       WMLScript       WSH       XML DOM                All Properties TextStream Object Property:  TextStream.Column Implemented in version 2.0   object.Column The Column property returns the current position of the file pointer within the current line. Column 1 is the first character in each line. The follwing code uses the Column property to get the column number of the last character in a text file. Code: <% dim filesys, text, readfile, contents set filesys = CreateObject("Scripting.FileSystemObject") Set text = filesys.CreateTextFile("c:\somefile2.txt") text.Write "Find the last character in the text file" text.close set readfile = filesys.OpenTextFile("c:\somefile2.txt", 1, false) do while readfile.AtEndOfStream <> true     contents = readfile.Read(1)     col = readfile.Column -1 loop readfile.close Response.Write "The last character in the text file is '" & contents & "' and its_                                 column number is '" & col & "'." %> Output: "The last character in the text file is 'e' and its column number is '40'." Copyright 1999-2001 by Infinite Software Solutions, Inc. All rights reserved. Trademark Information