stirrat mig tokig...

SELECT a.F_TEAM, a.F_SKEPPARE, b.F_TOTALDAG1, b.F_BONUSDAG1, b.F_TOTALDAG2, b.BONUSDAG2 FROM T_TEAM as a, T_FISKAR as b WHERE a.F_STARTNR = 45 AND a.F_STARTNR = b.F_STARTNR

får jag vid response.write

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

hmmm.... *I REALLY NEED SOME HELP HERE*

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

hur ser koden ut där du öppnar recordsetet?

------------------
mördar-anders, det är jag.

Set Objconn = Server.CreateObject("ADODB.Connection") 
			Objconn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("../../data/medifish.mdb")
			Objconn.open
strSQL ="SELECT a.F_TEAM, a.F_SKEPPARE, b.F_TOTALDAG1, b.F_BONUSDAG1, b.F_TOTALDAG2, b.BONUSDAG2 FROM T_TEAM as a, T_FISKAR as b WHERE b.F_STARTNR = "&intStartnr&" AND a.F_STARTNR = b.F_STARTNR"
Response.Write strSQL
Set ObjRS = ObjConn.Execute(strSQL)

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

Spelar det nån roll att värdet är satt till 0 i kolumnerna b.F_TOTALDAG1, b.F_BONUSDAG1, b.F_TOTALDAG2, b.BONUSDAG2? (det ska det väll inte göra)

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

vad händer om du kör frågan direkt i access?

------------------
mördar-anders, det är jag.

jag får

ange parametervärde i bonusdag2

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

Set Objconn = Server.CreateObject("ADODB.Connection") 
Objconn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("../../data/medifish.mdb")
Objconn.open
strSQL ="SELECT a.F_TEAM, a.F_SKEPPARE, b.F_TOTALDAG1, b.F_BONUSDAG1, b.F_TOTALDAG2, b.BONUSDAG2 FROM T_TEAM as a, T_FISKAR as b WHERE b.F_STARTNR = "&intStartnr&" AND a.F_STARTNR = b.F_STARTNR"
Response.Write strSQL
Set ObjRS = ObjConn.Execute(strSQL)

skulle ju vara

Set Objconn = Server.CreateObject("ADODB.Connection") 
Objconn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("../../data/medifish.mdb")
Objconn.open
strSQL ="SELECT a.F_TEAM, a.F_SKEPPARE, b.F_TOTALDAG1, b.F_BONUSDAG1, b.F_TOTALDAG2, b.[b]F_[/b]BONUSDAG2 FROM T_TEAM as a, T_FISKAR as b WHERE b.F_STARTNR = "&intStartnr&" AND a.F_STARTNR = b.F_STARTNR"
Response.Write strSQL
Set ObjRS = ObjConn.Execute(strSQL)

:r

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

är det inte så att du skrivit fel på det fältnamnet?

ska inte det heta F_BONUSDAG2?

------------------
mördar-anders, det är jag.

klantskaft! ;)

------------------
mördar-anders, det är jag.

det är dags att se det nu ...*ler*

men nu har det tillkommit problem.

Microsoft VBScript runtime error '800a000d' 

Type mismatch 

/inv2.asp, line 15

koden ser ut som följande:

[b]If ObjRS("F_TOTALDAG1") = 0 Then[/b]
	Call form1
ElseIf ObjRS("F_TOTALDAG1") <> 0 AND ObjRS("F_TOTALDAG2") = 0 Then
	Call Form2
ElseIf ObjRS("F_TOTALDAG1") <> 0 AND ObjRS("F_TOTALDAG2") <> 0 AND ObjRS("F_TOTALDAG3") = 0 then
	Call Form3
Else
	Call Form4
End If

Eller har ni en annan lösning ?

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

[Redigerat av icaaq den 24 aug 2001]

kom på det... måste ju vara Tal

If Cint(ObjRS("F_TOTALDAG1")) = 0 Then

:)

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