5 svar · 374 visningar · startad av borg
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
Lyckades lösa problemet själv! :)
Men jag lyckade som vanligt hitta ett nytt
tillsynes omöjligt problem.
/daniel
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
