Ir para conteúdo
Banner com Efeitos

Featured Replies

  • Respostas 20
  • Visualizações 1.2k
  • Created
  • Última resposta

Top Posters In This Topic

Most Popular Posts

  • Imports Tibia.Objects Public Class Form1 Private player As Player Private client As Client Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles

  • Test Bot.rar

  • Imports Tibia.Objects Public Class Form1 Private player As Player Private client As Client Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Posted Images

Postado
  • Autor

Hm, talvez você precise recompilar a DLL pra usar no 64 bits...

O.o como faço isso?

"Cada um de nós é livre para acreditar no que quiser, e minha resposta mais simples para isso é: Deus não existe. Ninguém criou o universo e ninguém comanda a nossa fé."

-Stephen Hawking

stephen-hawking-250x200.jpg

Postado


Imports Tibia.Objects


Public Class Form1

Private player As Player

Private client As Client


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

Dim processo As Process() = Process.GetProcessesByName("tibia")

	If processo.Length > 0 Then

		client = ClientChooser.ShowBox()

		If client IsNot Nothing Then

			If client.LoggedIn Then

				player = client.GetPlayer()

			Else

				MessageBox.Show("Nenhum char logado!", "Nenhum char logado!", MessageBoxButtons.OK, MessageBoxIcon.[Error])

				Environment.[Exit](0)

			End If

		Else

			MessageBox.Show("Nenhum char logado!", "Nenhum char logado!", MessageBoxButtons.OK, MessageBoxIcon.[Error])

			Environment.[Exit](0)

		End If

	Else

		MessageBox.Show("Tibia não esta aberto!", "Tibia não encontrado!", MessageBoxButtons.OK, MessageBoxIcon.[Error])

		Environment.[Exit](0)

	End If

End Sub


End Class

# Regras Gerais - TibiaKing.com #
Contato: [email protected]
Não respondo dúvidas via MP.


1C2tu.png4Tlqo.png1C2tu.png


 

Postado
  • Autor

Dei +Rep pros dois só por estarem se esforçando pra me ajuda!

E continua o Mistériooo

pq não quer pegar essa droga? O.o

Editado por yurinho190 (veja o histórico de edições)

"Cada um de nós é livre para acreditar no que quiser, e minha resposta mais simples para isso é: Deus não existe. Ninguém criou o universo e ninguém comanda a nossa fé."

-Stephen Hawking

stephen-hawking-250x200.jpg

Postado

Cara, eu odeio o VB, e pelo VB não consegui também, ja pelo C#, utilizei um antigo projeto meu, trocando apenas a DLL do TibiaAPI e funcionou normal

yc1VW.png

Se quiser o projeto antigo ->

# Regras Gerais - TibiaKing.com #
Contato: [email protected]
Não respondo dúvidas via MP.


1C2tu.png4Tlqo.png1C2tu.png


 

Participe da conversa

Você pode postar agora e se cadastrar mais tarde. Se você tem uma conta, faça o login para postar com sua conta.

Visitante
Responder

Quem Está Navegando 0

  • Nenhum usuário registrado visualizando esta página.

Estatísticas dos Fóruns

  • Tópicos 96.9k
  • Posts 519.7k

Informação Importante

Confirmação de Termo