AJUDA ERRO AO CONECTAR COM BANCO MYSQL REMOTO

 Tópico anterior Próximo tópico Novo tópico

AJUDA ERRO AO CONECTAR COM BANCO MYSQL REMOTO

VB.NET

 Compartilhe  Compartilhe  Compartilhe
#484254 - 31/08/2018 01:07:35

RDPISA
CATANDUVA
Cadast. em:Junho/2017


Última edição em 31/08/2018 13:19:04 por RDPISA

quando tento me conecta da este erro
System.FormatException
  HResult=0x80131537
  Message=GUID deve conter 32 dígitos com 4 hífens (xxxxxxxx-xxxx-xxxx-xxxx-xxxxxxxxxxxx).
  Source=mscorlib
  StackTrace:
   em System.Guid.TryParseGuidWithNoStyle(String guidString, GuidResult& result)
   em System.Guid.TryParseGuid(String g, GuidStyles flags, GuidResult& result)
   em System.Guid..ctor(String g)
   em MySql.Data.Types.MySqlGuid.MySql.Data.Types.IMySqlValue.ReadValue(MySqlPacket packet, Int64 length, Boolean nullVal)
   em MySql.Data.MySqlClient.NativeDriver.ReadColumnValue(Int32 index, MySqlField field, IMySqlValue valObject)
   em MySql.Data.MySqlClient.ResultSet.ReadColumnData(Boolean outputParms)
   em MySql.Data.MySqlClient.ResultSet.NextRow(CommandBehavior behavior)
   em MySql.Data.MySqlClient.MySqlDataReader.Read()
   em MySql.Data.MySqlClient.Driver.LoadCharacterSets(MySqlConnection connection)
   em MySql.Data.MySqlClient.Driver.Configure(MySqlConnection connection)
   em MySql.Data.MySqlClient.MySqlConnection.Open()
   em Anagia.Principal.Principal_Load(Object sender, EventArgs e) em C:\Users\Casa\source\repos\Anagia\Anagia\Principal.vb:linha 24
   em System.EventHandler.Invoke(Object sender, EventArgs e)
   em System.Windows.Forms.Form.OnLoad(EventArgs e)
   em System.Windows.Forms.Form.OnCreateControl()
   em System.Windows.Forms.Control.CreateControl(Boolean fIgnoreVisible)
   em System.Windows.Forms.Control.CreateControl()
   em System.Windows.Forms.Control.WmShowWindow(Message& m)
   em System.Windows.Forms.Control.WndProc(Message& m)
   em System.Windows.Forms.ScrollableControl.WndProc(Message& m)
   em System.Windows.Forms.Form.WmShowWindow(Message& m)
   em System.Windows.Forms.Form.WndProc(Message& m)
   em System.Windows.Forms.Control.ControlNativeWindow.OnMessage(Message& m)
   em System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m)
   em System.Windows.Forms.NativeWindow.DebuggableCallback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam)
   em System.Windows.Forms.UnsafeNativeMethods.SendMessage(HandleRef hWnd, Int32 msg, Int32 wParam, Int32 lParam)
   em System.Windows.Forms.Form.SetVisibleCore(Boolean value)
   em System.Windows.Forms.Control.set_Visible(Boolean value)
   em System.Windows.Forms.Application.ThreadContext.RunMessageLoopInner(Int32 reason, ApplicationContext context)
   em System.Windows.Forms.Application.ThreadContext.RunMessageLoop(Int32 reason, ApplicationContext context)
   em Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.OnRun()
   em Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.DoApplicationModel()
   em Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.Run(String[] commandLine)
   em Anagia.My.MyApplication.Main(String[] Args) em :linha 81



meu codigo

Private Sub Principal_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim sql As String = "server=db4free.net; port=3306; uid=Login; Pwd=0000; database=Banco"
        Dim conn As New MySqlConnection(sql)

        conn.Open()

    End Sub


Rogério D Pinto


Resposta escolhida #484258 - 31/08/2018 08:20:52

FOXMAN
BARRETOS
Cadast. em:Janeiro/2001


Membro da equipe
Tente alterar a string de conexão...

connStr = "server=seuservidor;user=seuUser;database=seuDataBase;port=suaPorta;password=seuPassword"



Grupo DotNet.Br no FaceBook

Grupo WhatsDev



#484274 - 31/08/2018 13:21:25

RDPISA
CATANDUVA
Cadast. em:Junho/2017


Já mudei de várias formas e continua dando erro. Vi tentar do seu modo pra ver. Mas ja fiz dessa modo sempre funcionou eu usava o visual 2013 mudei para 2017 começou  os erros...

