Type Mismatch

3 svar · 244 visningar · startad av CatZ 22 jan. 2004

CatZMedlem sedan jan. 20022 440 inlägg

Trådstart22 jan. 2004 14:57#1

Får följande felmeddelande på crystone's server, men inte på min egen. Har inte internet hemma så jag försöker pula med det via en dator på jobbet.

Microsoft JET Database Engine error '80004005'

Type mismatch in expression.

/spelprogram.asp, line 24

Koden det gäller ser ut som följer:

<!--#include virtual="/include/konfig.inc"-->
<!--#include virtual="/include/funktioner.asp"-->
<!--#include virtual="/include/header.asp"-->
<%
	Dim SQL, objRS
	Dim i
	Dim datDatum, strJour, strForm, strAnm, strAnsv
	Dim intTypID, intSpelID
	Dim linkEdit, linkKasta, linkInfo, linkGetRes
	Dim strResultat
	
		intTypID 	= Request.Querystring("id")
		strResultat	= Request.Querystring("res")
		
		If intTypID = Empty Then
			intTypID = "1"
		End IF		
			SQL = " SELECT tblSpelprogram.*, tblSpelTyp.* " _
				& " FROM tblSpelprogram " _
				& " INNER JOIN tblSpelTyp " _
				& " ON tblSpelprogram.SmTyp = tblSpelTyp.StID " _
				& " WHERE SmTyp = " & intTypID & " " _
				& " ORDER BY SmDatum "
			set objRS = objConn.Execute(SQL)		
%>
<p id="titel"><%= getComp(intTypID) %></p>
<table width="100%" class="tabell" border="0" cellspacing="0" cellpadding="3" valign="top">
	<tr class="meny1">
		<td width="10%"><b>Datum</b></td>
		<% 
			If Session("WBResultat") <> Empty Then 
				Response.Write "<td class='meny1' width='10%'><b>Admin</b></td>"
			End If
		%>
		<td width="20%"><b>Spelform</b></td>
		<td width="10%"><b>Mer Info</b></td>
		<td width="10%"><b>Resultat</b></td>
	</tr>

Vete tusan var rad 24 är fel..... kanske är något i en include fil, men jag tror inte det.

m_soderlundMedlem sedan sep. 20026 425 inlägg

22 jan. 2004 15:04#2

Det verkar ha med din SQL-fråga att göra. Hur ser den ut när du skriver ut med Response.Write?

Response.Write SQL

Nästa gång - markera gärna aktuell rad med -taggen så slipper vi räkna i koden.

CatZMedlem sedan jan. 20022 440 inlägg

23 jan. 2004 10:35#3

Ändrade lite i koden bytte ut min join mot

			SQL = " SELECT * " _
				& " FROM tblSpelprogram " _
				& " WHERE SmTyp = " & intTypID & " " _
				& " ORDER BY SmDatum "
			[b]set objRS = objConn.Execute(SQL)[/b]

och får nu upp detta felmess:
Microsoft JET Database Engine error '80040e07'

Data type mismatch in criteria expression.

/spelprogram.asp, line 22

@ndersMedlem sedan juni 200032 967 inlägg

23 jan. 2004 10:40#4

Vad är smTyp för datatyp? Text? I så fall ska du ha apostrofer runt värdet i where-satsen.