<%@ Page Language="VB" %> <%@ Import Namespace="System" %> <%@ Import Namespace="System.IO" %> @ndyRobinson.com: Ten Must-Have Tools Every Developer Should Download Now
<%----%>

Wednesday, May 30, 2007

Ten Must-Have Tools Every Developer Should Download Now

http://msdn.microsoft.com/msdnmag/issues/04/07/MustHaveTools/

0 Comments:

Post a Comment

Links to this post:

Create a Link

More information

About this site

@ndyRobinson.com is the online home of Andy Robinson, a VB6/SQL Server developer living and working in the UK (Brighton).

Labels

    <% Dim lsfiles As String() lsfiles = Directory.GetFiles(Server.MapPath("~\labels"), "*.aspx") Dim lsFileName As String Dim lsLabel As String Dim liItems As Int32 For Each File As String In lsfiles lsFileName = Mid$(File, InStrRev(File, "\") + 1) lsLabel = Replace(lsFileName, ".aspx", "") liItems = Regex.Matches(System.IO.File.ReadAllText(File.ToString), "post-title").Count - 1 Response.Write("
  • " & lsLabel & " (" & liItems & ")
  • ") Next %>

My del.icio.us