473,836 Members | 1,472 Online
Bytes | Software Development & Data Engineering Community
+ Post

Home Posts Topics Members FAQ

Microsoft VBScript runtime error '800a01c9'

Hi

I am getting this error which is frustrating me a lot

Microsoft VBScript runtime error '800a01c9'

This key is already associated with an element of this collection

/process.asp, line 362

the following is the code snippet:

Sub AddItemToCart(i ItemID, iItemCount)
aParameters = GetItemParamete rs(iItemID)

If dictCart.Exists (iItemID) Then

If CInt(aParameter s(6)) > CInt(dictCart(i ItemID)) then
dictCart(iItemI D) = dictCart(iItemI D) + iItemCount
Response.Write "<font face=Verdana color=#c8c8c8 size=2>" &
iItemCount & " of item # " & iItemID & " have been added to your
cart.<BR><BR></font>" & vbCrLf
Else
Response.Write "<font face=Verdana color=#c8c8c8 size=2>" & "There
is no more stock available to add<BR><BR></font>" & vbCrLf
End If

Else
If CInt(aParameter s(6)) > CInt(dictCart(i ItemID)) then
dictCart.Add iItemID, iItemCount >>>>>>>> line 362 <<<<<<<<<<<<<
Response.Write "<font face=Verdana color=#c8c8c8 size=2>" &
iItemCount & " of item # " & iItemID & " have been added to your
cart.<BR><BR></font>" & vbCrLf
Else
Response.Write "<font face=Verdana color=#c8c8c8 size=2>" & "There
is no more stock available to add<BR><BR></font>" & vbCrLf
End If

End If

End Sub
Please suggest me if you can find some error

regards

Rahul
Jul 19 '05 #1
3 13346
That means that you're trying to add something into your dictionary object
with the same key as another item that already exists. For example:

This will cause that error:
objYourDictiona ryObject.Add "key1", "Bird"
objYourDictiona ryObject.Add "key1", "Cat"

This will not cause an error:
objYourDictiona ryObject.Add "key1", "Bird"
objYourDictiona ryObject.Add "key2", "Cat"

See how the keys are different? They must be.

"Rahul Bakshi" <rb*****@usc.ed u> wrote in message
news:f1******** *************** ***@posting.goo gle.com...
Hi

I am getting this error which is frustrating me a lot

Microsoft VBScript runtime error '800a01c9'

This key is already associated with an element of this collection

/process.asp, line 362

the following is the code snippet:


Sub AddItemToCart(i ItemID, iItemCount)
aParameters = GetItemParamete rs(iItemID)

If dictCart.Exists (iItemID) Then

If CInt(aParameter s(6)) > CInt(dictCart(i ItemID)) then
dictCart(iItemI D) = dictCart(iItemI D) + iItemCount
Response.Write "<font face=Verdana color=#c8c8c8 size=2>" &
iItemCount & " of item # " & iItemID & " have been added to your
cart.<BR><BR></font>" & vbCrLf
Else
Response.Write "<font face=Verdana color=#c8c8c8 size=2>" & "There
is no more stock available to add<BR><BR></font>" & vbCrLf
End If

Else
If CInt(aParameter s(6)) > CInt(dictCart(i ItemID)) then
dictCart.Add iItemID, iItemCount >>>>>>>> line 362 <<<<<<<<<<<<<
Response.Write "<font face=Verdana color=#c8c8c8 size=2>" &
iItemCount & " of item # " & iItemID & " have been added to your
cart.<BR><BR></font>" & vbCrLf
Else
Response.Write "<font face=Verdana color=#c8c8c8 size=2>" & "There
is no more stock available to add<BR><BR></font>" & vbCrLf
End If

End If

End Sub
Please suggest me if you can find some error

regards

Rahul

Jul 19 '05 #2
Hi

I know the cause of the error

However i do not understand how the dictionary already has those keys
as this is the first item I am trying to add.

thanks for the quick response

regards
Rahul

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!
Jul 19 '05 #3
Throw in some response.writes and watch the keys.

Ray at home

"Rahul Bakshi" <rb*****@usc.ed u> wrote in message
news:%2******** ********@TK2MSF TNGP09.phx.gbl. ..
Hi

I know the cause of the error

However i do not understand how the dictionary already has those keys
as this is the first item I am trying to add.

thanks for the quick response

regards
Rahul

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!

Jul 19 '05 #4

This thread has been closed and replies have been disabled. Please start a new discussion.

Similar topics

10
10830
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
3
7347
by: Mike Kanski | last post by:
I get this error Microsoft VBScript runtime error '800a01fb' When i call LoadPicture method, or when i pretty much do any operation with PictureBox like setting width and height. It happened after i apllied Service Pack 4 to my 2000 machine. Before it worked properly. Any suggestions?
10
9791
by: Seeker | last post by:
Hi! I have to do some developing and I'm trying to configure my server to mimic the operation of our production server. The issue I'm having is that I'm trying to use CDONTS to send an email under IIS on a Windows 2003 Server. The server does not have the SMTP service running, but I do have a third party SMTP/POP/IMAP server running. I have copied the CDONTS.DLL file and registered it. In the Web Serice Extensions I have enabled the...
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 %> <%
3
30919
by: Snow | last post by:
Hello: I have Error Type: Microsoft VBScript runtime (0x800A000D) Type mismatch: '' The error happened at this line: if session("systemIdCount" & arrSystems(iLoop)) 0 The code like this:
2
15810
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
2069
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
1
4074
by: monika | last post by:
Hello: I have Error Type: Microsoft VBScript runtime (0x800A000D) Type mismatch: '' /OnlineLIB/BNosearch1.asp, line 32 The error happened at this line:bookno = chr(bookno) The code like this:
4
8850
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"%>
0
6616
by: .nLL | last post by:
Erorr is --------------------- Microsoft VBScript runtime error '800a0046' Permission denied /a.asp, line 3 -----------------------
0
9825
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
9673
by: Hystou | last post by:
Most computers default to English, but sometimes we require a different language, especially when relocating. Forgot to request a specific language before your computer shipped? No problem! You can effortlessly switch the default language on Windows 10 without reinstalling. I'll walk you through it. First, let's disable language synchronization. With a Microsoft account, language settings sync across devices. To prevent any complications,...
0
10859
Oralloy
by: Oralloy | last post by:
Hello folks, I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>". The problem is that using the GNU compilers, it seems that the internal comparison operator "<=>" tries to promote arguments from unsigned to signed. This is as boiled down as I can make it. Here is my compilation command: g++-12 -std=c++20 -Wnarrowing bit_field.cpp Here is the code in...
0
10560
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
10260
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
9388
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
7795
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
5653
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...
1
4463
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

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.