Wrox Programmer Forums
Welcome to the p2p.wrox.com Forums.

You are currently viewing the BOOK: Beginning ASP 3.0 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
Old September 7th, 2012, 03:08 PM
Registered User
Join Date: Sep 2012
Posts: 1
Thanks: 0
Thanked 0 Times in 0 Posts
Default Chapter 14 Code page 620. Please help.

Can you please help me with the following ASP error:

Error Type:
ADODB.Record (0x800A0E7A)
Provider cannot be found. It may not be properly installed.
/begasp/recordmove.asp, line 25

My System: Windows XP Professional SP2 and IIS 5.1

This is the full asp code:
<%option explicit %>
<!-- metadata type="typelib"
FILE="c:\program files\common files\system\ado\msado15.dll" -->
<title>Retrieving semi-structured Data</title>
if request.form("task")="" then %>
<form name=movieinfo action="recordmove.asp" method="post">
what do you want to do? <br><br>
<input type="radio" name="task" value="copy" checked>
Copy Mytext.txt to a new file called mytext2.txt</input><br>
<input type="radio" name="task" value="move">
move Mytext.txt to a new file called mytext2.txt</input><br>
<input type="radio" name="task" value="delete">
delete Mytext.txt from the begasp file</input><br>
<input type=submit value="go">  
dim objrecord
set objrecord = server.CreateObject("adodb.record")
objrecord.open "mytext.txt","url=http://sony415s/begasp"
if request.form("task")= "copy" then
objrecord.copyrecord "", "http://sony415s/testfolder/mytext2.txt",,,adcopyoverwrite
response.write "mytext.txt file copied to a new file called mytext2.txt"
elseif request.form("task")= "move" then
objrecord.moverecord "", "http://sony415s/testfolder/mytext2.txt",,,adcopyoverwrite
response.write "mytext.txt file moved to a new file called mytext2.txt"
elseif request.form("task")="delete" then
response.write "mytext.txt has been deleted"
end if
set objrecord = nothing
end if

The error on line number 25 contains the following code:

objrecord.open "mytext.txt","url=http://sony415s/begasp"

The syntax of the code is correct because when I add IUSR_machinename to the Administrators group the code works and runs everything with anonymous user Iusr_machinename and it copies the record from the begasp virtual directory to the testfolder virtual directory.
I have given Iusr_machinename ntfs access to both folders by setting read permission for BEGASP physical path which is c:\inetpub\wwwroot\begaspfiles and read and write permission for the TESTFOLDER physical path which is c:\inetpub\wwwroot\testfolder.
Also Iusr has read permissions to the windows,system,system32, inetsrv,ado,msado15.dll directories and file. I have checked local security policy to make sure iusr_machinename can log on locally.

I think the asp code does not work because the Iusr_machinename is missing a permission somewhere to access the http://sony415s/begasp local server.

Can someone please help me solve this.
Old January 21st, 2014, 06:20 AM
Posts: n/a

nice information mike............

Similar Threads
Thread Thread Starter Forum Replies Last Post
Chapter 14 Code page 620, help needed! Safi BOOK: Beginning ASP 3.0 3 December 8th, 2010 12:43 PM
Chapter 1 page 14 kermit1965 BOOK: Professional ASP.NET MVC 2 6 October 12th, 2010 10:10 AM
Chapter 14 Code Error? pherank BOOK: Beginning PHP5, Apache, and MySQL Web Development ISBN: 978-0-7645-7966-0 1 July 4th, 2008 09:05 PM
Problem with code on Chapter 14 aargyri BOOK: Beginning PHP5, Apache, and MySQL Web Development ISBN: 978-0-7645-7966-0 3 June 6th, 2006 03:37 PM

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