как правельно составить запрос к базе данных? не могу найти ошибку...

[Человек_Борща]

собственно есть dll плагин. от посылает данные в базу данных.
немогу правельно составить запрос к базе данных...
вот что имеется:

function SetBanUserInfo(UserBan: PBanRec): Integer; stdcall;
var
  rs: TResultSet;
  p: PBanRec;
  b: Boolean;
  i: Integer;
begin
  Result := -1;
  LastErrorText := '';
  if db = nil then Exit;
  if not db.Active then Exit; 
  if UserBan = nil then begin Result := -2; Exit; end;
  if UserBan^.HddSN = '' then begin Result := -3; Exit; end;
  p := UserBan;
  for i:=0 to 1 do begin
    rs := TResultSet.Create(db);
    try
      b := rs.FormatQuery('INSERT INTO '+DBRec.table1+' (player_id,player_ip,player_nick,admin_ip,admin_id,admin_nick,ban_type,ban_reason,ban_created,ban_length,server_name,server_ip, SteamId, UUID) '+
'VALUES (%s,%s,%s,%s,%s,%s,%s,''myAC'',''S'',%s,%s,%d,''myAC Anticheat'',%s,%s,%s,%s)', [p^.HddSN, p^.IPAddr, p^.Name, p^.Reason, SqlDT2Str(p^.DateTime), p^.min, p^.SteamId, p^.UUID]);
      if not b then begin
        if rs.FLastError <> 0 then begin
          Result := rs.FLastError;
          LastErrorText := '#' + IntToStr(rs.FLastError) + ': ' + rs.FLastErrorText;
          if rs.FLastError = 1046 then begin   //#1046 - No database selected
            if DBType = dbMySQL then
              if mydb.Use(DBrec.DataBase) then Continue else Result := -10461020;
          end;
        end;
      end else begin
        Result := 0;
      end;
    finally
      rs.Free;
    end;
    Break;
  end;
end;

в базу попытался внести 2 новых поля.. SteamID и UUID неполучилось..
вот что выдаёт:

<2010-02-25 16:27:34>  Error: SetBanUserInfo(S016J1QY701773) = 1064
<2010-02-25 16:27:34>  GetLastErrorMsg = "#1064: You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near '' at line 1"

как правельно оформить этот запрос?

[p51x]

Вы затрагиваете 14 столбцов таблицы (пересчитайте в скобках до VALUES), а в значений пихаете 18.

[Человек_Борща]

я попробовал следующие варианты запросов...

     b := rs.FormatQuery('INSERT INTO '+DBRec.table1+' (player_id,player_ip,player_nick,admin_ip,admin_id,admin_nick,ban_type,ban_reason,ban_created,ban_length,server_name,server_ip,SteamId,UUID) '+
 'VALUES (%s,%s,%s,'''','''',''MyAC'',''S'',%s,%d,%d,''MyAC Anticheat'','''','''')', [p^.HddSN, p^.IPAddr, p^.Name, p^.Reason, SqlDT2Str(p^.DateTime), p^.min, p^.SteamId, p^.UUID]);

     b := rs.FormatQuery('INSERT INTO '+DBRec.table1+' (player_id,player_ip,player_nick,admin_ip,admin_id,admin_nick,ban_type,ban_reason,ban_created,ban_length,server_name,server_ip,SteamId,UUID) '+
 'VALUES (%s,%s,%s,'''','''',''MyAC'',''S'',%s,%d,%d,''MyAC Anticheat'','''',%s,%s)', [p^.HddSN, p^.IPAddr, p^.Name, p^.Reason, SqlDT2Str(p^.DateTime), p^.min, p^.SteamId, p^.UUID]);

     b := rs.FormatQuery('INSERT INTO '+DBRec.table1+' (player_id,player_ip,player_nick,admin_ip,admin_id,admin_nick,ban_type,ban_reason,ban_created,ban_length,server_name,server_ip,SteamId,UUID) '+
 'VALUES (%s,%s,%s,'''','''',''MyAC'',''S'',%s,%d,%d,''MyAC Anticheat'','''',%s,'''')', [p^.HddSN, p^.IPAddr, p^.Name, p^.Reason, SqlDT2Str(p^.DateTime), p^.min, p^.SteamId, p^.UUID]);

результат тот-же...

<2010-02-25 20:59:24>  Error: SetBanUserInfo(S016J1QY701773) = 1064
<2010-02-25 20:59:24>  GetLastErrorMsg = "#1064: You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near '' at line 1"

[quit]

Возможно при передачи параметров передаются параметры с запрещенными символами. Советую под отладчиком зайти и посмотреть что там передается и в ручную на сервере попробовать выполнить запрос

EDIT

b := 
rs.FormatQuery('INSERT INTO '+DBRec.table1+' 
(player_id,player_ip,player_nick,admin_ip,admin_id,admin_nick,ban_type,ban_reason,ban_created,ban_length,server_name,server_ip, SteamId, UUID) '+
'VALUES (%s(1),%s(2),%s(3),%s(4),%s(5),%s(6),%s(7),''myAC'',''S'',%s(8),%s(9),%d(10),''myAC Anticheat'',%s(11),%s(12),%s(13),%s(14))', 
[p^.HddSN(1), p^.IPAddr(2), p^.Name(3), p^.Reason(4), SqlDT2Str(p^.DateTime)(5), p^.min(6), p^.SteamId(7), p^.UUID(8)]);
//число в параметров Values - 13, а передаешь 8

[Человек_Борща]

просто dll хочу преписать, а разработчик запутанно и замудрено зделал=) попробую=)

[quit]

Сообщение от Человек_Борща

просто dll хочу преписать, а разработчик запутанно и замудрено зделал=) попробую=)

Скиньте хоть структуру таблицы что ли...

[Человек_Борща]

вот структура

CREATE TABLE `amx_bans` (
  `bid` int(11) NOT NULL auto_increment,
  `player_ip` varchar(100) default NULL,
  `player_id` varchar(50) NOT NULL default '0',
  `player_nick` varchar(100) NOT NULL default 'Unknown',
  `admin_ip` varchar(100) default NULL,
  `admin_id` varchar(50) NOT NULL default '0',
  `admin_nick` varchar(100) NOT NULL default 'Unknown',
  `ban_type` varchar(10) NOT NULL default 'S',
  `ban_reason` varchar(255) NOT NULL default '',
  `ban_created` int(11) NOT NULL default '0',
  `ban_length` varchar(100) NOT NULL default '',
  `server_ip` varchar(100) NOT NULL default '',
  `server_name` varchar(100) NOT NULL default 'Unknown',
  `SteamId` varchar(20) NOT NULL,
  `UUID` varchar(32) NOT NULL,
  PRIMARY KEY  (`bid`),
  KEY `SteamId` (`SteamId`),
  KEY `UUID` (`UUID`),
  FULLTEXT KEY `UUID_2` (`UUID`)
) ENGINE=MyISAM  DEFAULT CHARSET=utf8 AUTO_INCREMENT=238 ;