METHOD CurrentWhere( lOrgTable ) CLASS XMySQLRecords
LOCAL nField, cWhere := ""
FOR EACH nField IN ::aPKFields
IF !Empty( cWhere )
cWhere += " AND "
ENDIF
IF lOrgTable
IF !Empty( ::cTable )
cWhere += ::cTable + "."
ENDIF
ELSEIF !Empty( ::aStruct[ nField, 8 ] )
cWhere += ::aStruct[ nField, 8 ] + "."
ENDIF
WITH OBJECT ::oDataset
IF :lOnEdit
cWhere += ::aStruct[ nField, 1 ] + "=" + ValToStr( ::aRecord[ nField ] )
ELSE
cWhere += ::aStruct[ nField, 1 ] + "=" + ValToStr( ::aData[ ::Recno, nField ] )
ENDIF
END WITH
NEXT
RETURN cWhere
If you do not know how to correct the code, just let me know and I make things easier for you. BTW, I suggest you move to MariaDB; you just need to change the datasource, that's all. MySQL dll is not freeware, but MariaDB it is.