Rogério D Pinto


#484287 - 31/08/2018 20:43:03

ELMO01
BELO HORIZONTE
Cadast. em:Agosto/2004


Última edição em 31/08/2018 20:44:59 por ELMO01

Tente assim:
Não se esqueça de colocar no início

Imports MySql.Data.MySqlClient

Sub Mostra_Cargos()
        Dim dr_Cargos As MySqlDataReader
        Dim Con_Cargos As New MySqlConnection(StrServ)
        Dim Cmd_Cargos As New MySqlCommand(Str_Car01, Con_Cargos)
        Con_Cargos.Open()
        dr_Cargos = Cmd_Cargos.ExecuteReader
        Try
            If dr_Cargos.HasRows Then
                if dr_Cargos.Read
                      ..... seu codigo
                endif
            endif
       Catch ex As Exception
            MsgBox(ex.Message)
        End Try
        dr_Cargos.Close()
        Con_Cargos.Close()
    End Sub

onde:  
StrServ = Server = LocalHost ; User id = root ; password = sua senha caso não tenha colocar "" ; database = nome do seu arquivo MYSQL ;
Str_Car01 = SELECT * FROM seu banco de dados order by ordem que vode escolheu

vé se assim vai funcionar




elmo

#484289 - 01/09/2018 00:49:25

KERPLUNK
RIO GRANDE DO SUL
Cadast. em:Junho/2009


Membro da equipe
Basta uma simples leitura do stack do erro para identificar onde está o problema, linha 24 de "Principal.vb". À partir dessa linha ocorre:
- Conecta no banco
- Abre um MySqlDataReader
- Lê uma linha
- Em seguida provavelmente você está tentando ler o valor de uma coluna passando para formato "GUID" e o que tem na coluna nessa linha não é um GUID.

Basta ler o stack(de baixo para cima, pois é a ordem em que é gravado):
   em System.Guid.TryParseGuidWithNoStyle(String guidString, GuidResult& result)
   em System.Guid.TryParseGuid(String g, GuidStyles flags, GuidResult& result)
   em System.Guid..ctor(String g)
   em MySql.Data.Types.MySqlGuid.MySql.Data.Types.IMySqlValue.ReadValue(MySqlPacket packet, Int64 length, Boolean nullVal)
   em MySql.Data.MySqlClient.NativeDriver.ReadColumnValue(Int32 index, MySqlField field, IMySqlValue valObject)
   em MySql.Data.MySqlClient.ResultSet.ReadColumnData(Boolean outputParms)
   em MySql.Data.MySqlClient.ResultSet.NextRow(CommandBehavior behavior)
   em MySql.Data.MySqlClient.MySqlDataReader.Read()
   em MySql.Data.MySqlClient.Driver.LoadCharacterSets(MySqlConnection connection)
   em MySql.Data.MySqlClient.Driver.Configure(MySqlConnection connection)
   em MySql.Data.MySqlClient.MySqlConnection.Open()
   em Anagia.Principal.Principal_Load(Object sender, EventArgs e) em C:\Users\Casa\source\repos\Anagia\Anagia\Principal.vb:linha 24

_______________________________________________________________________
Virei Oráculo!
The end is nigh, be ready for the nukes!


#484290 - 01/09/2018 02:03:19

RDPISA
CATANDUVA
Cadast. em:Junho/2017


Ja tentei de tudo e não acho aonde esta o erro sera que é o mysqlConector?

Rogério D Pinto


#484291 - 01/09/2018 02:22:42

KERPLUNK
RIO GRANDE DO SUL
Cadast. em:Junho/2009


Membro da equipe
Depure o código, é com certeza em alguma linha que busca valor do DataReader.

_______________________________________________________________________
Virei Oráculo!
The end is nigh, be ready for the nukes!


#484296 - 01/09/2018 11:14:00

FOXMAN
BARRETOS
Cadast. em:Janeiro/2001


Membro da equipe

Última edição em 01/09/2018 11:17:12 por FOXMAN

Tenta colocando o parametro OldGuis e setando-o = true
connStr = "server=seuservidor;user=seuUser;database=seuDataBase;port=suaPorta;password=seuPassword;Old Guids=true"




Grupo DotNet.Br no FaceBook

Grupo WhatsDev



#484305 - 02/09/2018 11:28:39

RDPISA
CATANDUVA
Cadast. em:Junho/2017


Obrigado FoxMan Resolvido funcionou



Rogério D Pinto


 Tópico anterior Próximo tópico Novo tópico


Tópico encerrado, respostas não sao permitidas
Encerrado por RDPISA em 02/09/2018 11:28:54