how VB update Table A INNER JOIN Table B, Set A.co=B.ID 
Author Message
 how VB update Table A INNER JOIN Table B, Set A.co=B.ID

you posted this to the wrong forum, you should use
microsoft.public.dotnet.languages.vb

Quote:

> 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



Sat, 03 Apr 2004 04:24:49 GMT  
 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



Sat, 03 Apr 2004 04:40:21 GMT  
 
 [ 2 post ] 

 Relevant Pages 

1. how VB update Table A INNER JOIN Table B, Set A.co=B.ID

2. how VB update Table A INNER JOIN Table B, Set A.co=B.ID

3. Joined Table update ADO.NET and C#

4. MS ACCESS97 Multiple Table Join - Edit/Update Problems

5. Updating Joined Tables

6. VB? how to inner join two tables in two MS Access database

7. Joining multiple tables with VS.NET data adapter wizard

8. Joining two tables in Visual C++

9. Joining two tables from SQL server in Visual C++ 6

10. Fetching data joined 3 tables

11. Fetching Data joined 3 tables

12. CRecordset and joining tables

 

 
Powered by phpBB® Forum Software