Как подключиться к Msql базе

[ala-x]

Он издевается.

Пример чего?

Вот этого как правильно объявить функцию в tlb

объявить функции в TLB и подключить эту TLB через References.

[Хакер]

Первая страница, дальше сам.
Либид я специально вырезал: я уверен, найдётся толпа неразумных, которые тупо скопирует его себе, чем вызовут коллизию с моими библиотеками.

Код: Выделить всё

#define mycall long _stdcall

[
   helpstring("Fire-Lines MySQL Type Library"),
   uuid(вырезано-вырезано-вырезано-вырезано)
]

library MySQLSupport
{


   [
      dllname("libmysql.dll"),
      helpstring("Функции для работы с MySQL")
   ]
   module MySQL
   {
      const long CR_UNKNOWN_ERROR         = 2000;
      const long CR_SOCKET_CREATE_ERROR   = 2001;
      const long CR_CONNECTION_ERROR      = 2002;
      const long CR_CONN_HOST_ERROR      = 2003;
      const long CR_IPSOCK_ERROR         = 2004;
      const long CR_UNKNOWN_HOST         = 2005;
      const long CR_SERVER_GONE_ERROR      = 2006;
      const long CR_VERSION_ERROR         = 2007;
      const long CR_OUT_OF_MEMORY         = 2008;
      const long CR_WRONG_HOST_INFO      = 2009;
      const long CR_LOCALHOST_CONNECTION    = 2010;
      const long CR_TCP_CONNECTION      = 2011;
      const long CR_SERVER_HANDSHAKE_ERR    = 2012;
      const long CR_SERVER_LOST         = 2013;
      const long CR_COMMANDS_OUT_OF_SYNC    = 2014;
      const long CR_NAMEDPIPE_CONNECTION    = 2015;
      const long CR_NAMEDPIPEWAIT_ERROR     = 2016;
      const long CR_NAMEDPIPEOPEN_ERROR     = 2017;
      const long CR_NAMEDPIPESETSTATE_ERROR = 2018;
      const long CR_CANT_READ_CHARSET      = 2019;
      const long CR_NET_PACKET_TOO_LARGE    = 2020;
      const long CR_EMBEDDED_CONNECTION   = 2021;
      const long CR_PROBE_SLAVE_STATUS      = 2022;
      const long CR_PROBE_SLAVE_HOSTS       = 2023;
      const long CR_PROBE_SLAVE_CONNECT     = 2024;
      const long CR_PROBE_MASTER_CONNECT    = 2025;
      const long CR_SSL_CONNECTION_ERROR    = 2026;
      const long CR_MALFORMED_PACKET        = 2027;
      const long CR_WRONG_LICENSE         = 2028;

      const long CR_NULL_POINTER         = 2029;
      const long CR_NO_PREPARE_STMT      = 2030;
      const long CR_PARAMS_NOT_BOUND      = 2031;
      const long CR_DATA_TRUNCATED      = 2032;
      const long CR_NO_PARAMETERS_EXISTS    = 2033;
      const long CR_INVALID_PARAMETER_NO    = 2034;
      const long CR_INVALID_BUFFER_USE   = 2035;
      const long CR_UNSUPPORTED_PARAM_TYPE = 2036;

      const long CR_SHARED_MEMORY_CONNECTION                = 2037;
      const long CR_SHARED_MEMORY_CONNECT_REQUEST_ERROR     = 2038;
      const long CR_SHARED_MEMORY_CONNECT_ANSWER_ERROR      = 2039;
      const long CR_SHARED_MEMORY_CONNECT_FILE_MAP_ERROR    = 2040;
      const long CR_SHARED_MEMORY_CONNECT_MAP_ERROR         = 2041;
      const long CR_SHARED_MEMORY_FILE_MAP_ERROR            = 2042;
      const long CR_SHARED_MEMORY_MAP_ERROR                 = 2043;
      const long CR_SHARED_MEMORY_EVENT_ERROR           = 2044;
      const long CR_SHARED_MEMORY_CONNECT_ABANDONED_ERROR = 2045;
      const long CR_SHARED_MEMORY_CONNECT_SET_ERROR         = 2046;
      const long CR_CONN_UNKNOW_PROTOCOL                = 2047;
      const long CR_INVALID_CONN_HANDLE               = 2048;
      const long CR_SECURE_AUTH                             = 2049;
      const long CR_FETCH_CANCELED                          = 2050;
      const long CR_NO_DATA                                 = 2051;
      const long CR_NO_STMT_METADATA                        = 2052;

      [entry("mysql_affected_rows")   ]   mycall mysql_affected_rows(long hMySQL);
      [entry("mysql_autocommit")      ]   mycall mysql_autocommit(long hMySQL, long lMode);
      [entry("mysql_query")         ]   mycall mysql_query(long hMySQL, LPCSTR sQuery);
      [entry("mysql_init")         ]   mycall mysql_init(long hMySQL);
      [entry("mysql_real_connect")   ]   mycall mysql_connect(long hMySQL, LPCSTR sHostName, LPCSTR sUserName, LPCSTR sPassword, LPCSTR sDBName, int lPort, long unixSocket, long lFlags);
      [entry("mysql_close")         ]   mycall mysql_close(long hMySQL);
      [entry("mysql_store_result")   ]   mycall mysql_store_result(long hMySQL);
      [entry("mysql_errno")         ]   mycall mysql_errno(long hMySQL);
      [entry("mysql_error")         ]   mycall mysql_error(long hMySQL);
   //   [entry("GenRouteKwd")         ]   mycall  GenRouteKwd(long lpData, long lStartOffset, long lEndOffset);

[ala-x]

большое спасибо