---
title: "Inkompatibla typer: 'CInt'"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/8515-inkompatibla-typer-cint"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Ghost of North"
published: "2001-03-13T16:36:00.000Z"
updated: "2001-03-13T18:04:00.000Z"
replies: 3
views: 408
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/8515-inkompatibla-typer-cint"
---

# Inkompatibla typer: 'CInt'

## #1 — Ghost of North, 2001-03-13T16:36Z

Hjälp nån...?

Körningsfel i Microsoft VBScript fel '800a000d' 
Inkompatibla typer: 'CInt' 
/gastbok/guest.asp, rad 210 

```
<%
End Sub

Sub Show
NumPerPage=INT(objRec2("NumPerPage"))
If Request.QueryString("page") = "" Then
	iPageCurrent = 1
Else
	[b]iPageCurrent = CInt(Request.QueryString("page"))  ***raden i fråga[/b]
End If
Set objRec = Server.CreateObject ("ADODB.Recordset")
StrSql = "SELECT * FROM Messages ORDER BY ID DESC;"
objRec.PageSize = NumPerPage
objRec.CacheSize = NumPerPage
objRec.Open StrSql,objConn,3,1,&H0001
iPages = objRec.PageCount
TotalRows = objRec.RecordCount 
If iPageCurrent > iPages Then iPageCurrent = iPages
If iPageCurrent < 1 Then iPageCurrent = 1
If iPages = 0 Then
Response.Write "Inga poster i dagboken!"
Else
ObjRec.AbsolutePage = iPageCurrent
%>

<%
If iPageCurrent <> 1 Then
	Response.Write("<a href=./guest.asp?page=" & iPageCurrent - 1 & """>Föregående</a> - ")
Else
	Response.Write "Föregående - "
End If
For I = 1 To iPages
If I = iPageCurrent Then
	Response.Write "<b>" & I & "</b> "
	Else
		Response.Write "<a href=./guest.asp?page=" & I & ">" & I & "</a> "
	End If
	Next
	Response.Write "&nbsp;"
	Else
		Response.Write "&nbsp;"
	End If 
End If
If iPageCurrent <> iPages Then
	Response.Write(" - <a href=./guest.asp?page=" & iPageCurrent + 1 & """>Nästa</a></font>")
Else
	Response.Write " - Nästa</font>"
End If

objRec.Close
Set objRec = Nothing
End Sub

Set objConn = Server.CreateObject ("ADODB.Connection")
objConn.Open StrConn
Set objRec2 = Server.CreateObject ("ADODB.Recordset")
ConfigSql = "SELECT * FROM Admin;"
objRec2.Open ConfigSql,objConn,0,1,&H0001
%>
```

Det som inte funkar är föregående/nästa. Att byta via sifferlänkarna går bra.
Vad innebär eg. CInt?

Permalänk: https://www.webforum.nu/p/8515

## #2 — Eclipse, 2001-03-13T16:44Z

**CInt**

index.asp?ID=23

Om du skickar detta så uppfattas ID ha ett textvärdet 23 och det vill du inte, du vill att det ska vara **siffran** 23\.

För att göra denna konvertering kan man använda CInt:

myID = cInt(request("ID"))

are you with??

\---
Av någon konstig anledning fungerar:  "SELECT \* FROM \[news\] WHERE ID =" & request("ID")

Men om du ska fråga så fungerar det inte, typ...

IF request("ID") \<= mySQL("x_ID") THEN...

Lite för svårt att förstå kanske, men kort sagt, i det sista fallet uppfattas 23 som TEXT och det vill man inte, då använder man cInt!

Permalänk: https://www.webforum.nu/p/261077

## #3 — Ghost of North, 2001-03-13T16:54Z

Men då fattar jag den biten :D

Orsaken till att ditt andra exempel kräver CInt är nog att du  där försöker jämföra värden. I det första fallet ska det ju bara stå likadant.

Löste mitt kodproblem oxå. Hade ett par extra haröron på en helt annan rad än 210... :q

Permalänk: https://www.webforum.nu/p/261078

## #4 — @nders, 2001-03-13T18:04Z

Av någon konstig anledning fungerar: "SELECT \* FROM \[news\] WHERE ID =" & request("ID")

jag tycker inte att det är någon konsting anledning.

i vbscript är alla variabler av datatypen *variant*, och av en eller annan subtyp (integer (heltal), sträng, osv).

när du skapar en sql-fråga i asp är den av subtypen sträng ('*sql-sträng*', som så många säger), och vad helst du puttar på den strängen (*konkatenering*) förblir slutresultatet en variant av subtypen sträng.

det är väl inte så konstigt? förstods förklaringen?

Permalänk: https://www.webforum.nu/p/261079

---

Tråden på webben: https://www.webforum.nu/amne/asp/8515-inkompatibla-typer-cint