NAO GRAVA \ NO VISUAL STUDIO 2008 E BANCO MYSQL5.0

MGALDINO 11/05/2011 15:58:39
#373691

Pessoal estranho o que esta acontecendo.

Quando vou gravar, sendo mais especifico o caminho de um arquivo, ele somente esta gravando as letras sem as barras [ô] \ [ô].

Coloquei manualmente no MYsql as Barras foi beleza.
Mais quando faço pelo visual studio da pau.
Não grava as barras.

O Tipo do campo já tentei Varchar, Text e nenhum deu certo.

Segue meu Update e Insert ambos acontece a mesma coisa

Dim Command As New MySqlCommand

Try

Gsql = [Ô]Update TB_Empresa set Emp_Nome = [ô][Ô] & ObjFuncao.RetAp(pNome) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô] Emp_NomeFantasia = [ô][Ô] & ObjFuncao.RetAp(pFantasia) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô] Emp_InscEstadual = [ô][Ô] & ObjFuncao.RetAp(pInscEstadual) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô] Emp_InscMunicipal = [ô][Ô] & ObjFuncao.RetAp(pInscMunicipal) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô] Emp_Endereco = [ô][Ô] & ObjFuncao.RetAp(pEndereco) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô] Emp_Numero = [ô][Ô] & ObjFuncao.RetAp(pNumero) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô] Emp_Bairro = [ô][Ô] & ObjFuncao.RetAp(pBairro) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô] Emp_CEP = [ô][Ô] & ObjFuncao.RetAp(pCEP) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô] Emp_UF = [ô][Ô] & ObjFuncao.RetAp(pEstado) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô] Emp_Cidade = [ô][Ô] & ObjFuncao.RetAp(pCidade) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô] Emp_Complemento = [ô][Ô] & ObjFuncao.RetAp(pComplemento) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô] Emp_Telefone = [ô][Ô] & ObjFuncao.RetAp(pTelefone) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô] Emp_Fax = [ô][Ô] & ObjFuncao.RetAp(pFax) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô] Emp_Celular = [ô][Ô] & ObjFuncao.RetAp(pCelular) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô] Emp_Email = [ô][Ô] & ObjFuncao.RetAp(pEmail) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô] Emp_WebSite = [ô][Ô] & ObjFuncao.RetAp(pWebSite) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô] Emp_Contato = [ô][Ô] & ObjFuncao.RetAp(pContato) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô] Emp_Ativo = [ô][Ô] & ObjFuncao.RetAp(pAtivo) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô] Emp_Observacao = [ô][Ô] & ObjFuncao.RetAp(pObservacao) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô] Emp_ImagemLogo = [ô][Ô] & pLogo & [Ô][ô],[Ô]
Gsql = Gsql & [Ô] Emp_Pais = [ô][Ô] & ObjFuncao.RetAp(pPais) & [Ô][ô][Ô]
Gsql = Gsql & [Ô] Where Emp_Codigo = [Ô] & pCodigo

Command = ObjConn.ExecutaQuery(Gsql)
Command.ExecuteNonQuery()




Dim Command As New MySqlCommand

Try
ObjConn.ConectarMySql()
pCodigo = ObjFuncao.GeraCodigo([Ô]TB_Empresa[Ô], [Ô]Emp_Codigo[Ô])

Gsql = [Ô]Insert Into Tb_Empresa (Emp_Codigo, Emp_Nome, Emp_NomeFantasia, Emp_Cadastro, Emp_InscEstadual,[Ô]
Gsql = Gsql & [Ô] Emp_InscMunicipal, Emp_Endereco, Emp_Numero, Emp_Bairro, Emp_CEP, Emp_UF, Emp_Cidade,[Ô]
Gsql = Gsql & [Ô] Emp_Complemento, Emp_Telefone, Emp_Fax, Emp_Celular, Emp_Email, Emp_WebSite, Emp_Contato,[Ô]
Gsql = Gsql & [Ô] Emp_Ativo, Emp_DataCadastro, Emp_Observacao, Emp_ImagemLogo, Emp_Pais) Values ([Ô]
Gsql = Gsql & pCodigo & [Ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pNome) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pFantasia) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetiraMaskCNPJ(pCNPJ) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pInscEstadual) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pInscMunicipal) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pEndereco) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pNumero) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pBairro) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pCEP) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pEstado) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pCidade) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pComplemento) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pTelefone) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pFax) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pCelular) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pEmail) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pWebSite) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pContato) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pAtivo) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pDataCadastro) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pObservacao) & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & pLogo & [Ô][ô],[Ô]
Gsql = Gsql & [Ô][ô][Ô] & ObjFuncao.RetAp(pPais) & [Ô][ô])[Ô]

Command = ObjConn.ExecutaQuery(Gsql)
Command.ExecuteNonQuery()