K
Kevin
Hi, I am getting a syntax error
Microsoft VBScript compilation error '800a03ea'
Syntax error
On the code below. The error references the "End Select" line
Can anyone help me with what I am doing wrong?
Thanks
-========================================
<%
SELECT CASE iChoice
Dim iChoice
iChoice = varVendor
Select Case iChoice
Case "McGraw Hill"
Response.Write "<!--#include
virtual='/western/services/owdbMcGraw.asp'-->"
Case "Alexander"
Response.Write "<!--#include virtual='/western/services/owdbAlex.asp'-->"
Case "Classical"
Response.Write "<!--#include
virtual='/western/services/owdbClassical.asp'-->"
Case "CQPress"
Response.Write "<!--#include
virtual='/western/services/owdbCQPress.asp'-->"
Case "FactsOnFile"
Response.Write "<!--#include virtual='/western/services/owdbFOF.asp'-->"
Case "Greenwood"
Response.Write "<!--#include virtual='/western/services/owdbGreen.asp'-->"
Case "Grove"
Response.Write "<!--#include virtual='/western/services/owdbGrove.asp'-->"
Case "Lexis-Nexis"
Response.Write "<!--#include virtual='/western/services/owdbLexis.asp'-->"
Case "Morningstar"
Response.Write "<!--#include virtual='/western/services/owdbMStar.asp'-->"
Case "Oxford Press"
Response.Write "<!--#include
virtual='/western/services/owdbOxford.asp'-->"
Case "Vanderbilt"
Response.Write "<!--#include virtual='/western/services/owdbVandy.asp'-->"
Case "Westlaw"
Response.Write "<!--#include
virtual='/western/services/owdbWestlaw.asp'-->"
Case "Wiley"
Response.Write "<!--#include virtual='/western/services/owdbWiley.asp'-->"
Case Else
Response.Write "<h3>Please select a vendor. <br> <input type=button
value=Back onClick='history.back(1);'></h3>"
END SELECT
%>
Microsoft VBScript compilation error '800a03ea'
Syntax error
On the code below. The error references the "End Select" line
Can anyone help me with what I am doing wrong?
Thanks
-========================================
<%
SELECT CASE iChoice
Dim iChoice
iChoice = varVendor
Select Case iChoice
Case "McGraw Hill"
Response.Write "<!--#include
virtual='/western/services/owdbMcGraw.asp'-->"
Case "Alexander"
Response.Write "<!--#include virtual='/western/services/owdbAlex.asp'-->"
Case "Classical"
Response.Write "<!--#include
virtual='/western/services/owdbClassical.asp'-->"
Case "CQPress"
Response.Write "<!--#include
virtual='/western/services/owdbCQPress.asp'-->"
Case "FactsOnFile"
Response.Write "<!--#include virtual='/western/services/owdbFOF.asp'-->"
Case "Greenwood"
Response.Write "<!--#include virtual='/western/services/owdbGreen.asp'-->"
Case "Grove"
Response.Write "<!--#include virtual='/western/services/owdbGrove.asp'-->"
Case "Lexis-Nexis"
Response.Write "<!--#include virtual='/western/services/owdbLexis.asp'-->"
Case "Morningstar"
Response.Write "<!--#include virtual='/western/services/owdbMStar.asp'-->"
Case "Oxford Press"
Response.Write "<!--#include
virtual='/western/services/owdbOxford.asp'-->"
Case "Vanderbilt"
Response.Write "<!--#include virtual='/western/services/owdbVandy.asp'-->"
Case "Westlaw"
Response.Write "<!--#include
virtual='/western/services/owdbWestlaw.asp'-->"
Case "Wiley"
Response.Write "<!--#include virtual='/western/services/owdbWiley.asp'-->"
Case Else
Response.Write "<h3>Please select a vendor. <br> <input type=button
value=Back onClick='history.back(1);'></h3>"
END SELECT
%>