Ajuda para Salvar 2 Imagens no MySQL

12/04/2013

0

Olá pessoal!

Tenho uma tabela que possui dois campos foto (foto1 e foto2) do tipo LongBlob.
Estou tentando em uma única vez gravar todos os dados inclusive as duas fotos no mesmo comando, nas mesma query.

Quando gravo uma foto por vez não apresenta problema nenhum, mas quando tento gravar as duas de uma só vez, apresenta o seguinte erro:

"Lost connection to MySQL server during query
Socket error on write. WSAGetLastError return 10053($2745)"

Estou usando o seguinte comando:
with dm.qry_a do
begin
  SQL.Add('INSERT INTO igreja (codigo, razao, cnpj, ativo');
  if dlgOpenFoto1.FileName <> '' then    
    SQL.Add(', foto1');
  if dlgOpenFoto2.FileName <> '' then 
    SQL.Add(', Foto2');
  SQL.Add(') VALUES(:codigo, :razao, :cnpj, :ativo');

  if dlgOpenIgreja.FileName <> '' then
    SQL.Add(', :imgigreja');

  if dlgOpenPadroeiro.FileName <> '' then
    SQL.Add(', :imgpadroeiro ');

  SQL.Add(')');
  ParamByName('codigo').AsInteger          := StrToIntDef(Codigo.Text,0);
  ParamByName('razao').AsString            := Razao.Text;
  ParamByName('cnpj').AsString             := CNPJ.Text;

  if Ativo.Checked then
       ParamByName('ativo').AsString       := 'S'
  else ParamByName('ativo').AsString       := 'N';

  if dlgOpenFoto1.FileName <> '' then
    ParamByName('foto1').LoadFromFile(dlgOpenFoto1.FileName, ftBlob);

  if dlgOpenFoto2.FileName <> '' then
    ParamByName('foto2').LoadFromFile(dlgOpenFoto2.FileName, ftBlob);

  ExecSQL;
Vagner Almeida

Vagner Almeida

Responder

Posts

13/04/2013

Vagner Almeida

Ninguém???
Responder

Que tal ter acesso a um e-book gratuito que vai te ajudar muito nesse momento decisivo?

Ver ebook

Recomendado pra quem ainda não iniciou o estudos.

Eu quero
Ver ebook

Recomendado para quem está passando por dificuldades nessa etapa inicial

Eu quero

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar