Sub Event_UserTalk(Username, Flags, Message, Ping)
If LCase(Message) = BotVars.Trigger & "tryouts" Then
GetDBEntry Username, myAccess, myFlags
If myAccess => 80 Then
Set fso = CreateObject("Scripting.FileSystemObject")
Set ts = fso.OpenTextFile(BotPath & "users.txt", 1, False)
lines = Split(ts.ReadAll, vbCrLf)
For i = 0 to UBound(lines)
If Right(lines(i), 1) = "T" Then
AddQ "Tryout: " & Split(lines(i), " ") (0)
tFound = True
End If
Next
If Not tFound Then
AddQ "OMFG WTF. NOBODY WAS FOUND OMFG GAY."
End If
End If
End If
End Sub
someone tell me WHY THE FUCK IT ISNT READING THE FUCKING FILE.
The fso looks fine, try doing a debug.print fso.readall to see if it is reading the file, or maybe set some break points.
VBS... not VB Lobo.
If Right(lines(i), 1) = "T" Then
If UCase(Mid(lines(i), 1, 1) = "T" Then
Mid? go die. this file is the userlist.txt file of stealthbot. so your code wont work unless the user was a specified length therefore making you stupid.
Ashame there is no "userlist.txt"? It's "users.txt", last I checked (1 minute before posting this)
i was guessing. shutup.
Now I see why nobody wanted to help you.
yep. i have a reputation for flaming and being an asshole to people. of course there is a nicer side of me. however nobody wants to see it :(.
I doubt people want to see the mean side of you over the nice side of you...
Quote from: Mangix on June 03, 2005, 08:36:16 PM
Mid? go die. this file is the userlist.txt file of stealthbot. so your code wont work unless the user was a specified length therefore making you stupid.
Mid(String, 1, 1) is the same as Right(String, 1)
Quote from: Mangix on June 03, 2005, 08:36:16 PM
Mid? go die. this file is the userlist.txt file of stealthbot. so your code wont work unless the user was a specified length therefore making you stupid.
Christ. Calm down.
Quote from: 111787 on June 04, 2005, 10:03:10 AM
Quote from: Mangix on June 03, 2005, 08:36:16 PM
Mid? go die. this file is the userlist.txt file of stealthbot. so your code wont work unless the user was a specified length therefore making you stupid.
Mid(String, 1, 1) is the same as Right(String, 1)
... no its not. that counts the first line from left to right.
< = left
> = right
If the string is 1 letter long is equivalent, but not the same.
my method is still better :P.
Fine Mid(String, Len(String) - 1, 1)