Avatar billede jimpp Nybegynder
09. oktober 2003 - 23:33 Der er 8 kommentarer og
1 løsning

Udenineret variabel fejl

Fejlen:

Microsoft VBScript runtime error '800a01f4'

Variable is undefined: 'mode'

/skp/cv.asp, line 13

KODEN:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="CP_ACP"%>
<% option explicit %>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<!--#include file="style.css"-->
<!--#include file="header.inc"-->
<!--#include file="elevmenu.inc"-->
<body>
<%
mode = Request.QueryString("mode") 'linje 13
if mode = "" then mode = "start"
select case mode %>
<%
case "start"
%>

<%
Dim dbData, rsData, SQL, Path
Set dbData = Server.CreateObject("ADODB.Connection")
Path = "DBQ=" & server.mappath("skp.mdb")
dbData.Open "DRIVER={Microsoft Access Driver (*.mdb)};"&Path
Set rsData = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM tblElev WHERE id=" & Session("idUser")
rsData.Open SQL, dbData

'//Henter brugeren data med Sessionen idUser
%>
Avatar billede medions Nybegynder
09. oktober 2003 - 23:39 #1
Det er fordi den er tom!

Prøv at tjek om der kommer nogle data til variablen!

//>Rune
Avatar billede medions Nybegynder
09. oktober 2003 - 23:39 #2
Altså at der i adresselinjen er en Query der hedder:

www.domæne.dk/filnavn.asp?mode=start

//>Rune
Avatar billede squashguy Nybegynder
09. oktober 2003 - 23:45 #3
prøv at glo lidt på denne
http://www.eksperten.dk/spm/412078
Avatar billede jimpp Nybegynder
09. oktober 2003 - 23:51 #4
Jamen den skal være tom :( så den går ned til case "start"

mode = Request.QueryString("mode") 'linje 13
if mode = "" then mode = "start"
select case mode
Avatar billede medions Nybegynder
09. oktober 2003 - 23:53 #5
Så prøv sådan her:

Dim mode = Request.QueryString("mode") 'linje 13
if mode = "" then mode = "start"
select case mode

//>Rune
Avatar billede jimpp Nybegynder
09. oktober 2003 - 23:55 #6
Microsoft VBScript compilation error '800a0401'

Expected end of statement

/skp/cv.asp, line 13

Dim mode = Request.QueryString("mode")
---------^
Avatar billede medions Nybegynder
09. oktober 2003 - 23:57 #7
<%@LANGUAGE="VBSCRIPT" CODEPAGE="CP_ACP"%>
<% option explicit %>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<!--#include file="style.css"-->
<!--#include file="header.inc"-->
<!--#include file="elevmenu.inc"-->
<body>
<%
Dim mode
mode = Request.QueryString("mode")
if mode = "" then mode = "start"
select case mode %>
<%
case "start"
%>

<%
Dim dbData, rsData, SQL, Path
Set dbData = Server.CreateObject("ADODB.Connection")
Path = "DBQ=" & server.mappath("skp.mdb")
dbData.Open "DRIVER={Microsoft Access Driver (*.mdb)};"&Path
Set rsData = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM tblElev WHERE id=" & Session("idUser")
rsData.Open SQL, dbData

'//Henter brugeren data med Sessionen idUser
%>

//>Rune
Avatar billede jimpp Nybegynder
10. oktober 2003 - 00:05 #8
og det virkede tak - kan godt selv se min fejl nu
Avatar billede medions Nybegynder
10. oktober 2003 - 00:07 #9
;o)
Thx 4 Poinz

//>Rune
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester