Set rs2 = rsSql2.RunSelectSQLUpdatable("select * from tblmpartcost right outer join tblpartcost on tblmpartcost.clientcode = tblpartcost.clientcode where clientcode = '" & Trim(Item.SubItems(1)) & "' order by partname")
...全文
913打赏收藏
vb中的SQL语句运行时出错,高手解决一下!
下面这句错(写在vb中)在哪里? Set rs2 = rsSql2.RunSelectSQLUpdatable("select * from tblmpartcost right outer join tblpartcost on tblmpartcost.clientcode = tblpartcost.clientcode where clientcode = '" & Trim(Item.SubItems(1)) & "' order by partname")
Set rs2 = rsSql2.RunSelectSQLUpdatable("select * from tblmpartcost right outer join tblpartcost on tblmpartcost.clientcode = tblpartcost.clientcode where tblpartcost.clientcode = '" & Trim(Item.SubItems(1)) & "' order by tblpartcost.partname")