Thread: vbscript help
View Single Post
Old 2008-11-12, 15:58   #18
IronBits
I ♥ BOINC!
 
IronBits's Avatar
 
Oct 2002
Glendale, AZ. (USA)

21318 Posts
Default

Ok, so this works

Const strTeams = "",Free-DC,AMDUsers,ArsTechnica,.....


if Left(str_CurrentLine,5) = "user=" Then
MyArray = Split(str_CurrentLine,"=",-1,1)
Team_Name = MyArray(1)
arrMyTeamName = Split(Team_Name,"_",-1,1)
StringPos = InStr(1, strTeams, arrMyTeamName(0), vbTextCompare)
if StringPOS > 0 Then
UserName = arrMyTeamName(1)
Else
UserName = Team_Name
End If

Maybe one of you can find a cleaner way to achieve the same thing?

Last fiddled with by IronBits on 2008-11-12 at 16:17
IronBits is offline   Reply With Quote