473,791 Members | 2,985 Online
Bytes | Software Development & Data Engineering Community
+ Post

Home Posts Topics Members FAQ

Microsoft VBScript runtime error '800a01a8'

6 New Member
Hi folks,

I am a bit new to asp, and I am trying to get my form to write to an Access DB and send a confirmation email to the user when they submit the form.

I am getting this error:

[BMicrosoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Microsoft Access Driver]General error Unable to open registry key 'Temporary (volatile) Jet DSN for process 0xe34 Thread 0xac0 DBC 0xd03c00c Jet'.

/formaction.asp, line 55
[/b]

Here is my code:

Expand|Select|Wrap|Line Numbers
  1. #51 <%
  2. #52 Dim conn, rs 
  3. #53 Set conn=Server.CreateObject("ADODB.Connection")
  4. #54 Set rs=Server.CreateObject("ADODB.Recordset")
  5. #55 conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=URL=fpdb/default4.mdb"
  6. #57
  7. #58 rs.Open "default4.mdb", conn, 2, 3
  8. #59 rs.addnew
  9. #60 rs("inputname")=Request.Form("Name")
  10. #61 rs("inputname")=Request.Form("Email")
  11. #62 rs("inputname")=Request.Form("Title")
  12. #63 rs("inputname")=Request.Form("Dealership")
  13. #64 rs("inputname")=Request.Form("Feb23_Reception")
  14. #65 rs("inputname")=Request.Form("Feb24_Business_Meetings")
  15. #66 rs("inputname")=Request.Form("Feb24_AB_VIP_Tour")
  16. #67 rs("inputname")=Request.Form("Feb25_Business_Meetings")
I have a global.asa file, but I don't know enough .asp to make this work and I have been scouring the Internet for days.

Any wisdom, guidance and/or help would be greatly appreciated.

Thanks,

Jim
Sep 10 '08 #1
9 4710
omerbutt
638 Contributor
hi Jim,
use this way and to connect to your access database and the connection string would be this one here
Expand|Select|Wrap|Line Numbers
  1. Set rs=Server.CreateObject("ADODB.Recordset")
  2. Set conn=Server.CreateObject("ADODB.Connection")
  3. conn="Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&server.mappath("fpdb/default4.mdb")
  4. sql_string="select * from table;"
  5. rs.CursorType = 2
  6. rs.LockType = 3
  7. rs.open sql_string,conn,3
  8. rs.addnew
  9. rs.fields("inputname")=Request.Form("Name")
  10. rs.fields("inputname")=Request.Form("Email")
  11. rs.fields("inputname")=Request.Form("Title")
  12. rs.fields("inputname")=Request.Form("Dealership")
  13. rs.fields("inputname")=Request.Form("Feb23_Reception")
  14. rs.fields("inputname")=Request.Form("Feb24_Business_Meetings")
  15. rs.fields("inputname")=Request.Form("Feb24_AB_VIP_Tour")
  16. rs.fields("inputname")=Request.Form("Feb25_Business_Meetings")
  17. rs.update
  18. rs.close
  19.  
tell me if there is any error using this method its been 5 years i have known asp and i have tried all the ways and all the connection strings and this method was the only one that never gave me any problems ......NEVER
Regards,
Omer Aslam
Sep 11 '08 #2
upperme
6 New Member
Hi Omer,

Thank you very much for your reply. I inserted your code, but I got a new error:

Microsoft JET Database Engine error '80040e14'

Syntax error in FROM clause.

/formaction.asp, line 58


Here is my complete code... I am trying to write to an Access db and generate a confirmation email to the registrant, in case I didn't mention it in my other post.

