Jag får ovanstående felmedd när jag kör ett shape-kommando i vb 6.0

"SHAPE {{ CALL bkeep_gea_fill_sp(?,?) }} " & _
"APPEND ( {{ CALL bkeep_gea_fill_names_sp }} " & _
"RELATE gelid TO gelid, glaccount TO glaccount ) AS LocalizedNames"

oQuery.Execute(shapeSQL, sConnShape, oParams) 'där oParams är de parametrar som betecknas med ?,? i shape-strängen...

sConnShape = Provider=MSDataShape;Data Source=xxx;Initial Catalog=xxx;User ID=xxxr;Password=xxx;Use Procedure for Prepare=0;Application Name=xxx;Data Provider=SQLOLEDB

Är det någon som stött på detta och hittat nån lösning?

/Jenny

Hej!

Vet inte vad det är du ska göra, men....
Jag skriver SQLOLEDB.1 som provider.
Testa att lägg till ".1" på providern.
Verkar som att du kör mot en Stored Procedure.
Då är det viktigt att frågetecknen stämmer med antal och typ mot inparametrarna i SP'n.
Finns undantag på detta, men lämnar det för tillfället.

//Håkan

Jag testade att ändra provider till SQLOLEDB.1 - ingen skillnad tyvärr :S
Ja, jag kör mot 2 stored procedures för att få en slags hierarki. Antalet parametrar stämmer, så det är inte där felet ligger.

Någon annan idé?

Testa att ta bort
<code>Use Procedure for Prepare=0</code>
och kanske även <code>Application Name=xxx</code>

Shape har fungerat för mig när jag har haft allt i din ursprungliga connectionstring förutom dessa värdena som jga aldrig använder.

Waaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaha

Heeeeej Jenny hur är det me dig då ;) Har du gift dig, grattulerar.....
Glöm inte bort oss i Järbo vaaa....

Hälsa nu alla du vet ja känner....

hehe (Fel forum att morsa på, men kunde inte låta bli när du kom in.)

Var nu snäll o maila mej en epost där du berättar alla detaljer jag missat
från Alborgen fram till nu ;) typ va jobbar du me nu då... Ja du vet...

Ha det bra då...

hmmm (hoppas du e rätt Jenny nu dååååå, annars har man väl skämt ut sig lite)...

Hej!

Detta är taget från BOL.
Kanske finns där någon ögonöppnare....
Ser att du har dubbla "måsvingar" ( { ), exemplet nedan har det inte.

This is the Microsoft Visual Basic® source code for the sGetTitleAuthors function:

Private Function sGetTitleAuthors() As String
Dim rstParent   As ADODB.Recordset
Dim rstChild    As ADODB.Recordset
Dim sBuf        As String
   
Const CONNECT_PUBS = "PROVIDER=MSDataShape;DATA PROVIDER=SQLOLEDB;" & _
    "SERVER=;DATABASE=pubs;UID=sa;PWD=;"
Const SHAPE_TITLEAUTHORS = _
    "SHAPE {SELECT au_id, au_lname, au_fname FROM authors} " & _
    "APPEND ({SELECT au_id, title FROM titleauthor TA, titles TS " & _
             "WHERE TA.title_id = TS.title_id} " & _
            "AS title_chap RELATE au_id TO au_id)"
            
    '----- create rowsets
    Set rstParent = New ADODB.Recordset
    rstParent.Open SHAPE_TITLEAUTHORS, CONNECT_PUBS
            
    '----- process parent rowset
    Do While Not rstParent.EOF
        sBuf = sBuf & rstParent("au_id") & vbTab & _
            rstParent("au_lname") & ", " & rstParent("au_fname") & vbCrLf
            
        '----- process chapter of child rowset
        Set rstChild = rstParent("title_chap").Value
        Do While Not rstChild.EOF
            sBuf = sBuf & vbTab & vbTab & rstChild("title") & vbCrLf
            rstChild.MoveNext
        Loop
        rstParent.MoveNext
    Loop
    sGetTitleAuthors = sBuf
End Function

Tack allesammen. Jag hittade felet o den var inte i VB-koden, utan en rad i min sp...

/Jenny

Hej Peter, jag skickar dig ett maaaail :)

jaaaa Jenny MEN

inte till förnamn.efternamn@firman.se dit kommer bara spammet...

skicka till peterh@firman.se så kommer det fram :D

[peter.h]