Type Mismatch

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.

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. ;)

Ä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

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