Expand|Select|Wrap|Line Numbers
  1. <%
  2. Set rs=Server.CreateObject("ADODB.Recordset")
  3. Set conn=Server.CreateObject("ADODB.Connection")
  4. conn="Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&server.mappath("fpdb/default4.mdb")
  5. sql_string="select * from table;"
  6. rs.CursorType = 2
  7. rs.LockType = 3
  8. rs.open sql_string,conn,3
  9. rs.addnew
  10. rs.fields("inputname")=Request.Form("Name")
  11. rs.fields("inputname")=Request.Form("Email")
  12. rs.fields("inputname")=Request.Form("Title")
  13. rs.fields("inputname")=Request.Form("Dealership")
  14. rs.fields("inputname")=Request.Form("Feb23_Reception")
  15. rs.fields("inputname")=Request.Form("Feb24_Business_Meetings")
  16. rs.fields("inputname")=Request.Form("Feb24_AB_VIP_Tour")
  17. rs.fields("inputname")=Request.Form("Feb25_Business_Meetings")
  18. rs.fields("inputname")=Request.Form("CAT_Update")
  19. rs.fields("inputname")=Request.Form("NACD_Update")
  20. rs.fields("inputname")=Request.Form("Power_Systems")
  21. rs.fields("inputname")=Request.Form("CAT_Financial")
  22. rs.fields("inputname")=Request.Form("Product_Support")
  23. rs.fields("inputname")=Request.Form("CAT_Panel_Discussion")
  24. rs.fields("inputname")=Request.Form("CAT_Path_to_2010_Goals")
  25. rs.fields("inputname")=Request.Form("Rental_Used_Update")
  26. rs.fields("inputname")=Request.Form("Dealer_Breakout_Session")
  27. rs.fields("inputname")=Request.Form("Dealer_Best_Practices")
  28. rs.fields("inputname")=Request.Form("Best_Practices_Ideas")
  29. rs.fields("inputname")=Request.Form("Add_Topics")
  30.  
  31. rs.Update
  32. rs.MoveLast
  33. strId=rs("id")
  34.  
  35. rs.Close
  36. conn.Close
  37. Set rs=nothing
  38. Set conn=nothing
  39. Response.Write "ID#: " & strId
  40. %>
Thanks again for your reply.

Jim
Sep 11 '08 #3
upperme
6 New Member
Let me update this line number to avoid any confusion...

Line 58 actually = rs.open sql_string,conn ,3

I just caught that...

Thanks again,

Jim
Sep 11 '08 #4
DrBunchman
979 Recognized Expert Contributor
Jim, there's a SQL syntax error in your SQL string. It looks pretty simple though so not sure what could be causing it - is "table" actually the name of your table?

Dr B
Sep 11 '08 #5
upperme
6 New Member
Dr B,

The name of the table is Results. I changed to Results from table, and now I get this error:

Expand|Select|Wrap|Line Numbers
  1. ADODB.Recordset error '800a0cc1' 
  2.  
  3. Item cannot be found in the collection corresponding to the requested name or ordinal. 
  4.  
  5. /formaction.asp, line 60
Code for line 60 = rs.fields("inpu tname")=Request .Form("Name")

Thanks very much,

Jim

Jim, there's a SQL syntax error in your SQL string. It looks pretty simple though so not sure what could be causing it - is "table" actually the name of your table?

Dr B
Sep 11 '08 #6
DrBunchman
979 Recognized Expert Contributor
Jim,

Then there is no column called "inputname" in your table Results. Make sure that all the fields that you are trying to update exist in your table and are spelt correctly.

Hope this helps,

Dr B
Sep 11 '08 #7
upperme
6 New Member
OK, thanks DrB... I think I am getting close... here is my current code:

