[vbnet/C#/Python] Basic clraik Authorization

[Zachafer]

VBNet:

    Private Shared Function Authorize(ByVal User As String, ByVal Pass As String, ByVal Rank As String) As Boolean
        If User.Length = 0 Then
            MessageBox.Show("Please insert a clraik username!", "clraik Authorization")
        ElseIf Pass.Length = 0 Then
            MessageBox.Show("Please insert a clraik password!", "clraik Authorization")
        Else
            Dim wc As System.Net.WebClient = New System.Net.WebClient()
            Dim HTML As String = wc.DownloadString("http://clraik.com/forum/auth.php?u=" & User & "&p=" & Pass & "&r=" & Rank)
            Return HTML.Contains("<status>Authorized</status>")
        End If
        Return False
    End Function

C#:

        private static bool Authorize(string user, string pass, string rank)
        {
            if (user.Length == 0)
            {
                MessageBox.Show("Please insert a clraik username!", "clraik Authorization");
            }
            else if (pass.Length == 0)
            {
                MessageBox.Show("Please insert a clraik password!", "clraik Authorization");
            }
            else
            {
                System.Net.WebClient wc = new System.Net.WebClient();
                string HTML = wc.DownloadString("http://clraik.com/forum/auth.php?u=" + user + "&p=" + pass + "&r=" + rank);
                return HTML.Contains("<status>Authorized</status>");
            }
            return false;
        }

Python:

def authorization():
    username = username.get() #from entry1
    password = password.get() #from entry2
    webFile = urllib2.urlopen('http://clraik.com/forum/auth.php?u=' + username + '&p=' + password + '&r=' + rank).read()
    print(webFile)
    if "<status>Authorized</status>" in webFile:
        return tkMessageBox.showinfo("clraik authorization", "Authorized")
    else:
        return tkMessageBox.showinfo("clraik authorization", "Not Authorized")

RANK PARAMETER VALUES:

1=NEWBIE
2=CLRAIK
3=OFFICIAL CLRAIK
4=TOP CLRAIK
5=CLRAIK MASTER
6=CLRAIK VIP