Wrox Programmer Forums
| Search | Today's Posts | Mark Forums Read
Classic ASP Databases Discuss using ASP 3 to work with data in databases, including ASP Database Setup issues from the old P2P forum on this specific subtopic. See also the book forum Beginning ASP.NET Databases for questions specific to that book. NOT for ASP.NET 1.0, 1.1, or 2.0.
Welcome to the p2p.wrox.com Forums.

You are currently viewing the Classic ASP Databases section of the Wrox Programmer to Programmer discussions. This is a community of software programmers and website developers including Wrox book authors and readers. New member registration was closed in 2019. New posts were shut off and the site was archived into this static format as of October 1, 2020. If you require technical support for a Wrox book please contact http://hub.wiley.com
  #1 (permalink)  
Old July 7th, 2003, 03:36 AM
Registered User
 
Join Date: Jul 2003
Location: , , .
Posts: 3
Thanks: 0
Thanked 0 Times in 0 Posts
Default Just started with ASP. Question!

Hey I wonder if any one could help me with this error:
I was using the source code in ASP 3.0 Chapter 15. The ADDUSER.ASP
and I have this error:

Microsoft VBScript runtime error '800a01f4'

Variable is undefined: 'adOpenForwardOnly'

/wildxchange/adduser.asp, line 14

why is this happening?

  #2 (permalink)  
Old July 7th, 2003, 03:49 AM
Authorized User
 
Join Date: Jul 2003
Location: Houten, Utrecht, Netherlands.
Posts: 13
Thanks: 0
Thanked 0 Times in 0 Posts
Send a message via MSN to bosboom
Default

There is a special include file in where these constants are defined:

    adovbs.inc

at the top of your page include the file

or


You can download it from a website of me

http://www.davilex.com/lib/asp/adovbs.inc

Greetz,

Bosboom

  #3 (permalink)  
Old July 7th, 2003, 06:48 PM
Registered User
 
Join Date: Jul 2003
Location: , , .
Posts: 3
Thanks: 0
Thanked 0 Times in 0 Posts
Default

thank u for your help. I am getting some other error:
ADODB.Recordset error '800a0bcd'

Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.

/wildxchange/adduser.asp, line 33

------------------------this is the adduser.asp----------------------


<%
Dim rsUsers


Set rsUsers = Server.CreateObject("ADODB.Recordset")
rsUsers.Open "Person", oConn, adOpenForwardOnly, adLockOptimistic, adCmdTable

If Session("UserID") <> " " Then ' currently logged-on user
     rsUsers.Filter = "UserID ='" & Session("UserID") & "'"
Else ' New session

rsUsers.Filter = "EmailAddress = '" & Request.Form("email") & " ' " & _
     "AND = Password =' " & Request.Form("Password") & " ' "

        If rsUsers.EOF Then ' User not found
         rsUsers.AddNew ' ...so add a new record

' Else
' Email address and password matched with DB records -
' In this case we'll allow this to update user's personal details
    End If
End If ' write personal details to record

rsUsers("EAddy") = Request.Form("email")
rsUsers("FName") = Request.Form("First")
rsUsers("LName") = Request.Form("Last")
rsUsers("PStrt1") = Request.Form("Addy1")
rsUsers("PStrt2") = Request.Form("Addy2")
rsUsers("City") = Request.Form("City")
rsUsers("State")= Request.Form("State")
rsUsers("Zip") = Request.Form("ZipCode")
rsUsers("Country") = Request.Form("Country")
rsUsers("SecretQuestion") = Request.Form("SecretQuestion")
rsUsers("SecretAnswer") = Request.Form("SecretAnswer")
rsUsers("Active") = True
rsUsers("LastLogin") = Now
rsUsers.Update ' update the database

 Dim strName, strValue ' create session variables

 For each strField in rsUsers.Fields

    strName = strField.Name

    strValue = strField.value

    Session(strName) = strValue

Next

Session("blnValidUser") = True ' declare that current user is validated
Response.Redirect "MenuForRegisteredUsers.asp"
%>

----------------------------------
can u help me out here?

  #4 (permalink)  
Old July 8th, 2003, 07:10 PM
Authorized User
 
Join Date: Jun 2003
Location: , , .
Posts: 37
Thanks: 0
Thanked 0 Times in 0 Posts
Default

rsUsers.move first

If Session("UserID") <> " " Then ' currently logged-on user
     rsUsers.Filter = "UserID ='" & Session("UserID") & "'"
Else ' New session


try to move to the beginning of you data collection first with something like rsuser.MoveFirst

Toran

  #5 (permalink)  
Old July 9th, 2003, 04:05 PM
Authorized User
 
Join Date: Jun 2003
Location: , , .
Posts: 37
Thanks: 0
Thanked 0 Times in 0 Posts
Default

akkk sorry ... it's rsUser.movefirst ... shoot the typist

  #6 (permalink)  
Old July 9th, 2003, 04:29 PM
Registered User
 
Join Date: Jul 2003
Location: , , .
Posts: 2
Thanks: 0
Thanked 0 Times in 0 Posts
Default

My friend, I've been having the same problem. I posted a similar thread on the site below. Read the reply to this post and see if that helps. It worked for me.

http://www.sqlmag.com/forums/message...39&STARTPAGE=1

  #7 (permalink)  
Old July 10th, 2003, 10:25 PM
Registered User
 
Join Date: Jul 2003
Location: , , .
Posts: 3
Thanks: 0
Thanked 0 Times in 0 Posts
Default

Quote:
quote:Originally posted by Benny P
 My friend, I've been having the same problem. I posted a similar thread on the site below. Read the reply to this post and see if that helps. It worked for me.

http://www.sqlmag.com/forums/message...39&STARTPAGE=1

thanks!



Similar Threads
Thread Thread Starter Forum Replies Last Post
Getting started sg48 BOOK: ASP.NET 2.0 Website Programming Problem Design Solution ISBN: 978-0-7645-8464-0 3 February 10th, 2008 02:36 AM
Getting started with ASP.Net 2.0 srotondo ASP.NET 2.0 Basics 3 December 22nd, 2007 09:08 PM
Getting started with CR & ASP.NET George H. Crystal Reports 1 May 3rd, 2004 06:22 PM
Can not get started eliea ASP.NET 1.0 and 1.1 Basics 3 July 19th, 2003 12:11 AM





Powered by vBulletin®
Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
Copyright (c) 2020 John Wiley & Sons, Inc.