Expand|Select|Wrap|Line Numbers
  1. <%
  2. Set rs=Server.CreateObject("ADODB.Recordset")
  3. Set conn=Server.CreateObject("ADODB.Connection")
  4. conn="Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&server.mappath("fpdb/default4.mdb")
  5. sql_string="select * from [Results]"
  6. rs.CursorType = 2
  7. rs.LockType = 3
  8. rs.open sql_string,conn,3
  9. rs.addnew
  10. rs.fields("Name")=Request.Form("Name")
  11. rs.fields("Email")=Request.Form("Email")
  12. rs.fields("Title")=Request.Form("Title")
  13. rs.fields("Dealership")=Request.Form("Dealership")
  14. rs.fields("Feb23_Reception")=Request.Form("Feb23_Reception")
  15. rs.fields("Feb24_Business_Meetings")=Request.Form("Feb24_Business_Meetings")
  16. rs.fields("Feb24_AB_VIP_Tour")=Request.Form("Feb24_AB_VIP_Tour")
  17. rs.fields("Feb25_Business_Meetings")=Request.Form("Feb25_Business_Meetings")
  18. rs.fields("CAT_Update")=Request.Form("CAT_Update")
  19. rs.fields("NACD_Update")=Request.Form("NACD_Update")
  20. rs.fields("Power_Systems")=Request.Form("Power_Systems")
  21. rs.fields("CAT_Financial")=Request.Form("CAT_Financial")
  22. rs.fields("Product_Support")=Request.Form("Product_Support")
  23. rs.fields("CAT_Panel_Discussion")=Request.Form("CAT_Panel_Discussion")
  24. rs.fields("CAT_Path_to_2010_Goals")=Request.Form("CAT_Path_to_2010_Goals")
  25. rs.fields("Rental_Used_Update")=Request.Form("Rental_Used_Update")
  26. rs.fields("Dealer_Breakout_Session")=Request.Form("Dealer_Breakout_Session")
  27. rs.fields("Dealer_Best_Practices")=Request.Form("Dealer_Best_Practices")
  28. rs.fields("Best_Practices_Ideas")=Request.Form("Best_Practices_Ideas")
  29. rs.fields("Add_Topics")=Request.Form("Add_Topics")
  30.  
  31. rs.Update
  32. rs.MoveLast
  33. strId=rs("id")
  34.  
  35. rs.Close
  36. conn.Close
  37. Set rs=nothing
  38. Set conn=nothing
  39. Response.Write "ID#: " & strId
  40. %>
*Line 86 = Line 36 here

However, now I am getting this error:

Microsoft VBScript runtime error '800a01a8'

Object required: 'Provider=Micro soft.J'

/formaction.asp, line 86


Thanks for all your help!

Jim


Jim,

Then there is no column called "inputname" in your table Results. Make sure that all the fields that you are trying to update exist in your table and are spelt correctly.

Hope this helps,

Dr B
Sep 12 '08 #8
omerbutt
638 Contributor
just remove Conn.close from your code you dont need to close the connection ,you already closing the recordset so its okay
Sep 15 '08 #9
upperme
6 New Member
That did it! Thanks very much for all your help...:)

Jim
just remove Conn.close from your code you dont need to close the connection ,you already closing the recordset so its okay
Sep 17 '08 #10

Sign in to post your reply or Sign up for a free account.

Similar topics

