This statement:

SELECT Drivers.DriverID, Drivers.FName, Drivers.LName FROM Teams INNER JOIN
TeamDetails ON Teams.TeamID = TeamDetails.TeamID INNER JOIN Drivers ON
TeamDetails.DriverID = Drivers.DriverID WHERE Teams.TeamID = 1

works fine when executing natively in MySQL (MySQL-Front).

But when I try to run it from a VB app using ADO, it fails.  Interestingly,
if I use a select statement with no joins or open a table directly, ADO
works just fine.  Any thoughts appreciated.  But adding the join causes an
"Operation Aborted" error.


Public Function FetchXML(iTeamID As Integer) As String

  Dim rs As ADODB.Recordset

  Dim strSQL As String

  strSQL = "SELECT Drivers.DriverID, Drivers.FName, Drivers.LName " _
    & "FROM (Teams INNER JOIN TeamDetails ON Teams.TeamID =
TeamDetails.TeamID) " _
    & "INNER JOIN Drivers ON TeamDetails.DriverID = Drivers.DriverID WHERE
Teams.TeamID = " & iTeamID

  Set rs = New ADODB.Recordset

  With rs
    .Open strSQL, gdb 

    FetchXML = GetXML("Driver", rs)

    .Close

  End With

  Set rs = Nothing

End Function


---------------------------------------------------------------------
Before posting, please check:
   http://www.mysql.com/manual.php   (the manual)
   http://lists.mysql.com/           (the list archive)

To request this thread, e-mail <[EMAIL PROTECTED]>
To unsubscribe, e-mail <[EMAIL PROTECTED]>
Trouble unsubscribing? Try: http://lists.mysql.com/php/unsubscribe.php

Reply via email to