Får det inte att funka, och hittar inget fel...VB bara stänger ner sig, utan felmeddelande...jag måste nog sova på saken ;)
Räknare via komponent & SP
33 svar · 639 visningar · startad av ironhead · sida 2 av 2
Frågan, av ironhead
Halloj! Nu ere stillestånd i övre regionerna igen...hoppas på hjälp ;) Jag anropar en VB komponent med 1 parameter: test="hej" Set CCol = Server.CreateObject("testa.testaCol") CCol.test=cstr(test) CCol.mCountFM application("ConnectionStr"), application("provider") Komponenten i sin tur anropar en SP med: iDate = CStr(Format(Now, "yyyymmdd")) ' DagensDatum lSQLStr = "sCountFM @iD
Läs frågan i sin helhet →Har du tagit bort errorhandlern?
Nej! Den finns kvar, men VB bara stänger sig på en hundradel när jag kör koden :(
Om du tar bort errorhandlern så borde du få upp en felruta och den felande koden markerad.
Näe, VB bara stängde ner sig
Public Function mCountFM(pConnectionStr As String, pProviderStr As String)
ConnectMe pConnectionStr, pProviderStr
If mConnection.State = adStateClosed Then Exit Function
iPublishDate = CStr(Format(Now, "yyyymmdd"))
lSQLStr = "sCountFM @iPublishDate='" & iPublishDate & "',@sFM='" & CStr(sFaktamangd) & "'"
Set lrec = mConnection.Execute(lSQLStr)
mCountFM = lrec(0)
Exit Function
Det konstiga är att andra funktioner i denna komponent fungerar utan problem.....bara denna som trilskas!
Provade att installera hela skiten på en annan dator, och tog bort count...bara för att lista ut posterna istället...med samma resultat...VB stänger ner sig utan felmeddelande..... :q
Jag sliter mitt hår i frustration...(har snart inget kvar)
Testade andra Funktioner i komponenten, och de funkar klockrent. Vad kan det vara? plz hilfe!
Du har provat att hårdkoda värdena i anropet till proceduren? Hur ser SQL-frågan ut när den körs?
Ja, jag kör bara med hårdkodat just nu.
SQL-frågan:
SELECT DISTINCT tRecipe.iRecipeID
FROM tRecipe LEFT OUTER JOIN
FaktaRecipe ON tRecipe.iRecipeID = FaktaRecipe.iRecipe LEFT OUTER JOIN
Faktamangd ON FaktaRecipe.iRecipeFakta = Faktamangd.iFaktaID LEFT OUTER JOIN
tMainIngredientGroup ON tRecipe.iRecipeID = tMainIngredientGroup.iRecipeID LEFT OUTER JOIN
tIngredientGroup ON tMainIngredientGroup.iIngredientGroupID = tIngredientGroup.iIngredientGroupID LEFT OUTER JOIN
tMealRecipe ON tRecipe.iRecipeID = tMealRecipe.iRecipeID LEFT OUTER JOIN
tMeal ON tMealRecipe.iMealID = tMeal.iMealID LEFT OUTER JOIN
tRecipeOccation ON tRecipe.iRecipeID = tRecipeOccation.iRecipeID LEFT OUTER JOIN
tOccasion ON tRecipeOccation.iOccasionID = tOccasion.iOccasionID LEFT OUTER
JOIN tRecipeType ON tRecipe.iRecipeID = tRecipeType.iRecipeID LEFT OUTER JOIN
tType ON tRecipeType.iTypeID = tType.iTypeID LEFT OUTER JOIN
tThemeIndex ON tRecipe.iRecipeID = tThemeIndex.iRecipeID LEFT OUTER JOIN
tTheme ON tThemeIndex.iThemeID = tTheme.iThemeID LEFT OUTER JOIN
tEditionIndex ON tTheme.iThemeID = tEditionIndex.iThemeID LEFT OUTER JOIN
tEdition ON tEditionIndex.iEditionID = tEdition.iEditionID LEFT OUTER JOIN
tRecipeProduct ON tRecipe.iRecipeID = tRecipeProduct.iRecipeID LEFT OUTER JOIN
tProduct ON tRecipeProduct.iProductID = tProduct.iProductID
WHERE tEdition.iPublishDate <=20031117 and (Faktamangd.sFaktamangd = 'test1'
or Faktamangd.sFaktamangd = 'test2')
Det enda jag kan hitta som skillnad är att jag skickar in id´n till de andra funktionerna & i denna själva namnet (test1,test2)
SQL-frågan fungerar för sig själv alltså, men funktionen som ställer SQL-frågan med hårdkodade värden fungerar inte?
Har du provat att skapa connectionobjekt direkt i denna funktion istället för att anropa ConnectMe?
Har du provat att göra exakt samma sak på en ren ASP-sida utan att gå 'omvägen' via VB?
Har du provat att skapa connectionobjekt direkt i denna funktion istället för att anropa ConnectMe?
Borde inte alla andra funktioner som anropar "ConnectMe" inte funka heller då?
Får testa att göra en "ren" sida då.
Jo, men det är svårt för mig att veta exakt hur din komponent är uppbyggd, exakt hur du kallar på metoder/subrutiner från andra funktioner etc.
Om du har lust att kolla på den kan du bara säga till, så lägger jag upp den....eller så tragglar vi på :)
Jag tar en paus ett tag iaf.. ;)
