http://snippets.dzone.com/posts Thu, 24 Jul 2008 22:17:07 GMT DZone Snippets: VBScript code http://snippets.dzone.com/posts/show/3644 <code> <br />Function TSV(rs) <br /> Dim field <br /> For Each field In rs.Fields <br /> TSV = TSV & field.Name & VBTab <br /> Next <br /> TSV = Left(TSV, Len(TSV) - 1) & vbCr & rs.GetString() <br />End Function <br /></code> <br /> <br />The rows are separated by vbCr ("\r" in most languages). <br />The first row is the field names. Wed, 07 Mar 2007 21:51:49 GMT http://snippets.dzone.com/posts/show/3644 mrclay (Steve Clay) http://snippets.dzone.com/posts/show/3643 <code> <br />Function UnixTime(gmtHrsOffset) <br /> UnixTime = DateDiff("s", "1/1/1970 00:00:00", Now()) - (3600 * gmtHrsOffset) <br />End Function <br /> <br />Repsonse.Write(UnixTime(-5)) 'E.S.T. <br /></code> <br /> <br />Adding in the GMT offset allowed this to match PHP's time() function on a separate server. Wed, 07 Mar 2007 21:43:08 GMT http://snippets.dzone.com/posts/show/3643 mrclay (Steve Clay)