<div>
<div class="content wysiwyg-content">
Dear Gurus<br />
I have two tables, and want to use VB6 to list those records where the contents of the COMPANY_NAME field is common to both tables. I've tried the following, but Microsoft says error.<br />
SQLStr = &quot;SELECT FROM DB_ALL_2.COMPANY_NAME &quot;&nbsp;&amp; _<br />
&quot;FROM DB_ALL_2 LEFT JOIN DB_ALL_1 ON DB_ALL_2.COMPANY_NAME = DB_ALL_1.COMPANY_NAME &quot;&nbsp;&amp; _<br />
&nbsp;&quot;WHERE (DB_ALL_1.COMPANY_NAME = DB_ALL_2.COMPANY_NAME)&quot;<br />
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Recordset1.Open SQLStr, DbsConnection, adOpenStatic<br />
<br />
Microsoft's error is:<br />
'The SELECT statement includes a reserved word or an argument name that is misspelled or missing, or the punctuation is incorrect'<br />

</div>
</div>


Dear Gurus
I have two tables, and want to use VB6 to list those records where the contents of the COMPANY_NAME field is common to both tables. I've tried the following, but Microsoft says error.
SQLStr = "SELECT FROM DB_ALL_2.COMPANY_NAME " & _
"FROM DB_ALL_2 LEFT JOIN DB_ALL_1 ON DB_ALL_2.COMPANY_NAME = DB_ALL_1.COMPANY_NAME " & _
 "WHERE (DB_ALL_1.COMPANY_NAME = DB_ALL_2.COMPANY_NAME)"
           Recordset1.Open SQLStr, DbsConnection, adOpenStatic

Microsoft's error is:
'The SELECT statement includes a reserved word or an argument name that is misspelled or missing, or the punctuation is incorrect'


SQL Syntax error (finding common records in two tables) using VB6

SQL (Structured Query Language) is designed to be used in conjunction with relational database products as of a means of working with sets of data. SQL consists of data definition, data manipulation, and procedural elements. Its scope includes data insert, query, update and delete, schema creation and modification, and data access control.