---
title: "Type mismatch."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/92238-type-mismatch"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Thompa__85"
published: "2003-12-09T18:30:31.000Z"
updated: "2003-12-09T21:26:45.000Z"
replies: 10
views: 272
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/92238-type-mismatch"
---

# Type mismatch.

## #1 — Thompa__85, 2003-12-09T18:30Z

Hejsan!
Varför vill inte denna kod fungera?

```
RecSet("alder")=request.form("ar") + request.form("manad") + request.form("dag")
```

Felmeddelande:

```
Provider error '80020005' 

Type mismatch. 

/2/installningar_medlem.asp, line 38
```

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

## #2 — LR^evil.sid, 2003-12-09T18:44Z

```
CDate(RecSet("alder"))=CDate(request.form("ar") &"-"& request.form("manad") &"-"& request.form("dag"))
```

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

## #3 — Thompa__85, 2003-12-09T20:25Z

> **LR^evil.sid skrev:**
>
> ```
> CDate(RecSet("alder"))=CDate(request.form("ar") &"-"& request.form("manad") &"-"& request.form("dag"))
> ```

Hmm, den säger såhär:

```
Microsoft VBScript runtime error '800a000d' 

Type mismatch: 'CDate' 

/2/installningar_medlem.asp, line 38
```

Varför?

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

## #4 — Sebbe, 2003-12-09T20:31Z

```
CInt(RecSet("alder")) = CInt(request.form("ar")) + CInt(request.form("manad")) + CInt(request.form("dag"))
```

Antar jag i alla fall att du vill ha.

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

## #5 — LR^evil.sid, 2003-12-09T20:41Z

```
Type mismatch: 'CDate'
```

då är inte recset("alder") av datumtyp?

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

## #6 — Engine^, 2003-12-09T20:42Z

Vill du lagra det som ett datum (yyyy-mm-dd), så kan du göra såhär

```
RecSet("alder") = DateSerial(Request.Form("ar"), Request.Form("manad"), Request.Form("dag"))
```

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

## #7 — Thompa__85, 2003-12-09T21:08Z

> **Engine^ skrev:**
>
> Vill du lagra det som ett datum (yyyy-mm-dd), så kan du göra såhär
>
> ```
> RecSet("alder") = DateSerial(Request.Form("ar"), Request.Form("manad"), Request.Form("dag"))
> ```

Okej...
men så här säger den då..
Microsoft VBScript runtime error '800a000d' 

Type mismatch: '\[string: "Maj"\]' 

/2/installningar_medlem.asp, line 38 

Och jo, RecSet("alder") är Datum/tid format... :/

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

## #8 — Sebbe, 2003-12-09T21:16Z

Jasså, du har gjort det så. Då får du nog göra en funktion av det:

```
Function ChangeNameToNumber(strName)
  Select Case LCase(Trim(strName))
    Case "januari" : intNum = 1
    Case "februari" : intNum = 2
    Case "mars" : intNum = 3
    Case "april" : intNum = 4
    Case "maj" : intNum = 5
    Case "juni" : intNum = 6
    Case "juli" : intNum = 7
    Case "augusti" : intNum = 8
    Case "september" : intNum = 9
    Case "oktober" : intNum = 10
    Case "november" : intNum = 11
    Case "december" : intNum = 12
  End Select

  ChangeNameToNumber = intNum
End Function

RecSet("alder") = DateSerial(Request.Form("ar"), ChangeNameToNumber(Request.Form("manad")), Request.Form("dag"))
```

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

## #9 — Engine^, 2003-12-09T21:24Z

Type mismatch: '\[string: "Maj"\]' 

Det är ju inte på formen *mm*... men det går ju förstås att fula sig runt

```
Dim objMonths

Set objMonths = Server.CreateObject("Scripting.Dictionary")
objMonths.Add "Januari", 1
objMonths.Add "Febuari", 2
.
.
.
objMonths.Add "December", 12

RecSet("alder") = DateSerial(Request.Form("ar"), objMonths(Request.Form("manad")), Request.Form("dag"))
```

**red.**
Eller så gör man som **Sebbe** föreslår och skippar att skapa ett dict-objekt... även om det kan vara kul :OO :bire

Man kanske ska använda sig utav *Förhandsgranska* lite oftare :)

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

## #10 — Thompa__85, 2003-12-09T21:26Z

> **Sebbe skrev:**
>
> Jasså, du har gjort det så. Då får du nog göra en funktion av det:
>
>
> ```
> Function ChangeNameToNumber(strName)
>   Select Case LCase(Trim(strName))
>     Case "januari" : intNum = 1
>     Case "februari" : intNum = 2
>     Case "mars" : intNum = 3
>     Case "april" : intNum = 4
>     Case "maj" : intNum = 5
>     Case "juni" : intNum = 6
>     Case "juli" : intNum = 7
>     Case "augusti" : intNum = 8
>     Case "september" : intNum = 9
>     Case "oktober" : intNum = 10
>     Case "november" : intNum = 11
>     Case "december" : intNum = 12
>   End Select
> 
>   ChangeNameToNumber = intNum
> End Function
> 
> 
> RecSet("alder") = DateSerial(Request.Form("ar"), ChangeNameToNumber(Request.Form("manad")), Request.Form("dag"))
> ```

Tack det löste mitt problem! tack!

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

## #11 — Thompa__85, 2003-12-09T21:26Z

> **Engine^ skrev:**
>
> Type mismatch: '\[string: "Maj"\]' 
> 
> Det är ju inte på formen *mm*... men det går ju förstås att fula sig runt
>
> ```
> Dim objMonths
> 
> Set objMonths = Server.CreateObject("Scripting.Dictionary")
> objMonths.Add "Januari", 1
> objMonths.Add "Febuari", 2
> .
> .
> .
> objMonths.Add "December", 12
> 
> RecSet("alder") = DateSerial(Request.Form("ar"), objMonths(Request.Form("manad")), Request.Form("dag"))
> ```
>
> 
> **red.**
> Eller så gör man som **Sebbe** föreslår och skippar att skapa ett dict-objekt... även om det kan vara kul :OO :bire
> 
> Man kanske ska använda sig utav *Förhandsgranska* lite oftare :)

Hehe okej, tack ändå :)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/92238-type-mismatch