Visual Basic&database, ADO And Datareport

ADO And Datareport

Author	Message
Arnold Dikstaa #1 / 2	ADO And Datareport So I created a parent child ADO: Private Sub Form_Load() Dim oConn As ADODB.Connection Dim oRS As ADODB.Recordset Dim oRSChild As ADODB.Recordset Set oConn = CreateObject("ADODB.Connection") Set oRS = CreateObject("ADODB.Recordset") oConn.Provider = "MSDataShape" oConn.Open "Data Provider=Microsoft.Jet.OLEDB.4.0; Data Source=d:\Testen\CCRM.mdb;Persist Security Info=False" oRS.Open "SHAPE {SELECT * FROM Overzichtenteamselectiedeel1 WHERE TeamId = 11} " _ & "APPEND ({SELECT * FROM Overzichtenteamselectiedeel2} " _ & "AS oRSMedewerkers " _ & "RELATE TeamId TO TeamId)", oConn And now I want to connect it to a datareport. Everything I tried comes back with errors. Does NE1 know how to do it? Thanks!
Fri, 27 Jun 2003 05:36:42 GMT

Scott Facula #2 / 2	ADO And Datareport The easiest way to use Datareport is to make your query in the DataEnvironment and then go into the properties of the Datareport and attach the Data Source. Don't bother with the coding the DataEnvironment handles it really nicely. Scott Quote: > So I created a parent child ADO: > Private Sub Form_Load() > Dim oConn As ADODB.Connection > Dim oRS As ADODB.Recordset > Dim oRSChild As ADODB.Recordset > Set oConn = CreateObject("ADODB.Connection") > Set oRS = CreateObject("ADODB.Recordset") > oConn.Provider = "MSDataShape" > oConn.Open "Data Provider=Microsoft.Jet.OLEDB.4.0; Data > Source=d:\Testen\CCRM.mdb;Persist Security Info=False" > oRS.Open "SHAPE {SELECT * FROM Overzichtenteamselectiedeel1 WHERE TeamId = > 11} " _ > & "APPEND ({SELECT * FROM Overzichtenteamselectiedeel2} " _ > & "AS oRSMedewerkers " _ > & "RELATE TeamId TO TeamId)", oConn > And now I want to connect it to a datareport. Everything I tried comes back > with errors. Does NE1 know how to do it? > Thanks!
Sat, 28 Jun 2003 14:37:32 GMT

Page 1 of 1

[ 2 post ]