Am tring to join to files in vb here is my code what am I doing wrong?
Set cmd = New ADODB.Command
AdoLoadTasks.ConnectionString = cn400
AdoLoadTasks.RecordSource = "SELECT * FROM ENPRAWD02.PRJTSKPF a " _
& "JOIN ENPRAWD02.TSKPF b On a.tsknbr = b.tsknbr" _
& "WHERE a.prjnbr = " _
& "(" & cmbProjectNumber.Text & " " _
& "ORDER BY a.tsknbr"
AdoLoadTasks.Refresh
MSHFlexGrid1.Visible = True
'Set DataGrid1.DataSource = AdoLoadTasks
Set MSHFlexGrid1.DataSource = AdoLoadTasks
Its telling me that token A is not valid
Set cmd = New ADODB.Command
AdoLoadTasks.ConnectionString = cn400
AdoLoadTasks.RecordSource = "SELECT * FROM ENPRAWD02.PRJTSKPF a " _
& "JOIN ENPRAWD02.TSKPF b On a.tsknbr = b.tsknbr" _
& "WHERE a.prjnbr = " _
& "(" & cmbProjectNumber.Text & " " _
& "ORDER BY a.tsknbr"
AdoLoadTasks.Refresh
MSHFlexGrid1.Visible = True
'Set DataGrid1.DataSource = AdoLoadTasks
Set MSHFlexGrid1.DataSource = AdoLoadTasks
Its telling me that token A is not valid