---
title: "asp formulär"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/5437-asp-formulär"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "borg"
published: "2000-03-09T12:20:00.000Z"
updated: "2000-03-10T09:01:00.000Z"
replies: 5
views: 393
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/5437-asp-formulär"
---

# asp formulär

## #1 — borg, 2000-03-09T12:20Z

Hej!
Jag har ett litet problem när jag skall ta
emot en form som inte innerhåller något.

Så här ser raden ut som raporteras fel:
lPostnr = clng(Request.Form("postnr"))

Så här lyder felmeddelandet:
Microsoft VBScript runtime error '800a000d'
Type mismatch: 'clng'

Hur kan jag testa att se om postnr formen
existerar. Kan ju fixa en if-sats då.

/daniel

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

## #2 — borg, 2000-03-09T14:29Z

Lyckades lösa problemet själv! :)

Men jag lyckade som vanligt hitta ett nytt
tillsynes omöjligt problem.

/daniel

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

## #3 — Vide, 2000-03-09T14:31Z

Hej!

... testa såhär:

If Request.Form("postnr") \<\> "" then
  lPostnr = clng(Request.Form("postnr"))
Else
  lPostnr = "inget"
End If

man kan nog kolla om det innehåller nått såhär:

If Request.Form("postnr") = null then

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

## #4 — borg, 2000-03-09T15:40Z

Det var typ så jag löste det. 
\----------------------------------
if Request.Form("postnr") = "" then
   postnr = 0
else
   postnr = clng(postnr)
end if
\----------------------------------

Fick dock ett nytt problem som jag inte fattar något av. :q

Har märkt ut raden den klagar på med \*\*\*\*

Så här ser koden ut: 
\----------------------------------

function postortpos(postort)
sPostort = postort
		
set dcon_checkort = server.CreateObject("ADODB.Connection")
		
postort_i_db = false
SQL_postort = "SELECT \* FROM tbl_postort WHERE Postort='" & sPostort & "'"
\*\*\*\*  set Rs_postort = dcon_checkort.Execute(SQL_postort)
	
if Rs_postort.EOF=false then
ipostort = Rs_postort("PostortID")
else
SQL_port_INS="INSERT INTO tbl_postort(Postort)" & \_ 
"VALUES ('" & sPostort & "')"
dcon_checkort.Execute(SQL_port_INS)
Response.Write("\<BR\>Postort skapad")
postort_i_db = true
end if

Rs_postort.close
			
if postort_i_db = true then
ipostort = postortpos(sPostort)
end if
			
Response.Write("\<BR\>Postort klar!\<BR\>")
postortpos = ipostort
end function
\----------------------------------

Som svar får jag detta meddelande:

\----------------------------------
ADODB.Connection error '800a0e78' 

The operation requested by the application is not allowed if the object is closed. 
\----------------------------------

Skulle bli glad om du kunde hitta felet.

/daniel

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

## #5 — Vide, 2000-03-09T18:34Z

Felmeddelandet tyder på att du inte har öppnat en koppling till databasen innan du försöker att använda det... jag ser här att du har skapat den, men sedan inte öppnat den...

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

## #6 — borg, 2000-03-10T09:01Z

Tackar! Det funkar nu. Raden måste kommit bort när jag ändrade lite i den tidigare. :)

/daniel

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/5437-asp-formulär
