Ir para conteúdo
Faça parte da equipe! (2024) ×

visual basic Ajuda com comando de login com credenciais de fórum


Real Fair Play
 Compartilhar

Posts Recomendados

Estou fazendo um loader pro meu amigo, e quero logar atraves do fórum(consegui fazer isso e ta pegando direito) mas quando coloco o Me.hide e depois Form2.show

a form 2 abre mas fecha imediatamente, ai ta o codigo se alguem souber arrumar me fala como pls:

É necessário se cadastrar para acessar o conteúdo.

  ᴵ ᶠᵉᵉᶫ ˢᵒᵐᵉᵗʰᶦᶰᵍ ˢᵒ ʳᶦᵍʰᵗ ᵇʸ ᵈᵒᶦᶰᵍ ᵗʰᵉ ʷʳᵒᶰᵍ ᵗʰᶦᶰᵍ⋅

   ᴵ ᶠᵉᵉᶫ ˢᵒᵐᵉᵗʰᶦᶰᵍ ˢᵒ ʷʳᵒᶰᵍ ᵇʸ ᵈᵒᶦᶰᵍ ᵗʰᵉ ʳᶦᵍʰᵗ ᵗʰᶦᶰᵍ⋅

    ᴱᵛᵉʳʸᵗʰᶦᶰᵍ ᵗʰᵃᵗ ᵈʳᵒʷᶰˢ ᵐᵉ ᵐᵃᵏᵉˢ ᵐᵉ ʷᵃᶰᶰᵃ ᶠᶫʸ⋅

     ᴱᵛᵉʳʸᵗʰᶦᶰᵍ ᵗʰᵃᵗ ᵏᶦᶫᶫˢ ᵐᵉ ᵐᵃᵏᵉˢ ᵐᵉ ᶠᵉᵉᶫ ᵃᶫᶦᵛᵉ⋅ 

Link para o comentário
Compartilhar em outros sites

parece está tudo certo, deve ter algo errado em alguma linha de outro código!

Link para o comentário
Compartilhar em outros sites

  • 1 mês depois...

Olá, voltei, eu peguei sua source code e fiz algumas modificações que podem está ajudando você a fazer o login com a WC, já está funcionando uns 90% por assim dizer, é só você procurar as credenciais que estão faltando ou tirar as que não fazem nada que eu mesmo coloquei, para olhar é só ir em http://www.webcheats.com.br/login/login e inspecionar o elemento no FORM do login e pegar as credenciais, link da minha source abaixo.

 

Único problema: Quando você colocar seu Nome e Senha, corretos, ele vai redirecionar você para a home da WC, é só procurar mais algumas coisas para arrumar este erro.

 

Imagem do programa:

 

I9PISHdAQAOUcinWVXiylA.png

 

 

WC Login - SendSpace

HEXTCH CHEAT DEVELOPER
CSGO
rmKVom3.gif
Link para o comentário
Compartilhar em outros sites

Eu estava com um projeto de Loader com esse mesmo sistema de login, só que eu tava com dificuldades aí desisti, assim que os Cheats voltarem posso usar essa sorce-code ou entrar em ctt contigo mano ? @MarshallScript

"In tenebris exitum reperies et lucem."

Membro Membro Avançado [E]EstagiárioGame Zone Ex-Staffer ↬ 

Link para o comentário
Compartilhar em outros sites

[quote name='blender_nx']Eu estava com um projeto de Loader com esse mesmo sistema de login, só que eu tava com dificuldades aí desisti, assim que os Cheats voltarem posso usar essa sorce-code ou entrar em ctt contigo mano ? @MarshallScript[/QUOTE] Pode sim, é livre. OBS: deixando os créditos é sem problemas, se precisar de ajuda é só chamar.
HEXTCH CHEAT DEVELOPER
CSGO
rmKVom3.gif
Link para o comentário
Compartilhar em outros sites

Cara eu editei um pouco os codigos e são esses :

Public Class Form1

 

Private MySite As String = "http://www.webcheats.com.br/login/login"

Public Sub Login(ByVal User As String, ByVal Pass As String)

Using Web As New Net.WebClient

Dim T As New Specialized.NameValueCollection

T.Add("login", User)

T.Add("password", Pass)

T.Add("register", "0")

T.Add("remember", "1")

T.Add("cookie_check", "0")

T.Add("_xfToken", "")

T.Add("redirect", "http://www.webcheats.com.br/")

Dim Web_Bytes As Byte() = Web.UploadValues(MySite, "POST", T)

Dim HTML As String = (New System.Text.UTF8Encoding).GetString(Web_Bytes)

' RichTextBox1.Text = HTML

If HTML.Contains("<title>Erro | WebCheats - Dicas e Cheats para seus Jogos</title>") Then

MsgBox("erro ao logar")

Else

MsgBox("Logado")

Form2.Show()

Me.Close()

End If

End Using

End Sub

 

Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs) Handles MyBase.Load

Control.CheckForIllegalCrossThreadCalls = False

End Sub

 

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

If TextBox1.Text = Nothing Then

MsgBox("Informe um usuário")

Exit Sub

End If

If TextBox2.Text = Nothing Then

MsgBox("Informe uma senha")

Exit Sub

End If

Login(TextBox1.Text, TextBox2.Text)

End Sub

'<title>Erro | WebCheats - Dicas e Cheats para seus Jogos</title> - Titulo de erro ao digitar usuario errado

Private Sub WebBrowser1_DocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted

' Label5.Text = WebBrowser1.DocumentTitle 'Verificar o titulo da pagina ao errar usuário

End Sub

End Class

 

O erro da form estar fechando :

Deixe igual esta na print :

5mWgSyn.png

 

Projeto ja editado:

http://www.mediafire.com/file/94qxvktoh2gfkux/WC%20Login.rar

kp6mVWB.gif

Link para o comentário
Compartilhar em outros sites

ARUTO_' date=' post: 9629888, member: 4716347"']

Cara eu editei um pouco os codigos e são esses :

 

 

O erro da form estar fechando :

Deixe igual esta na print :

5mWgSyn.png

 

Projeto ja editado:

http://www.mediafire.com/file/94qxvktoh2gfkux/WC Login.rar

 

Ficou ótimo amigo

HEXTCH CHEAT DEVELOPER
CSGO
rmKVom3.gif
Link para o comentário
Compartilhar em outros sites

Este tópico está impedido de receber novos posts.
 Compartilhar

×
×
  • Criar Novo...

Informação Importante

Nós fazemos uso de cookies no seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies , caso contrário, vamos supor que você está bem para continuar.