vb and access using SHAPE command

[olay_ola]

i'm trying to use this shapy statement in my vb6 program which uses access, i don't know if i'm doing it right but when i try to execute the recordset with this shape statement it seems like it doesn't know what a shape statement is. it keeps telling me that a sql statemtn should start with select, delete, update.

how do i use a shape statement in vb with access, and how do i pass a parameter to the parent from a text box

here is my shape statement and the code i have

myShape = " SHAPE {select * from tblCustomer where intTicketNum=?} AS cmdJobs APPEND (( SHAPE {select * from tblVisit order by intVisitNum Desc} AS cmdJobVisit APPEND ({SELECT * FROM `tblJobOrder`} AS cmdJobOrder RELATE 'visitID' TO 'visitID') AS cmdJobOrder) AS cmdJobVisit RELATE 'intTicketNum' TO 'intTicketNumb') AS cmdJobVisit"


With myCmd
.CommandText = myShape
.Parameters.Append .CreateParameter("o", adVarChar, adParamInput, 10, txtTicketNum.Text)
.CommandType = adCmdText

Set .ActiveConnection = connShape
Set rs = .Execute
End With

[Phil Weber]

Did you look at the example Ron linked to in your previous thread? http://forums.devx.com/showthread.php?t=157806

Compare your connection string with the one in that example.

[olay_ola]

i know but that's not my question , the link Ron Weller gave me is using SQL database, my question was how to let access database deal with the shape command, but it's ok i found the answer now i have to do a connection string with provider Provider = MSDataShape