Vb.net URL请求的返回值

Vb.net URL请求的返回值,vb.net,error-handling,response,server,minecraft,Vb.net,Error Handling,Response,Server,Minecraft,我正在编写一个基于Minecraft的程序(我知道Java更容易,这就是重点),我的一个功能包括输入一个人的用户名,它将返回该用户是否是高级会员。可以在任何web浏览器中手动执行此操作,方法是转到: 当用户名替换为实际用户名时,例如: 然后网页将只显示“真”或“假”,这取决于该用户是否是高级用户。在我的情况下,它返回“true”,因为我是高级会员。我希望能够在VisualBasic中以布尔值或字符串的形式返回它,然后将其链接到标签 我真的不知道从哪里开始的代码,所以欢迎所有的建议!谢谢!:)

我正在编写一个基于Minecraft的程序(我知道Java更容易,这就是重点),我的一个功能包括输入一个人的用户名,它将返回该用户是否是高级会员。可以在任何web浏览器中手动执行此操作,方法是转到:

当用户名替换为实际用户名时,例如:

然后网页将只显示“真”或“假”,这取决于该用户是否是高级用户。在我的情况下,它返回“true”,因为我是高级会员。我希望能够在VisualBasic中以布尔值或字符串的形式返回它,然后将其链接到标签


我真的不知道从哪里开始的代码,所以欢迎所有的建议!谢谢!:)

这相当简单。首先,您需要一种将网页读入字符串的方法,下面是一个非常基本的方法:

Private Function GetWebPageText(ByVal url As String) As String
    Dim Request As WebRequest = WebRequest.Create(url)
    Request.Credentials = CredentialCache.DefaultCredentials
    Return New StreamReader(Request.GetResponse().GetResponseStream()).ReadToEnd()
End Function
然后,您只需使用所需的用户名调用页面,并将返回值解析为布尔值。您可以使用
Boolean.Parse(str)
轻松实现这一点,将其全部放在一起:

Private Function PlayerHasPremium(ByVal PlayerName As String) As Boolean
    Return Boolean.Parse(GetWebPageText("https://minecraft.net/haspaid.jsp?user=" + PlayerName))
End Function
然后,您可以使用用户名调用该方法,以在代码中获取布尔值:

Sub Main()
    Dim TechnoShadowHasPremium As Boolean = PlayerHasPremium("xTeCnOxShAdOwZz")
    Dim MrLoreHasPremium As Boolean = PlayerHasPremium("MrLore")

    System.Console.WriteLine(TechnoShadowHasPremium) ' True
    System.Console.WriteLine(MrLoreHasPremium)       ' False
End Sub

我需要更多的信息。网络还是winforms?如何确定付费状态?输入来自哪里,键盘还是URL?你说返回是真是假,但是从哪里返回到哪里?