how VB update Table A INNER JOIN Table B, Set A.co=B.ID
Looks like VB6 code to me. : )
The original poster did this a few days ago -- posted a vb6 question to
every possible forum regardless of it's relevance. . .
--
Jacob Grass
Microsoft .NET MVP
Quote:
> you posted this to the wrong forum, you should use
> microsoft.public.dotnet.languages.vb
> > How vb update a table when this table inner join table b
> > Table A and Table B are in Different Access Database file.
> > table A.Co = Table B.ID, Set Table A.Remark = New
> > Private Sub Form_Load()
> > conString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path &
_
> > "\A.mdb;Persist Security Info=False"
> > Set objRe = New ADODB.Recordset
> > conString1 = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path
&
> _
> > "\B.mdb;Persist Security Info=False"
> > Set objUpd = New ADODB.Recordset
> > End Sub
> > -------------------------------------------------
> > Private Sub UpdateDB_Click()
> > With objUpd
> > If .State = adStateOpen Then .Close
> > .ActiveConnection = conString1
> > .Source = "UPDATE A INNER JOIN B ON A.co = B.id SET A.remark = "new"
> > .Open
> > End With
> > End Sub
> > thank you
