how to put data in to data shape child object 
Author Message
 how to put data in to data shape child object

i define a data shape have include 2 child but how to let data to child
?
strShape = _
SHAPE APPEND
New adVarWChar(8) As STAFF_CODE,
New adVarWChar(20) As STAFF_NAME,
((SHAPE APPEND New adVarWChar(8) As SALESMAN_CODE,
New adVarWChar(10) As MEMBER_CODE,
New adVarWChar(40) As MEMBER_NAME,
New adVarWChar(11) As INVOICE_NO,
New adDate as TRANS_DATE,
((SHAPE APPEND New adDate as TRANS_DATE,
New adCurrency As SALESMAN_COMM_VOL,
New adCurrency As SALESMAN_COMM_AMT,
New adCurrency As INVOICE_AMOUNT)
AS Child2 RELATE TRANS_DATE to TRANS_DATE))
AS Child1 RELATE STAFF_CODE to SALESMAN_CODE)

Set objRst_ShapeParent = New ADODB.Recordset
    With objRst_ShapeParent
        .LockType = adLockBatchOptimistic
        .Open strShape, "Provider=MSDataShape;Data Provider=None"
End With

Set objRst_ShapeChild1 = objRst_ShapeParent("Child1").Value
Set objRst_ShapeChild2 = objRst_ShapeParent("Child2").Value

*** Sent via Developersdex http://www.*-*-*.com/ ***
Don't just participate in USENET...get rewarded for it!



Tue, 28 Dec 2004 11:40:54 GMT  
 
 [ 1 post ] 

 Relevant Pages 

1. How to Put Data to data Shape?

2. Data shaping: Child Recordsets

3. Using MS Data Shaping with OLE DB - data from more than one table in mpp file

4. Using the Shape command to multiple grouping of data for data reports

5. Data Environment and Data shapes

6. Using the Shape command to multiple grouping of data for data reports

7. Data Shaping/Hierarchical Data

8. VB6 Question re: Data Shaping relations and Shape query

9. Need to put String variable into Recordsource of Data object

10. VB6 Question re: Data Shaping relations and Shape query

11. VB6 Question re: Data Shaping relations and Shape query

12. VB 6.0 Data Designer - Parent/Child object open error

 

 
Powered by phpBB® Forum Software