Want to win a PS4? Go Premium and enter to win our High-Tech Treats giveaway. Enter to Win

x
?
Solved

Variable is undefined: 'adOpenKeyset'

Posted on 2004-09-07
7
Medium Priority
?
1,355 Views
Last Modified: 2010-05-18
I'm not a programmer, so please bear with me. My buddy wrote the page, and I can usually go in and figure out many of my issues, but I honestly don't know what "adOpenKeyset" is, or if it's even necessary on this page. I tried deleting it, trying other "adOpen" commands, but nothing worked.

I'm not sure what happened. This page has been working fine for a year or two, and suddenly it decided to break. Is there a chance my hosting server made a change that broke this?

The error is as stated in the title: Variable is undefined: 'adOpenKeyset'

Here is a copy of the first portion of the code:

<%@ Language=VBScript %>
<% Option Explicit %>
<%
'-------------------------------------------------------------------------------
' Author:         LM
' Create Date:    12/22/2002
' Page Function:  This page previews an ad from the database
'-------------------------------------------------------------------------------
      Dim dcnDB                         ' As ADODB.Connection
      Dim strDatabaseLocation           ' As String
      Dim rsQuery                               ' As ADODB.Connection
       Dim strMESSAGE                  ' As String
       Dim strNAME                     ' As String
      Dim rsORDER                               ' As ADODB.Recordset
      Dim strORDER                         ' As String
      Dim strEMAIL                               ' As String

      strNAME = Request.Form("CName")
      
%>
<!--#INCLUDE FILE="includes/ConnectDatabase1.inc"-->
<%
      Set rsQuery = Server.CreateObject("ADODB.Recordset")
      rsQuery.Open "SELECT * FROM ads", dcnDB, adOpenKeyset, adLockOptimistic


'-------------------------------------------------------------------------------
'  Defines session values
'-------------------------------------------------------------------------------
      
    SessionValues

'-------------------------------------------------------------------------------
'  Checks to make sure required fields filled out
'-------------------------------------------------------------------------------
      
    CheckForm1
      
%>

<HTML>
0
Comment
Question by:lawrance4
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 3
7 Comments
 
LVL 41

Expert Comment

by:shanesuebsahakarn
ID: 12001566
Your include file probably no longer includes a definition of adOpenKeyset - that would be the place to check first. It's a constant value.

For reference, it is equal to 1, so you might try this:
rsQuery.Open "SELECT * FROM ads", dcnDB, 1, adLockOptimistic
0
 

Author Comment

by:lawrance4
ID: 12001655
I tried your suggestion and got this:

Variable is undefined: 'adLockOptimistic'

I haven't changed my include file either, but here is what the "ConnectDatabase1.inc"  file contains:

<%
      strDatabaseLocation = "D:\Websites\www.fsbo-indy.com\database\fsboindy.mdb"
      Set dcnDB = Server.CreateObject("ADODB.Connection")
      dcnDB.ConnectionString = _
         "Provider=Microsoft.Jet.OLEDB.4.0;" _
            & "Persist Security Info=False;Data Source=" _
            & strDatabaseLocation
      dcnDB.Open
%>
0
 
LVL 41

Expert Comment

by:shanesuebsahakarn
ID: 12001706
Thinking about it, it wouldn't be defined in your include file at all (sorry, I don't use ASP all that much). It is very possible that your host has made some changes which has caused your code to stop working.
0
 
LVL 41

Accepted Solution

by:
shanesuebsahakarn earned 2000 total points
ID: 12001717
Sounds like the ADOVBS.INC file has been removed, where this stuff should be declared. Have a look here:
http://www.asp101.com/articles/john/adovbs/default.asp
0

Featured Post

Veeam Task Manager for Hyper-V

Task Manager for Hyper-V provides critical information that allows you to monitor Hyper-V performance by displaying real-time views of CPU and memory at the individual VM-level, so you can quickly identify which VMs are using host resources.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

It’s the first day of March, the weather is starting to warm up and the excitement of the upcoming St. Patrick’s Day holiday can be felt throughout the world.
In Part II of this series, I will discuss how to identify all open instances of Excel and enumerate the workbooks, spreadsheets, and named ranges within each of those instances.
Learn how to number pages in an Access report over each group. Activate two pass printing by referencing the pages property: Add code to the Page Footers OnFormat event to capture the pages as there occur for each group. Use the pages property to …
In Microsoft Access, learn how to “cascade” or have the displayed data of one combo control depend upon what’s entered in another. Base the dependent combo on a query for its row source: Add a reference to the first combo on the form as criteria i…

609 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question