Hello all, I have a VB Script that creates a phone list for my company, and I have been asked to alphabetize the names listed under the department headings....I am so new to VB that this is the first time I have used it.....ever I've done a great deal of searching, and have yet to find an answer, I was hopeing someone would help.
my code currently looks like this:
Sub EnumerateUsers(oCont) Dim oUser For Each oUser In oCont Select Case LCase(oUser.Class) Case "user" If oUser.telephoneNumber <> "" then If oUser.physicalDeliveryOfficeName = "Wixom" then If oUser.department = "Engineering" then sdata = "<tr>" sdata = sdata & "<td class='list'>" & oUser.GivenName & " " & oUser.SN & "</td>" sdata = sdata & "<td class='list'>" & oUser.telephoneNumber & "</td>" sdata = sdata & "</tr>" wixEng(wixEngRow) = sdata wixEngRow = wixEngRow + 1 end if "... there are tons more like this in this sub.... but it ends like this..." end if Case "organizationalunit", "container" EnumerateUsers oUser End Select
So I want to do something similar to the SQL OrderBy, but I can't find the syntax... Does anyone have an Idea for me?
Thanks in advance!