too few parameters

hittade lite kod när jag sökte här som verkade användbar :) ett problem har dock dykt upp på följande rader:

strsql1 = "select count(*) as antalpolare from kompisar where login = '" & session("online") & "'"
strsql2 = "select count(*) as antalnya from meddelande where till = '" & session("online") & "' and status='nytt'" 

set rs1=Databas.execute(strsql1)
set rs2=Databas2.execute(strsql2)
polare = rs1("antalpolare")
nyameddelanden = rs2("antalnya")

felmeddelande:

Microsoft OLE DB Provider for ODBC Drivers error '80040e10'

[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.

:q

------------------
It aint over until the fat lady sings...

strsql1 = "select count(*) as antalpolare from kompisar where login = '" & session("online") & "'"
strsql2 = "select count(*) as antalnya from meddelande where till = '" & session("online") & "' and status='nytt'" 
set rs1=Databas.execute(strsql1)
[b]set rs2=Databas2.execute(strsql2)[/b]
polare = rs1("antalpolare")
nyameddelanden = rs2("antalnya")

vad är den fetmarkerade raden för något har du öppnat 2 connections??

jag vet inte om det är felet men det såg lite mysko ut ...tyckte jag??

------------------
I like ¼ £ whith cheese

Dubbelkolla så att alla tabellnamn är exakt samma som i databasen.
Menar kolumnnamn...

Har du två databaser?

------------------
MVH // Cyprys
Cyprys
Synd att du inte kan köpa en voodoojordglob och sedan snurra på den fort som fan och skrämma skiten ur alla.

[Redigerat av cyprys den 17 jul 2001]

[Redigerat av cyprys den 17 jul 2001]

hela koden ser ut såhär:

<%
Set Databas = Server.CreateObject("ADODB.Connection")
Set Databas2 = Server.CreateObject("ADODB.Connection")
MdbFilePath = Server.MapPath("medlemmar.mdb")
MdbFilePath2 = Server.MapPath("mess.mdb") 

Databas.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ= " & MdbFilePath & ";"
strsql1 = "select count(*) as antalpolare from kompisar where login = '" & session("online") & "'"
strsql2 = "select count(*) as antalnya from meddelande where till = '" & session("online") & "' and status='nytt'" 

set rs1=Databas.execute(strsql1)
set rs2=Databas2.execute(strsql2)
polare = rs1("antalpolare")
nyameddelanden = rs2("antalnya")
rs1.close
rs2.close
%>

------------------
It aint over until the fat lady sings...

LarsG sa en gång

Möjliga felkällor: felstavade kolumnnamn, odefinierade variabler, bortglömda apostrofer.

------------------
I like ¼ £ whith cheese

Jag tror på fel kolumnnamn någonstans

------------------
MVH // Cyprys
Cyprys
Synd att du inte kan köpa en voodoojordglob och sedan snurra på den fort som fan och skrämma skiten ur alla.

om du skriver ut dina SQL-satser med response.write vad får du då??

------------------
I like ¼ £ whith cheese

okej, det var precis som du trodde cyprys, slarv av mig :r

däremot kommer det ett nytt problem nu:

felmeddelande:

ADODB.Connection error '800a0e78'

Operation is not allowed when the object is closed.

skriver ut det så här:

<% Response.Write"Välkommen, " & Session ("namn") & ", du har " & polare & "kompisar och " & rs2("antalnya") & " nya meddelanden." %>

------------------
It aint over until the fat lady sings...

Borde det inte vara en:

Databas2.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ= " & MdbFilePath2 & ";"

med någonstans??

------------------
*Det löser sig sa han som sket i polen*
-Vacca Foeda.

[Redigerat av terranigma den 18 jul 2001]

Precis. Borde nog öppna även den andra databasen..

------------------
MVH // Cyprys
Cyprys
Synd att du inte kan köpa en voodoojordglob och sedan snurra på den fort som fan och skrämma skiten ur alla.

ok, det börjar ta sig :D

nu får jag inget felmeddelande men det skrivs inte heller ut något annat än en 0:a, även om man har nya meddelanden osv..

ändrade även lite i koden som skriver ut så det ser ut såhär nu:

<% Response.Write"Du har " & polare & " kompisar." %>

och

<% Response.Write"Du har " & nyameddelanden & " nya meddelanden." %>

:q

------------------
It aint over until the fat lady sings...

nevermind, löste det :D

------------------
It aint over until the fat lady sings...