10
10825
by: | last post by:
I am accessing the same error-containing ASP page on an ISP server using w2k IE6 but with different effect. On the first computer I get several line of HTML outputed by ASP, shown correctly by the browser, followed by a descriptive error message: Microsoft VBScript runtime error '800a000b' Division by zero followed by the number of the error-making line
1
4815
by: Matrix | last post by:
I just got one virtual directory setup and try to run my web application from there. I am getting following error Microsoft VBScript runtime error '800a01a8' Object required: 'Session' I even try to create test.asp and put it in wwwroot folder only code I had was <% Response.write Session.SessionID %>
1
4259
by: g_sharad | last post by:
I guess this is a very old problem, but this keeps bugging many ppl in many ways. I am facing the problem with the SQL query >>>> Insert Into DailySalesReport (hoautoid, dsdate, dsreport, dsclientid, dsprincipleid, dsremarks, dsadminlock ) Values (5,'2/16/2005','sacc',1,1,'cdssd','not') This query runs fine on query analyser, but when I try to put in asp page and then it gives the runtime error as >>
1
1013
by: PaulieS | last post by:
Hi all. Am migrating a customer from IIS5 on W2K server to IIS6 on W2K3. Zipped all the websites and unzipped them to the identical locations on new server. Used IISMT to migrate metabase. Got this error when I tried to run a very basic page... code: <%@ LANGUAGE=vbscript %> <%
2
15807
by: anidmarty | last post by:
Hey I'm a Sysadmin and my users are getting this error on my production box. It works fine on the dev box. There is a script that is run that generates this error. Production is clustered environment using Microsoft Application Center. This was working before and starting throwing this error about 15 days ago. any help would be much appreciated thanks
0
2068
by: =?Utf-8?B?TWF0dCBDYWxob29u?= | last post by:
HI there, I am getting an error on my page which calls up a web service. Microsoft VBScript runtime error '800a13ba' Unknown runtime error: 'SearchQueryXML' /SearchResults.asp, line 142
4
8848
by: Genken | last post by:
Hi can anybody help me i get this error when running this code. Error Type: Microsoft VBScript runtime (0x800A01A8) Object required: '' And then a line number indicating where the error is, i cant see any errors with this code please assist. Thanks in advance. <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
4
2529
nitindel
by: nitindel | last post by:
Hi All, Please let me know that why i am getting the error like this:- Microsoft VBScript runtime error '800a01a8' Object required /Melange/MasconNet/singlesignon.asp, line 49
0
6611
by: .nLL | last post by:
Erorr is --------------------- Microsoft VBScript runtime error '800a0046' Permission denied /a.asp, line 3 -----------------------
1
10137
by: gray d newbie | last post by:
Greetings All, I'm new to this forum as well as to ASP. Therefore I am ready to learn from the ASP experts in this forum. Thank you very much in advance. I was assign to develop a ASP based website, and one of the functions offer in this site is that the end user is able to print all files located in a specific folder, and the files were actually generated in the folder based on the end user selection. After printing, the files will be...
0
9669
marktang
by: marktang | last post by:
ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However, people are often confused as to whether an ONU can Work As a Router. In this blog post, we’ll explore What is ONU, What Is Router, ONU & Router’s main usage, and What is the difference between ONU and Router. Let’s take a closer look ! Part I. Meaning of...
0
10207
jinu1996
by: jinu1996 | last post by:
In today's digital age, having a compelling online presence is paramount for businesses aiming to thrive in a competitive landscape. At the heart of this digital strategy lies an intricately woven tapestry of website design and digital marketing. It's not merely about having a website; it's about crafting an immersive digital experience that captivates audiences and drives business growth. The Art of Business Website Design Your website is...
0
9995
tracyyun
by: tracyyun | last post by:
Dear forum friends, With the development of smart home technology, a variety of wireless communication protocols have appeared on the market, such as Zigbee, Z-Wave, Wi-Fi, Bluetooth, etc. Each protocol has its own unique characteristics and advantages, but as a user who is planning to build a smart home system, I am a bit confused by the choice of these technologies. I'm particularly interested in Zigbee because I've heard it does some...
0
9029
agi2029
by: agi2029 | last post by:
Let's talk about the concept of autonomous AI software engineers and no-code agents. These AIs are designed to manage the entire lifecycle of a software development project—planning, coding, testing, and deployment—without human intervention. Imagine an AI that can take a project description, break it down, write the code, debug it, and then launch it, all on its own.... Now, this would greatly impact the work of software developers. The idea...
1
7537
isladogs
by: isladogs | last post by:
The next Access Europe User Group meeting will be on Wednesday 1 May 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM). In this session, we are pleased to welcome a new presenter, Adolph Dupré who will be discussing some powerful techniques for using class modules. He will explain when you may want to use classes instead of User Defined Types (UDT). For example, to manage the data in unbound forms. Adolph will...
0
5431
by: TSSRALBI | last post by:
Hello I'm a network technician in training and I need your help. I am currently learning how to create and manage the different types of VPNs and I have a question about LAN-to-LAN VPNs. The last exercise I practiced was to create a LAN-to-LAN VPN between two Pfsense firewalls, by using IPSEC protocols. I succeeded, with both firewalls in the same network. But I'm wondering if it's possible to do the same thing, with 2 Pfsense firewalls...
0
5559
by: adsilva | last post by:
A Windows Forms form does not have the event Unload, like VB6. What one acts like?
1
4110
by: 6302768590 | last post by:
Hai team i want code for transfer the data from one system to another through IP address by using C# our system has to for every 5mins then we have to update the data what the data is updated we have to send another system
3
2916
bsmnconsultancy
by: bsmnconsultancy | last post by:
In today's digital era, a well-designed website is crucial for businesses looking to succeed. Whether you're a small business owner or a large corporation in Toronto, having a strong online presence can significantly impact your brand's success. BSMN Consultancy, a leader in Website Development in Toronto offers valuable insights into creating effective websites that not only look great but also perform exceptionally well. In this comprehensive...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.