Error 'variable is undefined' when calling a function

Question

I have created a classic asp page with a function like the following:

<%@ Language=VBScript %>
<% Option Explicit %>

<%
      <!--#INCLUDE file='ADOVBS.inc'-->
       Response.Buffer = True

%>
<%
      Function Lettergrade(lg)

             Dim lgs
             if lg>50 then
            set    lgs="P"
                else
            set    lgs="F"
             end if
           set Lettergrade= lgs
       End Function
  %>
<%
set strlettergrade=Lettergade(strgrade)
... other code goes here
%>

I'm trying to call the function in an expression but when it gives me the following error:

Microsoft VBScript runtime error '800a01f4'

Variable is undefined: 'Lettergade'

Does anyone have an idea?

score 5 · Answer 1 · answered Apr 18 '12 at 19:28

Option Explicit means you must DIM variables before they can be used.
 is not vbscript so do not include them between the <% %> script delimiter tags.
You need to DIM strgrade
you need to DIM strlettergrade before you use it
Fix the typo of Lettergade(strgrade)


<%@ Language=VBScript %> 
<% Option Explicit %>  
<% Response.Buffer = True %>

<!--#INCLUDE file='ADOVBS.inc'-->

<%
Dim strlettergrade
Dim strgrade

%>

<%
Function Lettergrade(lg)

if lg > 50 then
  Lettergrade ="P" 
else 
  Lettergrade ="F" 

End Function
%>

<%
strgrade = 75
strlettergrade=Lettergrade(strgrade)
... other code goes here 
%>

score 2 · Answer 2 · edited Apr 19 '12 at 09:06

2

Try getting rid of the Set inside the function call and just assign Lettergrade = lgs.

edited Apr 19 '12 at 09:06

Guido Gautier

1,237
9
13

answered Apr 18 '12 at 17:34

Ryan Fiorini

800
5
9

score 1 · Answer 3 · answered Apr 18 '12 at 18:01

1

Variable is undefined: 'Lettergade'

Function appears to be called Lettergrade not Lettergade - might just be a typo issue

Try changing:

strlettergrade=Lettergade(strgrade)

to

strlettergrade=Lettergrade(strgrade)

answered Apr 18 '12 at 18:01

Chris Young

1,749
12
17

That is right. Thank you so much. Been with this error from last night. – Elmer Tillett Apr 18 '12 at 19:16
1

After changing this your code worked? Wow, you sure inserted a lot of decoy errors in your questions then ;). – Guido Gautier Apr 18 '12 at 19:41

Guido Gautier · Answer 4 · 2012-04-18T19:33:04.270

There are several problems with this script, some already pointed out by Chris and Ryan.

You only need Set when you assign an object to a variable. Strings are not objects in VBScript. Get rid of all the Set's in your script.
The obvious typo that Chris mentioned. Change Lettergade to Lettergrade.
You don't seem to declare the strlettergrade or strGrade variable. With Option Explicit turned on (which is a good practice), it is mandatory to declare all variables. Use Dim for this (like the one inside your function).
You seem to use a string as a parameter for your Lettergrade function. Since the variable name is strgrade. Within the function you are comparing with an integer. This could cause problems. Convert your string to an integer first using the cInt function.
Includes need to go outside the <% %> tags. Move  to the line below Option Explicit

Follow these steps, or copy paste the script from @Cape Cod Gunny. After this your script should work as expected ;). Except for point 4, you still need to correct that.

score 0 · Answer 5 · answered Apr 18 '12 at 18:04

0

You misspelled Lettergrade when calling the function. Variable is undefined: 'Lettergade' Also I would take SLaks advice as well. Set should not be used on strings.

answered Apr 18 '12 at 18:04

deusxmach1na

368
6
17

Error 'variable is undefined' when calling a function

5 Answers5